发enter键
keybd_event(VK_RETURN, MapVirtualKey(VK_RETURN, 0), 0, 0);uses shellapiShellExecute(handle,nil,pchar(label1.caption),nil,nil,sw_shownormal);
keybd_event(VK_RETURN, MapVirtualKey(VK_RETURN, 0), 0, 0);uses shellapiShellExecute(handle,nil,pchar(label1.caption),nil,nil,sw_shownormal);
WinExec( lpCmdLine String, uCmdShow : Integer );
//lpCmdLine指命令行。比如,打开C盘根目录的一个程序,就是
WinExec( 'C:\programe.exe', SW_SHOW );
也可以用命令行打开一个文件,如:
WinExec( 'c:\office\winword c:\a.doc', SW_SHOW );