Login
Templates, Tools and Utilities
for Clarion Developers
Templates, Tools and Utilities
|
||
|
|
|
Icetips Article
Back to article list
Search Articles
Add Comment
Printer friendly
Direct link
Par2: Starting browser using ShellExecute 2000-05-11 -- James Cooke Place this inside the global map:
MODULE('Windows.DLL')
GetDesktopWindow(), Unsigned, Pascal
OMIT('***',_WIDTH32_)
ShellExecute(Unsigned, *CString, *CString, *CString, *CString, Signed),
Unsigned, Pascal, Raw, Proc
***
COMPILE('***',_WIDTH32_)
ShellExecute(Unsigned, *CString, *CString, *CString, *CString, Signed),
Unsigned, Pascal, Raw, Proc,name('ShellExecuteA')
***
End
Declare these local variables in a window:
AssocFile CSTRING(255)
Operation CSTRING(255)
Param CSTRING(255)
Directory CSTRING(255)
Place this code in a button:
AssocFile = 'c:\xyz.htm'
Param = ''
Directory = ''
Operation = 'open'
ShellExecute(GetDesktopWindow(),Operation,AssocFile,Param,Directory,5)
Compile and run - note that this can be used to call ANY windows
association.
Very useful.
Today is April 27, 2024, 2:16 pm This article has been viewed 35125 times.
|
|