跳轉到內容

Futurebasic/語言/參考/getprocessinfo

來自華夏公益教科書,自由的教學讀物

GET PROCESS INFO

[編輯 | 編輯原始碼]
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

華夏公益教科書