//下面的函式執行乙個程式並且等待他的結束。
//在外部的程式結束執行之前,不能做任何操作!
//ex:winexecw('c:/windows/notepad.exe','',sw_show);
function winexecexw(cmd,workdir:pchar;visiable:integer):dword;
var
startupinfo:tstartupinfo;
processinfo:tprocessinformation;
begin
fillchar(startupinfo,sizeof(startupinfo),#0);
startupinfo.cb:=sizeof(startupinfo);
startupinfo.dwflags:=startf_useshowwindow;
startupinfo.wshowwindow:=visiable;
if not createprocess(nil,cmd,nil,nil,false,create_new_console or normal_priority_class,nil,nil,startupinfo,processinfo) then
result:=0
else
begin
waitforsingleobject(processinfo.hprocess,infinite);
getexitcodeprocess(processinfo.hprocess,result);
end;
end;
呼叫外部程式並等待其結束
delphi啟動外部程式執行結束
一 為什麼要啟動外部程式 二 預備知識 啟動外部程式我們可以使用函式winexec shellexecute和shellexecuteex。我推薦大家使用函式shellexecute,因為它既靈活,又簡單。看看下面的例子,用法就清楚了 啟動乙個程式 nil,nil,sw show 啟動記事本 因為記...
等待他們的是什麼?
等待他們的是什麼?昨天我們的資訊工程概論的考試和高考同時結束了,不過我們的心情和高考的考生們是完全不同,到了我們大三,總感覺考試和喝水差不多。資訊工程概論是開卷考試,閒來沒事問問同學們複習的怎麼樣,答案和商量好的一樣,都回答沒複習,又問為什麼呢?答案是老師不會掛我們的。老師為什麼不會掛我們呢?首先,...
PHP執行外部程式的方法
在一些特殊情況下,會使用php呼叫外部程式執行,比如 呼叫shell命令 shell指令碼 可執行程式等等,今天在原始碼中了解了一下php執行外部程式的方法,藉此機會順便整理一下。在原始碼中 exec.件中,列出了可呼叫外部程式的幾個函式,藍色框裡的兩個函式只是輔助作用,本文只對其他幾個函式做介紹。...