Futurebasic/語言/參考/getprocessinfo
外觀
GETPROCESSINFO index%, processName$ [PSN]
2001 年 5 月(版本 5)
"程序" 是指當前在您的計算機上執行的任何事物;這包括但不限於應用程式、控制條擴充套件和後臺應用程式。
此呼叫中的索引引數表示要查詢的程序。索引值為 -1 表示使用前臺程序。這通常是您建立的正在執行的 FB 應用程式。
零或更高的索引值表示正在執行的程序。您可以遍歷此列表,檢查遇到的每個程序,直到程序名稱返回為空字串。此時,您已遍歷系統程序列表,可以停止搜尋。
程序序列號是一個 8 位元組值(2 個長整數),它包含一個唯一值,任何其他併發程序都不能使用。您可以按照以下步驟建立程序序列號
DIM psn AS ProcessSerialNumber
以下示例演示如何顯示正在執行的程序列表。
<b>DIM</b> indx& <b>DIM</b> ProcessName$ <b>DIM</b> psn as ProcessSerialNumber <code><b>GETPROCESSINFO</b> -1,ProcessName$ <b>PRINT</b> "My name is:""";ProcessName$;"""<br> <b>DEF TAB</b> 10 <b>PRINT</b> " indx","0x-------PSN------ ","Process Name"<br> indx& = 0 <b>DO</b> <b> GETPROCESSINFO</b> indx&,ProcessName$,psn <b>LONG IF</b> ProcessName$[0] <b>PRINT</b> indx&,"0x";<b>HEX$</b>(psn.highLongOfPSN); <b>PRINT HEX$</b>(psn.lowLongOfPSN),ProcessName$ <b>END IF</b> <b> INC</b>(indx&) <b>UNTIL LEN</b>(ProcessName$) == 0</code>
ON APPLEEVENT; APPLEEVENTMESSAGE$; KILL APPLEEVENT; SENDAPPLEEVENT