Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function ShellExecute(hWnd: LongInt; Operation, FileName, Parameters, Directory:
- PChar; ShowCmd: Integer): LongInt; external 'ShellExecuteA@shell32.dll stdcall';
- const
- SW_SHOWNORMAL = 1;
- begin
- ShellExecute(GetApplication.Handle, 'open', 'notepad.exe', '', '', SW_SHOWNORMAL);
- end.
Add Comment
Please, Sign In to add comment