易語言怎么使系統在5分鐘無操作執行銷燬本程序成功加20分

2023-02-02 21:45:33 字數 3419 閱讀 2658

1樓:匿名使用者

目前所有的方法沒有一個能保證程式真的不被結束。我就算是強行關機你也被結束了。工作管理員結束不了,我用360,實在不行我底層彙編都能實現結束。

2樓:本逸春

郵件已傳送,請查收。

使用到了外掛作坊模組,壓縮包內我附帶了一個我網上找的破解版,建議使用正版。

以下非模組部分的**貼出:

.版本 2

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

.程式集變數 鉤子, 類_鉤子

.程式集變數 定時器id, 整數型

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

模組破解 ()

' 安裝滑鼠和鍵盤的鉤子,用於監控滑鼠和鍵盤是否有動作鉤子.安裝鍵盤鉤子 (&鍵盤_鉤子介面, 0)鉤子.安裝滑鼠鉤子 (&滑鼠_鉤子介面, 0)' 啟動定時器

重置定時器 ()

.子程式 __啟動視窗_將被銷燬

鉤子.解除安裝所有鉤子 () ' 要記得銷燬掉鉤子,不然可能造成系統死鎖

.子程式 鍵盤_鉤子介面, 邏輯型, , 真=放行,假=阻止.引數 虛擬鍵碼, 整數型

.引數 掃描碼, 整數型

.引數 事件**, 整數型

重置定時器 ()

返回 (真) ' 只是監控鍵盤滑鼠是否有動作,始終放行.子程式 滑鼠_鉤子介面, 邏輯型, , 真=放行,假=阻止。

.引數 視窗控制代碼, 整數型

.引數 橫座標, 整數型

.引數 縱座標, 整數型

.引數 事件**, 整數型

重置定時器 ()

返回 (真) ' 只是監控鍵盤滑鼠是否有動作,始終放行.子程式 重置定時器

定時器id = 定時器_建立定時器 (0, 定時器id, 30 × 1000, &時鐘執行子程式) ' 每次捕獲到操作就重置下定時器 這裡演示的是 30 秒,可以填寫 5 × 60 × 1000 為 5 分鐘

.子程式 時鐘執行子程式

' 時鐘被觸發,證明時鐘週期內滑鼠鍵盤無任何操作銷燬 () ' 使用銷燬命令才能讓視窗的銷燬事件得到執行

易語言怎麼寫執行完成後關閉自身

3樓:樂樂愛知道

.版本 2

.支援庫 eapi

.程式集 視窗程式集1

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

時鐘1.時鐘週期 = 1000

.子程式 程序是否存在, 邏輯型

.引數 程序名, 文字型

.區域性變數 n1, 整數型

.區域性變數 n, 程序資訊, , "0"

n = 取系統程序列表 ()

.計次迴圈首 (取陣列成員數 (n), n1).如果 (n [n1].程序名稱 = 程序名)返回 (真)

.否則.如果結束

.計次迴圈尾 ()

返回 (假)

.子程式 _時鐘1_週期事件

.如果真 (程序是否存在 (「此程式的名稱.exe」))銷燬 ()

.如果真結束

4樓:匿名使用者

直接輸入【銷燬()】就可以了

易語言怎麼實現視窗5,將被銷燬時彈出提示?是否關閉

5樓:匿名使用者

.版本 2

.子程式 __啟動視窗_將被銷燬

資訊框 (「是不是這個樣子?」, 0, )

6樓:幻想祕境

在視窗事件子程式中選擇「可否被關閉」然後加入**:判斷(資訊框(「是否退出?」,4,「提示」)=#是鈕) 我用手機的,不好打。在判斷裡寫「返回(真)」否則就「返回(假)」望採納

7樓:匿名使用者

加多一個視窗

.版本 2

.子程式 _視窗6_建立完畢

.子程式 _按鈕1_被單擊

結束 ()

.子程式 _按鈕2_被單擊

載入(視窗5)

易語言如何在執行後把自己的.exe刪除

8樓:

自殺程式是嗎?

ok 有的。

.版本 2

.子程式 啟動自殺程式

.區域性變數 檔名稱, 文字型

.區域性變數 臨時檔名, 文字型

.區域性變數 指令碼, 文字型

'只有在被自殺的程式在退出後才會執行刪除其檔案

檔名稱 = #引號 + 取執行目錄 () + 「\」 + 取執行檔名 () + #引號

臨時檔名 = 取執行目錄 () + 「\exlkiller.bat」

指令碼 = 「:repeat」 + #換行符

指令碼 = 指令碼 + 「del 」 + 檔名稱 + #換行符

指令碼 = 指令碼 + 「if exist 」 + 檔名稱 + 「 goto repeat」 + #換行符

'此處新增其他要刪除的檔案

'新增格式:指令碼 = 指令碼 + 「del 」 + [檔案路徑]+#換行符

指令碼 = 指令碼 + 「del 」 + 臨時檔名+#換行符

寫到檔案 (臨時檔名, 到位元組集 (指令碼))'寫出指令碼檔案

執行 (臨時檔名, 假, #隱藏視窗)'執行指令碼檔案

銷燬 ()'結束當前程式,好讓指令碼執行刪除操作

這是個 自殺程式,程式中 只要呼叫了本子程式,就會退出程式,並且刪除掉程式的exe檔案。

有問題請追加

9樓:匿名使用者

這個很簡單啊,第一樓弄得太麻煩了,只用一個命令:程式自殺()

10樓:匿名使用者

刪除了還怎麼執行?

試問:你在電腦上執行一個程式,然後能把他解除安裝掉麼?

能隱藏。

易語言視窗關閉**

11樓:裂魂軟體

.版本 2

.程式集 視窗程式集1

.子程式 _按鈕1_被單擊

載入 (視窗1, , 假)

.子程式 __啟動視窗_將被銷燬

視窗1.銷燬 ()

12樓:匿名使用者

子程式 _按鈕1_被單擊

載入 (視窗2, , 真)

視窗1.可視=假

時鐘週期事件

時鐘週期=1000

判斷(控制代碼是否存在(取視窗控制代碼(『填上你程式的控制代碼』)))結束()

13樓:爸爸

結束()

直接結束程式的所有程序

易語言銷燬怎麼使用?銷燬後的視窗元件如何重新載入?

14樓:匿名使用者

不能載入。。。除非你自繪控制元件、、。。

建議你可視=假 隱藏

15樓:佐佐木真帥

額,我不明白你的意思

怎么使睫毛濃密,怎麼使睫毛濃密

睫毛變長小方法 1 剪睫毛尖 剪睫毛尖可以說是目前民間流傳最廣的一種長睫毛的方式。有人說剪掉睫毛尖,後來長出來的會比以前長,但是這個方法效果因人而異,對小孩的效果可能要好一些,大人還是不要隨便試,也有可能會長不出來,我身邊就有這樣剪掉後長不出來的例子。2 液體蛋白 液體蛋白是一種輔助食品,每日晚間塗...

怎么裝系統啊,怎麼裝系統啊

如果你安裝xp系統,可以用下列步驟 1 啟動你電腦,一直按del鍵直到出現一個修改介面,選擇那個advance 項 後面的是什麼我忘了 然後按上下鍵到first boot device,用page up 和page down鍵選擇到cdrom,把windows xp安裝盤放進光碟機,按f10鍵,按y...

mac系統怎么裝office軟體

直接從蘋果商店下了就能裝。mac的安裝十分簡單,和手機上安裝差不多,小編就不講解了,主要講講破解過程。首先安裝完畢後,使用者千萬不要登陸office,不然使用者就要解除安裝重新安裝。然後開啟壓縮包中的破解資料夾,其中有一個dmg檔案,開啟並執行。由於是破解檔案所以系統不會讓使用者開啟,請使用者設定好...