導航:首頁 > 安裝管理 > 易語言檢測移動設備

易語言檢測移動設備

發布時間:2021-04-14 23:57:51

A. 易語言如何判斷滑鼠3秒內是否移動!

需要下載文件:判斷滑鼠是否空閑

關鍵在於判斷滑鼠的位置是否移動,關鍵命令:
取滑鼠水平位置 ()
取滑鼠垂直位置 ()

B. 易語言檢測可移動磁碟文件,並執行復制操作

取驅動器列表 ()

C. 易語言如何獲取手機是否插入電腦 還有拔出

一般手機插入都會顯示H盤或者是其他的
只有你判斷H盤是否存在就行了。
下面是獲取U盤的插入或拔除事件的代碼,有dll命令和自定義類型常量。
.版本 2
.程序集 窗口程序集1
.程序集變數 a, 子程序指針
.子程序 __啟動窗口_創建完畢
a = SetWindowLong (_啟動窗口.取窗口句柄 (), -4, &MsgProc)

.子程序 MsgProc, 整數型
.參數 hwnd, 整數型
.參數 msg, 整數型
.參數 wp, 整數型
.參數 lp, 整數型
.局部變數 val, PDEV_BROADCAST_VOLUME
.局部變數 i, 整數型
.局部變數 mask, 整數型
.判斷開始 (msg = 537)
.判斷開始 (wp = #DBT_DEVICERARRIVAL) ' 插入設備
復制結構體 (val, lp, 14)
.如果真 (val.dbcv_devicetype = #DBT_DEVTYP_VOLUME)
mask = val.dbcv_unitmask
.變數循環首 (0, 25, 1, i)
.如果真 (位與 (mask, 1) = 1)
跳出循環 ()
.如果真結束
mask = 右移 (mask, 1)
.變數循環尾 ()
編輯框1.加入文本 (「USB磁碟被插入,盤符:」 + 字元 (65 + i) + #換行符)
檢測 (字元 (65 + i))
.如果真結束
.判斷 (wp = #DBT_DEVICEREMOVECOMPLETE) ' 刪除設備
復制結構體 (val, lp, 14)
.如果真 (val.dbcv_devicetype = #DBT_DEVTYP_VOLUME)
mask = val.dbcv_unitmask
.變數循環首 (0, 25, 1, i)
.如果真 (位與 (mask, 1) = 1)
跳出循環 ()
.如果真結束
mask = 右移 (mask, 1)
.變數循環尾 ()
編輯框1.加入文本 (「USB磁碟被拔除,盤符:」 + 字元 (65 + i) + #換行符)
.如果真結束
.默認
.判斷結束
.默認
.判斷結束
返回 (CallWindowProc (a, hwnd, msg, wp, lp))
.子程序 __啟動窗口_將被銷毀
a = SetWindowLong (_啟動窗口.取窗口句柄 (), -4, a)
.子程序 檢測
.參數 盤符, 文本型
.局部變數 fn, 文本型
fn = 尋找文件 (盤符 + 「:\*.*」, )
編輯框2.內容 = 「」
.判斷循環首 (fn ≠ 「」)
編輯框2.加入文本 (fn + #換行符)
fn = 尋找文件 (, )
.判斷循環尾 ()

≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈自定義類型≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈

.數據類型 PDEV_BROADCAST_VOLUME
.成員 dbcv_size, 整數型, , , 14
.成員 dbcv_devicetype, 整數型
.成員 dbcv_reserved, 整數型
.成員 dbcv_unitmask, 整數型
.成員 dbcv_flags, 短整數型
.數據類型 _DEV_BROADCAST_HDR
.成員 dbch_size, 整數型
.成員 dbch_devicetype, 整數型
.成員 dbch_reserved, 整數型

≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈常量≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈

.常量 WM_DEVICECHANGE, "537", , 驅動盤符被改變
.常量 DBT_DEVICEREMOVECOMPLETE, "32772"
.常量 DBT_DEVICERARRIVAL, "32768"
.常量 DBT_DEVTYP_OEM, "0"
.常量 DBT_DEVTYP_DEVNODE, "1"
.常量 DBT_DEVTYP_VOLUME, "2"
.常量 DBT_DEVTYP_PORT, "3"
.常量 DBT_DEVTYP_N, "4"

D. 易語言怎麼識別可移動磁碟

磁碟=取驅動器列表(#介面常量.可移動驅動器)
計次循環首(取數組成員數(磁碟),計次)
列表框1.加入項目(磁碟[計次],)
計次循環尾()
這樣有幾個可移動磁碟都列出來了!列出的盤符!

E. 易語言人如何檢測是否有蘋果設備接入並且獲取其信息最好有源碼,謝謝!

給我財富 我給你 易語言老鳥

F. 易語言檢測U盤插入並獲取盤符,求方法,有源碼更好!

下面是獲取U盤的插入或拔除事件的代碼,有dll命令和自定義類型常量。如果不是很明白,把郵箱寫上,我發給你。
.
.版本 2
.程序集 窗口程序集1
.程序集變數 a, 子程序指針
.子程序 __啟動窗口_創建完畢
a = SetWindowLong (_啟動窗口.取窗口句柄 (), -4, &MsgProc)

.子程序 MsgProc, 整數型
.參數 hwnd, 整數型
.參數 msg, 整數型
.參數 wp, 整數型
.參數 lp, 整數型
.局部變數 val, PDEV_BROADCAST_VOLUME
.局部變數 i, 整數型
.局部變數 mask, 整數型
.判斷開始 (msg = 537)
.判斷開始 (wp = #DBT_DEVICERARRIVAL) ' 插入設備
復制結構體 (val, lp, 14)
.如果真 (val.dbcv_devicetype = #DBT_DEVTYP_VOLUME)
mask = val.dbcv_unitmask
.變數循環首 (0, 25, 1, i)
.如果真 (位與 (mask, 1) = 1)
跳出循環 ()
.如果真結束
mask = 右移 (mask, 1)
.變數循環尾 ()
編輯框1.加入文本 (「USB磁碟被插入,盤符:」 + 字元 (65 + i) + #換行符)
檢測 (字元 (65 + i))
.如果真結束
.判斷 (wp = #DBT_DEVICEREMOVECOMPLETE) ' 刪除設備
復制結構體 (val, lp, 14)
.如果真 (val.dbcv_devicetype = #DBT_DEVTYP_VOLUME)
mask = val.dbcv_unitmask
.變數循環首 (0, 25, 1, i)
.如果真 (位與 (mask, 1) = 1)
跳出循環 ()
.如果真結束
mask = 右移 (mask, 1)
.變數循環尾 ()
編輯框1.加入文本 (「USB磁碟被拔除,盤符:」 + 字元 (65 + i) + #換行符)
.如果真結束
.默認
.判斷結束
.默認
.判斷結束
返回 (CallWindowProc (a, hwnd, msg, wp, lp))
.子程序 __啟動窗口_將被銷毀
a = SetWindowLong (_啟動窗口.取窗口句柄 (), -4, a)
.子程序 檢測
.參數 盤符, 文本型
.局部變數 fn, 文本型
fn = 尋找文件 (盤符 + 「:\*.*」, )
編輯框2.內容 = 「」
.判斷循環首 (fn ≠ 「」)
編輯框2.加入文本 (fn + #換行符)
fn = 尋找文件 (, )
.判斷循環尾 ()

≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈自定義類型≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈

.數據類型 PDEV_BROADCAST_VOLUME
.成員 dbcv_size, 整數型, , , 14
.成員 dbcv_devicetype, 整數型
.成員 dbcv_reserved, 整數型
.成員 dbcv_unitmask, 整數型
.成員 dbcv_flags, 短整數型
.數據類型 _DEV_BROADCAST_HDR
.成員 dbch_size, 整數型
.成員 dbch_devicetype, 整數型
.成員 dbch_reserved, 整數型

≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈常量≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈

.常量 WM_DEVICECHANGE, "537", , 驅動盤符被改變
.常量 DBT_DEVICEREMOVECOMPLETE, "32772"
.常量 DBT_DEVICERARRIVAL, "32768"
.常量 DBT_DEVTYP_OEM, "0"
.常量 DBT_DEVTYP_DEVNODE, "1"
.常量 DBT_DEVTYP_VOLUME, "2"
.常量 DBT_DEVTYP_PORT, "3"
.常量 DBT_DEVTYP_N, "4"

閱讀全文

與易語言檢測移動設備相關的資料

熱點內容
黑龍江特種設備檢驗研究院 瀏覽:210
機械化養護中心 瀏覽:838
上海特種設備管理 瀏覽:48
機械師改槍 瀏覽:181
機械化剪紙 瀏覽:757
美燃環保設備 瀏覽:809
濟南北斗星數控設備有限公司 瀏覽:838
自動噴塗機械手 瀏覽:457
中小型農業機械加工項目建議書 瀏覽:251
不銹鋼加工設備市轉讓 瀏覽:441
水稻生產全程機械化 瀏覽:110
扳手機械原理 瀏覽:61
凱格精密機械有限公司 瀏覽:61
廣毅機電設備 瀏覽:805
重慶三陽辦公設備有限公司 瀏覽:494
華技達自動化設備 瀏覽:631
東莞石碣自動化設備廠 瀏覽:131
機械制圖陳列櫃 瀏覽:246
鄭州奧鑫游樂設備公司 瀏覽:733
美邦環保設備有限公司 瀏覽:386