1.實現效果

2.原始碼

說明：程式中引入了精易模組，實現取程序路徑功能

.版本 2
.支援庫 eAPI
.支援庫 iext

.程式集 視窗程式集_啟動視窗

.子程式 __啟動視窗_建立完畢

子程式_顯示程序資訊 ()


.子程式 子程式_顯示程序資訊
.區域性變數 程序陣列, 程序資訊, , "0"
.區域性變數 i, 整數型
.區域性變數 表項索引, 整數型

程序陣列 ＝ 取系統程序列表 ()
.如果真 (取陣列成員數 (程序陣列) ＝ 0)
    返回 ()
.如果真結束

狀態條1.置文字 (1, 到文字 (取陣列成員數 (程序陣列)))

.計次迴圈首 (取陣列成員數 (程序陣列), i)
    表項索引 ＝ 超級列表框1
 
.插入表項 (, 到文字 (程序陣列 [i].程序識別符號), , , , )
    超級列表框1.置標題 (表項索引, 1, 程序陣列 [i].程序名稱)
    .如果真 (程序陣列 [i].程序識別符號 ≤ 4)
        到迴圈尾 ()
    .如果真結束

    超級列表框1.置標題 (表項索引, 2, 取程序路徑 (程序陣列 [i].程序識別符號))

.計次迴圈尾 ()



.子程式 _重新整理列表_被選擇

超級列表框1.全部刪除 ()
子程式_顯示程序資訊 ()


.子程式 _退出程式_被選擇

銷燬 ()


.子程式 _始終保持視窗最前_被選擇

.判斷開始 (_啟動視窗.總在最前 ＝ 真)
    _啟動視窗.總在最前 ＝ 假
    始終保持視窗最前.選中 ＝ 假
.預設
    _啟動視窗.總在最前 ＝ 真
    始終保持視窗最前.選中 ＝ 真
.判斷結束