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是一個陣列變數,不光易語言有變數陣列這個概念,其它也有.陣列是在程式設計中,為了處理方便,把具有相同型別的若干變數按有序...