易語(yǔ)言制作一款唯美的cookie分析工具的代碼
cookie分析源碼
需要加載模塊 Ex_DirectUI 3.0
DLL命令表
.版本 2 .DLL命令 GetBitmapBits, 整數(shù)型, "gdi32", "GetBitmapBits" .參數(shù) hBitmap, 整數(shù)型 .參數(shù) dwCount, 整數(shù)型 .參數(shù) lpBits, 整數(shù)型
透明編輯框
.版本 2 .程序集 透明編輯框_EX, 編輯框_Ex .程序集變量 img, 整數(shù)型 .程序集變量 類(lèi)_左邊, 整數(shù)型 .程序集變量 類(lèi)_頂邊, 整數(shù)型 .子程序 _初始化, , , 當(dāng)基于本類(lèi)的對(duì)象被創(chuàng)建后,此方法會(huì)被自動(dòng)調(diào)用 .子程序 _銷(xiāo)毀, , , 當(dāng)基于本類(lèi)的對(duì)象被銷(xiāo)毀前,此方法會(huì)被自動(dòng)調(diào)用 .子程序 _OnObjProc, 整數(shù)型, 公開(kāi), 虛函數(shù),組件消息.返回值:0放行,1攔截。在 _ObjProc 之前被調(diào)用. .參數(shù) hWnd, 整數(shù)型 .參數(shù) hObj, 整數(shù)型 .參數(shù) uMsg, 整數(shù)型 .參數(shù) wParam, 整數(shù)型 .參數(shù) lParam, 整數(shù)型 .判斷開(kāi)始 (uMsg = #事件_創(chuàng)建) img = 圖像_復(fù)制部分 (取EX指針 (窗口_取指針 (類(lèi)_取成員值 (取指針 (), 2))), 左邊 () + 10 + 類(lèi)_左邊, 頂邊 () + 9 + 類(lèi)_頂邊, 寬度 (), 高度 ()) .判斷 (uMsg = #事件_銷(xiāo)毀) 圖像_銷(xiāo)毀 (img) .默認(rèn) .判斷結(jié)束 返回 (0) .子程序 _計(jì)算客戶(hù)區(qū)_編輯框, , 公開(kāi) .參數(shù) 客戶(hù)區(qū)矩形, RectF, 參考 可空, 修改本參數(shù)將影響文本所在矩形 OFFSETRCF (5, 0, -10, -6, 客戶(hù)區(qū)矩形) .子程序 _繪制背景_編輯框, , 公開(kāi) .參數(shù) exp, Exs_PaintStruct .局部變量 m_文本格式, 整數(shù)型 .局部變量 m_字體指針, 整數(shù)型 .局部變量 Yw, 整數(shù)型 圖形_平滑模式 (exp.mGraphics, #平滑模式_最佳質(zhì)量) 圖形_繪圖 (exp.mGraphics, img) .子程序 取EX指針, 整數(shù)型, , 句柄:窗口指針或組件句柄,返回PNG .參數(shù) 句柄, 整數(shù)型 .參數(shù) 窗口只打印背景, 邏輯型, 可空 .局部變量 hBitmap, 整數(shù)型 .局部變量 Rc, RECT .局部變量 length, 整數(shù)型 .局部變量 Bitmap, 整數(shù)型 .局部變量 BitData, BITMAPDATA .局部變量 Image, 字節(jié)集 .如果 (組件_取成員值 (句柄, 4) = 句柄) ' exdui和obj類(lèi)的成員4都是窗口指針,相同則說(shuō)明參數(shù)是窗口指針 .如果 (窗口只打印背景) hBitmap = 組件_取成員值 (句柄, 32) ' 背景位圖緩存 .否則 hBitmap = 組件_取成員值 (句柄, 28) ' 窗口位圖 .如果結(jié)束 GetWindowRect (組件_取成員值 (句柄, 2), Rc) .否則 hBitmap = 組件_取成員值 (句柄, 44) CopyMemory (指針到整數(shù) (取指針_通用型 (Rc)), 類(lèi)_取成員指針 (句柄, 53), 4 × 4) ' 53-56 .如果結(jié)束 length = GetBitmapBits (hBitmap, 0, 0) ' 獲取長(zhǎng)度 Bitmap = 圖像_創(chuàng)建自像素格式 (Rc.right - Rc.left, Rc.bottom - Rc.top) 圖像_鎖定數(shù)據(jù) (Bitmap, MakeRC (0, 0, Rc.right - Rc.left, Rc.bottom - Rc.top), 位或 (#圖像鎖定模式_讀, #圖像鎖定模式_寫(xiě)), #像素格式_32bppPARGB, BitData) GetBitmapBits (hBitmap, length, BitData.Scan0) ' 獲取拷貝位圖數(shù)據(jù) 圖像_解鎖數(shù)據(jù) (Bitmap, BitData) 返回 (Bitmap) .子程序 設(shè)置位置, , 公開(kāi) .參數(shù) 左邊, 整數(shù)型 .參數(shù) 頂邊, 整數(shù)型 類(lèi)_左邊 = 左邊 類(lèi)_頂邊 = 頂邊
對(duì)比代碼
.版本 2 .支持庫(kù) exui .程序集 程序集1 .程序集變量 Ex_hDll, 整數(shù)型 .程序集變量 MainWindow, Ex_DirectUI .程序集變量 Mainhwnd, 整數(shù)型 .程序集變量 MSLabel, 標(biāo)簽_Ex .程序集變量 MSGroupBox, 分組框_Ex, , "4" .程序集變量 MSEditBox, 透明編輯框_EX, , "4" .程序集變量 GroupBoxHandle, 整數(shù)型, , "4" .程序集變量 MSPictureFrame, 圖片框_Ex, , "4" .程序集變量 MSGraphicButton, 圖形按鈕_Ex .子程序 _啟動(dòng)子程序, 整數(shù)型, , 本子程序在程序啟動(dòng)后最先執(zhí)行 Ex_hDll = _LoadLibrary (取指針_字節(jié)集型 (#Dll_ExduiDll), 0, 0) Mainhwnd = 窗口_創(chuàng)建 (, “cookie分析”, , , 980, 620, ) 全局_初始化 (Ex_hDll, 真, #主題包_Exdui主題包, , { }, “微軟雅黑”, 13, , #文本渲染模式_ClearType文本和hinting技術(shù), , , ) MainWindow.掛接窗口 (, Mainhwnd, #主題包_Thunder主題包, , #主程序皮膚, #白色, #標(biāo)題欄_標(biāo)題 + #標(biāo)題欄_關(guān)閉按鈕 + #標(biāo)題欄_最小化按鈕, 255, #底圖方式_九宮排列, , 真, , , ) MainWindow.置客戶(hù)區(qū)偏移 (10, 10 - 1, -10, -11) GroupBoxHandle [1] = MSGroupBox [1].創(chuàng)建 (Mainhwnd, 32, 36, 386, 296, “Cookie1”, , , , RGB2ARGB (#白色, 200), , , , , , , ) MSEditBox [1].設(shè)置位置 (32, 36) MSEditBox [1].創(chuàng)建 (GroupBoxHandle [1], 14, 24, 358, 258, , RGB2ARGB (#白色, 200), , , , , 真) MSPictureFrame [1].創(chuàng)建 (GroupBoxHandle [1], 14, 24, 358, 258, #編輯框1) MSPictureFrame [1].透明穿透 (真) GroupBoxHandle [2] = MSGroupBox [2].創(chuàng)建 (Mainhwnd, 532, 36, 386, 296, “Cookie2”, , , , RGB2ARGB (#白色, 200), , , , , , , ) MSPictureFrame [2].創(chuàng)建 (GroupBoxHandle [2], 14, 24, 358, 258, #編輯框1) MSPictureFrame [2].透明穿透 (真) MSEditBox [2].設(shè)置位置 (532, 36) MSEditBox [2].創(chuàng)建 (GroupBoxHandle [2], 14, 24, 358, 258, , RGB2ARGB (#白色, 200), , , , , 真) GroupBoxHandle [3] = MSGroupBox [3].創(chuàng)建 (Mainhwnd, 32, 386, 386, 188, “相同參數(shù)”, , , , RGB2ARGB (#白色, 200), , , , , , , ) MSPictureFrame [3].創(chuàng)建 (GroupBoxHandle [3], 14, 24, 358, 160, #編輯框1) MSPictureFrame [3].透明穿透 (真) MSEditBox [3].設(shè)置位置 (32, 386) MSEditBox [3].創(chuàng)建 (GroupBoxHandle [3], 14, 24, 358, 160, , RGB2ARGB (#白色, 200), , , , , 真) GroupBoxHandle [4] = MSGroupBox [4].創(chuàng)建 (Mainhwnd, 532, 386, 386, 188, “不同參數(shù)”, , , , RGB2ARGB (#白色, 200), , , , , , , ) MSPictureFrame [4].創(chuàng)建 (GroupBoxHandle [4], 14, 24, 358, 160, #編輯框1) MSPictureFrame [4].透明穿透 (真) MSEditBox [4].設(shè)置位置 (532, 386) MSEditBox [4].創(chuàng)建 (GroupBoxHandle [4], 14, 24, 358, 160, , RGB2ARGB (#白色, 200), , , , , 真) MSGraphicButton.創(chuàng)建 (Mainhwnd, 438, 332, 84, 84) MSGraphicButton.置狀態(tài)圖片 (#按鈕1, #按鈕2, #按鈕3, , ) MSGraphicButton.透明穿透 (真) MSGraphicButton.事件_被單擊 (&開(kāi)始對(duì)比) MainWindow.置進(jìn)入特效 (#特效類(lèi)型_窗口_漸隱漸顯, , , , #緩動(dòng)類(lèi)型_彈性緩動(dòng)) MainWindow.置退出特效 (#特效類(lèi)型_窗口_彈性伸縮, , , , #緩動(dòng)類(lèi)型_彈性緩動(dòng)) 窗口_消息循環(huán) (Mainhwnd) _FreeLibrary (Ex_hDll) 返回 (0) .子程序 開(kāi)始對(duì)比 .參數(shù) 句柄, 整數(shù)型 .參數(shù) X, 整數(shù)型 .參數(shù) Y, 整數(shù)型 .參數(shù) 狀態(tài), 整數(shù)型 .局部變量 cookie1數(shù)組, 文本型, , "0" .局部變量 cookie2數(shù)組, 文本型, , "0" .局部變量 i, 整數(shù)型 .局部變量 n, 整數(shù)型 .局部變量 相同參數(shù), 邏輯型 .局部變量 相同文本, 文本型 .局部變量 不同文本, 文本型 cookie1數(shù)組 = 分割文本 (MSEditBox [1].內(nèi)容 (), “; ”, ) cookie2數(shù)組 = 分割文本 (MSEditBox [2].內(nèi)容 (), “; ”, ) .判斷開(kāi)始 (取數(shù)組成員數(shù) (cookie1數(shù)組) ≥ 取數(shù)組成員數(shù) (cookie2數(shù)組)) .計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (cookie1數(shù)組), i) 相同參數(shù) = 假 .計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (cookie2數(shù)組), n) .如果真 (cookie1數(shù)組 [i] = cookie2數(shù)組 [n]) 相同參數(shù) = 真 跳出循環(huán) () .如果真結(jié)束 .計(jì)次循環(huán)尾 () .如果 (相同參數(shù)) .如果 (相同文本 = “”) 相同文本 = cookie1數(shù)組 [i] .否則 相同文本 = 相同文本 + #換行符 + cookie1數(shù)組 [i] .如果結(jié)束 .否則 .如果 (不同文本 = “”) 不同文本 = cookie1數(shù)組 [i] .否則 不同文本 = 不同文本 + #換行符 + cookie1數(shù)組 [i] .如果結(jié)束 .如果結(jié)束 .計(jì)次循環(huán)尾 () .判斷 (取數(shù)組成員數(shù) (cookie1數(shù)組) ≤ 取數(shù)組成員數(shù) (cookie2數(shù)組)) .計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (cookie2數(shù)組), i) 相同參數(shù) = 假 .計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (cookie1數(shù)組), n) .如果真 (cookie2數(shù)組 [i] = cookie1數(shù)組 [n]) 相同參數(shù) = 真 跳出循環(huán) () .如果真結(jié)束 .計(jì)次循環(huán)尾 () .如果 (相同參數(shù)) .如果 (相同文本 = “”) 相同文本 = cookie2數(shù)組 [i] .否則 相同文本 = 相同文本 + #換行符 + cookie2數(shù)組 [i] .如果結(jié)束 .否則 .如果 (不同文本 = “”) 不同文本 = cookie2數(shù)組 [i] .否則 不同文本 = 不同文本 + #換行符 + cookie2數(shù)組 [i] .如果結(jié)束 .如果結(jié)束 .計(jì)次循環(huán)尾 () .默認(rèn) .判斷結(jié)束 MSEditBox [3].內(nèi)容 (相同文本) MSEditBox [4].內(nèi)容 (不同文本) MSEditBox [3].重畫(huà) () MSEditBox [4].重畫(huà) ()
運(yùn)行結(jié)果:
總結(jié)
以上就是這篇文章的全部?jī)?nèi)容了,希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,謝謝大家對(duì)腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請(qǐng)查看下面相關(guān)鏈接
- 易語(yǔ)言仿按鍵精靈錄制鍵盤(pán)鼠標(biāo)操作的代碼
- 易語(yǔ)言實(shí)現(xiàn)YY批量自動(dòng)加好友的代碼
- 易語(yǔ)言拖拽文件獲取文件路徑詳細(xì)圖文教程
- 易語(yǔ)言運(yùn)算符分類(lèi)詳細(xì)總結(jié)大全
- 易語(yǔ)言通過(guò)路徑來(lái)判斷是不是在壓縮包內(nèi)運(yùn)行的代碼
- 易語(yǔ)言解析獲得無(wú)水印下載地址的代碼
- 易語(yǔ)言NTAPI進(jìn)程操縱的代碼
- 易語(yǔ)言通過(guò)注冊(cè)表將易文件關(guān)聯(lián)修復(fù)的源碼
- 易語(yǔ)言注冊(cè)機(jī)生成永久或限時(shí)注冊(cè)碼的寫(xiě)法
- 易語(yǔ)言通過(guò)百度錯(cuò)誤頁(yè)面獲取北京時(shí)間的代碼
- 易語(yǔ)言多線(xiàn)程多任務(wù)下載器的代碼
- 易語(yǔ)言調(diào)用墨跡天氣實(shí)現(xiàn)自動(dòng)定位獲取天氣情況的代碼
- 易語(yǔ)言通過(guò)枚舉密碼進(jìn)行破解rar壓縮包文件的代碼
- 易語(yǔ)言調(diào)用百度圖片識(shí)別實(shí)現(xiàn)的圖片轉(zhuǎn)表格的代碼
- 易語(yǔ)言實(shí)現(xiàn)截圖或右鍵二維碼識(shí)別的代碼
相關(guān)文章
易語(yǔ)言獲取漢字發(fā)音數(shù)目和拼音并取聲母和韻母
今天小編就為大家分享一篇關(guān)于易語(yǔ)言獲取漢字發(fā)音數(shù)目和拼音并取聲母和韻母,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11易語(yǔ)言設(shè)置組合框各選項(xiàng)之間距離的方法
今天小編就為大家分享一篇關(guān)于易語(yǔ)言設(shè)置組合框各選項(xiàng)之間距離的方法,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11易語(yǔ)言設(shè)置外形框邊框線(xiàn)類(lèi)型的方法
今天小編就為大家分享一篇關(guān)于易語(yǔ)言設(shè)置外形框邊框線(xiàn)類(lèi)型的方法,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11易語(yǔ)言編程基礎(chǔ)數(shù)據(jù)類(lèi)型變量及子程序
這篇文章主要為介紹了易語(yǔ)言編程的基礎(chǔ),文中詳細(xì)講解了易語(yǔ)言的數(shù)據(jù)類(lèi)型易語(yǔ)言中的變量以及易語(yǔ)言的子程序,有需要的朋友可以借鑒參考下2021-11-11易語(yǔ)言設(shè)置組合框項(xiàng)目數(shù)值的方法
今天小編就為大家分享一篇關(guān)于易語(yǔ)言設(shè)置組合框項(xiàng)目數(shù)值的方法,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11易語(yǔ)言編寫(xiě)菜單的簡(jiǎn)單教學(xué)
在本文中小編給大家分享的是關(guān)于易語(yǔ)言編寫(xiě)菜單的簡(jiǎn)單知識(shí)點(diǎn)和步驟,需要的讀者們學(xué)習(xí)下。2018-12-12