易語言圖示提然出來版本2支援庫,易語言圖示提取不出來 版本 2 支援庫 edroptarget 支援庫 eAPI 程式集 視窗程式集1 子程式 啟動視窗

2022-03-06 17:55:25 字數 2806 閱讀 9117

1樓:小樓思雨

給你**,臨時寫的!

.版本 2

.支援庫 iext

.支援庫 iext2

.支援庫 shell

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

超級列表框1.型別 = 0

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

.區域性變數 位元組集, 位元組集

.區域性變數 i, 整數型

位元組集 = 建空**組 (32, 32)

通用對話方塊1.型別 = 0

.如果真 (通用對話方塊1.開啟 ())

超級列表框1.全部刪除 ()

.判斷迴圈首 (提取加入** (位元組集, 通用對話方塊1.檔名, i, ) ≠ -1)

超級列表框1.**組 = 位元組集

超級列表框1.插入表項 (, 到文字 (i), i, , , )i = i + 1

.判斷迴圈尾 ()

標題 = 「圖示數:」 + 到文字 (i)資訊框 (「提取完畢!」, #資訊圖示, ).如果真結束

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

.區域性變數 資料夾, 文字型

.區域性變數 表項數, 整數型

.區域性變數 i, 整數型

表項數 = 超級列表框1.取表項數 ()

.如果 (表項數 ≠ 0)

資料夾 = 瀏覽資料夾 (「瀏覽」, )

.如果真 (資料夾 ≠ 「」)

.計次迴圈首 (表項數, i)

寫到檔案 (資料夾 + 「\」 + 到文字 (i - 1) + 「.bmp」, 取****片 (超級列表框1.**組, i - 1, ))

.計次迴圈尾 ()

.如果真結束

.否則資訊框 (「沒有圖示!」, #錯誤圖示, )

2樓:唱反調

某些軟體的第一個圖示是空的;比如魔獸3的war3.exe,他的第一個圖示是空的,你可以取第二個圖示;

你的問題表達不是很清楚;

易語言怎麼取到桌面圖示的位置、? 20

3樓:匿名使用者

截自我的工具箱部分原始碼,路徑就是你想要的

.版本 2

.支援庫 edroptarget

.支援庫 iext2

.支援庫 iext

.支援庫 eapi

.程式集 啟動視窗程式集

.程式集變數 **組, 位元組集

.程式集變數 配置檔名, 文字型

.程式集變數 接收檔案, 文字型

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

.區域性變數 節名陣列, 文字型, , "0"

.區域性變數 計次, 整數型

.區域性變數 計錄, 整數型

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

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

.區域性變數 下標, 整數型

拖放物件1.註冊拖放控制元件 (超級列表框.取視窗控制代碼 ())

**組 = 建空**組 (32, 32)

配置檔名 = 取執行目錄 () + 「\瀟瀟大作.ini」

節名陣列 = 取配置節名 (配置檔名)

.計次迴圈首 (取陣列成員數 (節名陣列), 計錄)

提取加入** (**組, 讀配置項 (配置檔名, 節名陣列 [計錄], 「路徑」, ), 0)

.計次迴圈尾 ()

超級列表框.**組 = **組

.計次迴圈首 (取****片數 (**組), 計次)

檔名 = 分割文字 (讀配置項 (配置檔名, 節名陣列 [計次], 「路徑」, ), 「\」, )

下標 = 取陣列成員數 (檔名)

檔名 = 分割文字 (檔名 [下標], 「.」, )

超級列表框.插入表項 (-1, 檔名 [1], 計次 - 1, , , )

.計次迴圈尾 ()

.子程式 _拖放物件1_得到檔案

.引數 接收到的檔案路徑, 文字型

.區域性變數 最大下標, 整數型

.區域性變數 遊戲名, 文字型

.區域性變數 a, 文字型, , "0"

.區域性變數 b, 文字型, , "0"

.區域性變數 路徑, 文字型, , "0"

接收檔案 = 接收到的檔案路徑

路徑 = 分割文字 (取快捷方式目標 (接收到的檔案路徑, , , , , , , ), 「\」, )

.如果 (取陣列成員數 (路徑) > 1)

最大下標 = 取陣列成員數 (路徑)

路徑 = 分割文字 (路徑 [最大下標], 「.」, )

遊戲名 = 路徑 [1]

寫配置項 (配置檔名, 遊戲名, 「路徑」, 取快捷方式目標 (接收到的檔案路徑))

提取加入** (**組, 取快捷方式目標 (接收到的檔案路徑), 0)

超級列表框.**組 = **組

超級列表框.插入表項 (-1, 遊戲名, 取****片數 (**組) - 1, , , )

.否則' 資訊框 (「必須是快捷方式」, 0, 「提示」)

a = 分割文字 (接收到的檔案路徑, 「\」, )

b = 分割文字 (a [5], 「.」, )

.如果 (b [2] = 「txt」)

資訊框 (「暫不支援txt文字加入。」, 0, 「阿哦!」)

.否則遊戲名 = b [1]

寫配置項 (配置檔名, 遊戲名, 「路徑」, 接收到的檔案路徑)

提取加入** (**組, 接收到的檔案路徑, 0, )

超級列表框.**組 = **組

超級列表框.插入表項 (-1, 遊戲名, 取****片數 (**組) - 1, , , )

.如果結束

.如果結束

易語言FTP上傳,易語言ftp上傳檔案

連線ftp伺服器。地址,使用者名稱,密碼,埠,ftp檔案上傳。d 易語言ftp上傳檔案 50 e 1 版本 2 支援庫 spec 子程式 按鈕1 被單擊。區域性變數 ftp,類 ftp 如果真 ftp.連線ftp伺服器 地址,帳號,密碼,21,如果真 ftp.檔案上傳 取執行目錄 除錯輸出 上傳成功...

易語言高手進來下,易語言怎麼使用?

推薦樓主用encryptpe,你看看它的功能,覺得好就吧。易語言怎麼使用?很簡單,就當是用漢字來表達的計算程式一樣使用,並沒有什麼不同。我剛剛下了易語言版,但是我什麼都不懂,誰告訴我怎麼用啊。怎麼說呢,要用了才知道。易語言入門教程是什麼?易語言 epl 是一門以中文作為程式 程式語言,其以 易 著稱...

易語言陣列問題,易語言中陣列的問題

程式集整數型變數 程式集整數型變數 1 如果 取陣列成員數 文字 程式集整數型變數 標籤1.內容 文字 程式集整數型變數 否則 標籤1.內容 end 陣列不等於引數,陣列就copy是一個陣列變數,不光易語言有變數陣列這個概念,其它也有.陣列是在程式設計中,為了處理方便,把具有相同型別的若干變數按有序...