執行外部的程式並且等待他的結束。 收集

2021-04-01 04:47:06 字數 828 閱讀 5072

//下面的函式執行乙個程式並且等待他的結束。

//在外部的程式結束執行之前,不能做任何操作!

//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.件中,列出了可呼叫外部程式的幾個函式,藍色框裡的兩個函式只是輔助作用,本文只對其他幾個函式做介紹。...