欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

易語言枚舉進(jìn)程通過窗口句柄獲取已經(jīng)登錄的QQ號(hào)碼

 更新時(shí)間:2018年11月28日 14:53:33   作者:易語言源碼教程  
今天小編就為大家分享一篇關(guān)于易語言枚舉進(jìn)程通過窗口句柄獲取已經(jīng)登錄的QQ號(hào)碼,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧

DLL命令表

.版本 2
.DLL命令 GetDesktopWindow, 整數(shù)型, "user32.dll", "GetDesktopWindow"
.DLL命令 CreateToolhelp32Snapshot, 整數(shù)型, "kernel32", "CreateToolhelp32Snapshot"
  .參數(shù) dwFlags, 整數(shù)型, , 0
  .參數(shù) th32ProcessIE, 整數(shù)型, , 0
.DLL命令 Process32First, 整數(shù)型, "kernel32", "Process32First"
  .參數(shù) hSnapshot, 整數(shù)型, , 0
  .參數(shù) lppe, 進(jìn)程信息列表, , 0
.DLL命令 CloseHandle, 邏輯型, "Kernel32", "CloseHandle", , 關(guān)閉打開的對(duì)象句柄
  .參數(shù) hObject, 整數(shù)型, , 要關(guān)閉的對(duì)象句柄
.DLL命令 GetWindowTextA, 整數(shù)型, "user32.dll", "GetWindowTextA", , 取得一個(gè)窗體的標(biāo)題(caption)文字,或者一個(gè)控件的內(nèi)容(在vb里使用:使用vb窗體或控件的caption或text屬性) 復(fù)制到lpString的字串長度;不包括空中止字符。會(huì)設(shè)置GetLastError
  .參數(shù) hWnd, 整數(shù)型, , 欲獲取文字的那個(gè)窗口的句柄
  .參數(shù) lpString, 文本型, 傳址, 預(yù)定義的一個(gè)緩沖區(qū),至少有cch 1個(gè)字符大小;隨同窗口文字載入
  .參數(shù) nMaxCount, 整數(shù)型, , lp緩沖區(qū)的長度;
.DLL命令 GetWindowTextLength, 整數(shù)型, "user32", "GetWindowTextLengthA", 公開
  .參數(shù) hwnd, 整數(shù)型
.DLL命令 Process32Next, 整數(shù)型, "kernel32", "Process32Next", , 獲得下一個(gè)進(jìn)程的句柄
  .參數(shù) hSnapshot, 整數(shù)型, , 0
  .參數(shù) lppe, 進(jìn)程信息列表, , 0
.DLL命令 GetWindow, 整數(shù)型, , "GetWindow"
  .參數(shù) 源窗口, 整數(shù)型
  .參數(shù) 關(guān)系, 整數(shù)型

自定義數(shù)據(jù)類型表

.版本 2
.數(shù)據(jù)類型 進(jìn)程信息列表, 公開
  .成員 dwSize, 整數(shù)型, , , 1
  .成員 cntUsage, 整數(shù)型, , , 2
  .成員 進(jìn)程ID, 整數(shù)型, , , 3
  .成員 th32DefaultHeapID, 整數(shù)型, , , 4
  .成員 th32ModuleID, 整數(shù)型, , , 5
  .成員 cntThreads, 整數(shù)型, , , 6
  .成員 th32ParentProcessID, 整數(shù)型, , , 7
  .成員 pcPriClassBase, 整數(shù)型, , , 8
  .成員 dwFlags, 整數(shù)型, , , 9
  .成員 進(jìn)程名稱, 字節(jié)型, , "256", 10

窗口句柄方式取已登陸QQ號(hào)碼的代碼

.版本 2
.程序集 窗口程序集_啟動(dòng)窗口
.子程序 _啟動(dòng)子程序, 整數(shù)型
.局部變量 返回的QQ號(hào)碼, 文本型
.局部變量 分割的文本, 文本型, , "0"
返回的QQ號(hào)碼 = 系統(tǒng)_取已登陸QQ號(hào)碼 ()
分割的文本 = 分割文本 (返回的QQ號(hào)碼, #換行符, )
信息框 (“有” + 到文本 (取數(shù)組成員數(shù) (分割的文本)) + “個(gè)QQ” + #換行符 + 返回的QQ號(hào)碼, 0, )
返回 (0)
.子程序 窗口_取標(biāo)題, 文本型, 公開
.參數(shù) 窗口句柄, 整數(shù)型
.局部變量 局_緩沖區(qū), 文本型
.局部變量 局_緩沖大小
局_緩沖大小 = GetWindowTextLength (窗口句柄) + 1
局_緩沖區(qū) = 取空白文本 (局_緩沖大小)
GetWindowTextA (窗口句柄, 局_緩沖區(qū), 局_緩沖大小)
返回 (局_緩沖區(qū))
.子程序 窗口_枚舉窗口句柄, 整數(shù)型, 公開, 通過窗口任務(wù)關(guān)系來枚舉所有窗口,返回窗口句柄數(shù)目,失敗返回0
.參數(shù) 句柄數(shù)組, 整數(shù)型, 可空 數(shù)組, 返回的所有窗口句柄數(shù)組
.局部變量 窗口句柄, 整數(shù)型
清除數(shù)組 (句柄數(shù)組)
窗口句柄 = GetWindow (GetDesktopWindow (), 5)
.判斷循環(huán)首 (窗口句柄 ≠ 0)
  加入成員 (句柄數(shù)組, 窗口句柄)
  窗口句柄 = GetWindow (窗口句柄, 2)
.判斷循環(huán)尾 ()
返回 (取數(shù)組成員數(shù) (句柄數(shù)組))
.子程序 進(jìn)程_取ID數(shù)組, 整數(shù)型, 公開, 取指定進(jìn)程名稱的所有進(jìn)程的進(jìn)程ID(返回進(jìn)程ID數(shù)目,沒有返回0)
.參數(shù) 進(jìn)程名, 文本型, , 程序進(jìn)程名
.參數(shù) 進(jìn)程ID數(shù)組, 整數(shù)型, 參考 數(shù)組, 返回的進(jìn)程ID 數(shù)組
.參數(shù) 區(qū)分大小寫, 邏輯型, 可空, 默認(rèn)不區(qū)分進(jìn)程名大小寫
.局部變量 信息, 進(jìn)程信息列表
.局部變量 進(jìn)程快照, 整數(shù)型
.局部變量 進(jìn)程句柄, 整數(shù)型
清除數(shù)組 (進(jìn)程ID數(shù)組)
進(jìn)程快照 = CreateToolhelp32Snapshot (15, 0)
.如果真 (進(jìn)程快照 = 0)
  返回 (0)
.如果真結(jié)束
信息.dwSize = 1024
進(jìn)程句柄 = Process32First (進(jìn)程快照, 信息)
.判斷開始 (區(qū)分大小寫)
  .判斷循環(huán)首 (進(jìn)程句柄 ≠ 0)
    .如果真 (進(jìn)程名 = 到文本 (信息.進(jìn)程名稱))
      加入成員 (進(jìn)程ID數(shù)組, 信息.進(jìn)程ID)
    .如果真結(jié)束
    進(jìn)程句柄 = Process32Next (進(jìn)程快照, 信息)
  .判斷循環(huán)尾 ()
.默認(rèn)
  .判斷循環(huán)首 (進(jìn)程句柄 ≠ 0)
    .如果真 (到小寫 (進(jìn)程名) = 到小寫 (到文本 (信息.進(jìn)程名稱)))
      加入成員 (進(jìn)程ID數(shù)組, 信息.進(jìn)程ID)
    .如果真結(jié)束
    進(jìn)程句柄 = Process32Next (進(jìn)程快照, 信息)
  .判斷循環(huán)尾 ()
.判斷結(jié)束
CloseHandle (進(jìn)程快照)
返回 (取數(shù)組成員數(shù) (進(jìn)程ID數(shù)組))
.子程序 系統(tǒng)_取已登陸QQ號(hào)碼, 文本型, 公開, 成功返回QQ號(hào)碼,如果是多個(gè)QQ號(hào)碼以#換行符分開,其他的都返回空
.局部變量 局_窗口標(biāo)題, 文本型
.局部變量 局_變量文本, 文本型
.局部變量 局_分割的文本, 文本型, , "0"
.局部變量 局_進(jìn)程ID數(shù)目, 整數(shù)型
.局部變量 計(jì)次, 整數(shù)型
.局部變量 i, 整數(shù)型
.局部變量 局_進(jìn)程ID數(shù)組, 整數(shù)型, , "0"
.局部變量 局_窗口數(shù)目, 整數(shù)型
局_進(jìn)程ID數(shù)目 = 進(jìn)程_取ID數(shù)組 (“QQ.exe”, 局_進(jìn)程ID數(shù)組)
計(jì)次 = 1
局_窗口數(shù)目 = 窗口_枚舉窗口句柄 (局_進(jìn)程ID數(shù)組)
.計(jì)次循環(huán)首 (局_窗口數(shù)目, i)
  局_窗口標(biāo)題 = 窗口_取標(biāo)題 (局_進(jìn)程ID數(shù)組 [i])
  .如果真 (尋找文本 (局_窗口標(biāo)題, “qqexchangewnd_shortcut_prefix”, , 假) ≠ -1)
    局_分割的文本 = 分割文本 (局_窗口標(biāo)題, “_”, )
    .判斷開始 (計(jì)次 = 局_進(jìn)程ID數(shù)目)
      局_變量文本 = 局_變量文本 + 局_分割的文本 [取數(shù)組成員數(shù) (局_分割的文本)]
      計(jì)次 = 計(jì)次 + 1
    .默認(rèn)
      局_變量文本 = 局_變量文本 + 局_分割的文本 [取數(shù)組成員數(shù) (局_分割的文本)] + #換行符
      計(jì)次 = 計(jì)次 + 1
    .判斷結(jié)束
  .如果真結(jié)束
  .如果真 (計(jì)次 > 局_進(jìn)程ID數(shù)目)
    跳出循環(huán) ()
  .如果真結(jié)束
.計(jì)次循環(huán)尾 ()
返回 (局_變量文本)

運(yùn)行結(jié)果:

總結(jié)

以上就是這篇文章的全部內(nèi)容了,希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,謝謝大家對(duì)腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請(qǐng)查看下面相關(guān)鏈接

相關(guān)文章

  • 易語言到半角詳解

    易語言到半角詳解

    在本篇文章中我們給大家分享的是關(guān)于易語言到半角相關(guān)知識(shí)點(diǎn)內(nèi)容,有興趣的朋友們跟著學(xué)習(xí)下。
    2019-01-01
  • 易語言獲取開機(jī)時(shí)間dll代碼

    易語言獲取開機(jī)時(shí)間dll代碼

    在本篇內(nèi)容里小編給大家分享的是關(guān)于易語言獲取開機(jī)時(shí)間dll代碼的實(shí)例內(nèi)容,需要的朋友們參考下。
    2018-12-12
  • 易語言注冊(cè)熱鍵的步驟教學(xué)

    易語言注冊(cè)熱鍵的步驟教學(xué)

    在本文中小編給大家分享的是關(guān)于易語言如何注冊(cè)熱鍵的圖文教學(xué)內(nèi)容,需要的朋友們可以學(xué)習(xí)下。
    2018-12-12
  • 解決易語言多線程出錯(cuò)的問題

    解決易語言多線程出錯(cuò)的問題

    在本篇關(guān)于易語言的技巧文章里,給大家分享了解決易語言多線程出錯(cuò)的問題相關(guān)內(nèi)容,有需要的朋友們參考下。
    2018-11-11
  • 易語言做軟件的實(shí)例教學(xué)

    易語言做軟件的實(shí)例教學(xué)

    在本篇文章里小編給大家分享了關(guān)于易語言做軟件的實(shí)例教學(xué)以及相關(guān)內(nèi)容,需要的朋友們可以學(xué)習(xí)下。
    2019-02-02
  • 易語言設(shè)置在月歷框架內(nèi)是否顯示今天的日期

    易語言設(shè)置在月歷框架內(nèi)是否顯示今天的日期

    今天小編就為大家分享一篇關(guān)于易語言設(shè)置在月歷框架內(nèi)是否顯示今天的日期,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧
    2018-11-11
  • 易語言統(tǒng)計(jì)重復(fù)數(shù)教學(xué)

    易語言統(tǒng)計(jì)重復(fù)數(shù)教學(xué)

    在本篇文章里小編給大家?guī)淼囊黄P(guān)于易語言統(tǒng)計(jì)重復(fù)數(shù)教學(xué)內(nèi)容,有興趣的朋友們可以學(xué)習(xí)下。
    2019-01-01
  • 易語言制作DNF解封源碼

    易語言制作DNF解封源碼

    今天小編就為大家分享一篇關(guān)于易語言制作DNF解封源碼,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧
    2019-02-02
  • 易語言更改編輯框的邊框樣式

    易語言更改編輯框的邊框樣式

    今天小編就為大家分享一篇關(guān)于易語言更改編輯框的邊框樣式,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧
    2018-11-11
  • 易語言基礎(chǔ)教程之定義及變量

    易語言基礎(chǔ)教程之定義及變量

    這篇文章主要介紹了易語言基礎(chǔ)教程之定義及引用變量的相關(guān)方法和代碼,十分的簡單,需要的朋友可以參考下
    2016-05-05

最新評(píng)論