易語言制作一款唯美的cookie分析工具的代碼
更新時(shí)間:2018年11月24日 09:57:06 作者:易語言源碼貝貝吧
今天小編就為大家分享一篇關(guān)于易語言制作一款唯美的cookie分析工具的代碼,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧
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ù)型 .程序集變量 類_左邊, 整數(shù)型 .程序集變量 類_頂邊, 整數(shù)型 .子程序 _初始化, , , 當(dāng)基于本類的對(duì)象被創(chuàng)建后,此方法會(huì)被自動(dòng)調(diào)用 .子程序 _銷毀, , , 當(dāng)基于本類的對(duì)象被銷毀前,此方法會(huì)被自動(dòng)調(diào)用 .子程序 _OnObjProc, 整數(shù)型, 公開, 虛函數(shù),組件消息.返回值:0放行,1攔截。在 _ObjProc 之前被調(diào)用. .參數(shù) hWnd, 整數(shù)型 .參數(shù) hObj, 整數(shù)型 .參數(shù) uMsg, 整數(shù)型 .參數(shù) wParam, 整數(shù)型 .參數(shù) lParam, 整數(shù)型 .判斷開始 (uMsg = #事件_創(chuàng)建) img = 圖像_復(fù)制部分 (取EX指針 (窗口_取指針 (類_取成員值 (取指針 (), 2))), 左邊 () + 10 + 類_左邊, 頂邊 () + 9 + 類_頂邊, 寬度 (), 高度 ()) .判斷 (uMsg = #事件_銷毀) 圖像_銷毀 (img) .默認(rèn) .判斷結(jié)束 返回 (0) .子程序 _計(jì)算客戶區(qū)_編輯框, , 公開 .參數(shù) 客戶區(qū)矩形, RectF, 參考 可空, 修改本參數(shù)將影響文本所在矩形 OFFSETRCF (5, 0, -10, -6, 客戶區(qū)矩形) .子程序 _繪制背景_編輯框, , 公開 .參數(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類的成員4都是窗口指針,相同則說明參數(shù)是窗口指針 .如果 (窗口只打印背景) hBitmap = 組件_取成員值 (句柄, 32) ' 背景位圖緩存 .否則 hBitmap = 組件_取成員值 (句柄, 28) ' 窗口位圖 .如果結(jié)束 GetWindowRect (組件_取成員值 (句柄, 2), Rc) .否則 hBitmap = 組件_取成員值 (句柄, 44) CopyMemory (指針到整數(shù) (取指針_通用型 (Rc)), 類_取成員指針 (句柄, 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), 位或 (#圖像鎖定模式_讀, #圖像鎖定模式_寫), #像素格式_32bppPARGB, BitData) GetBitmapBits (hBitmap, length, BitData.Scan0) ' 獲取拷貝位圖數(shù)據(jù) 圖像_解鎖數(shù)據(jù) (Bitmap, BitData) 返回 (Bitmap) .子程序 設(shè)置位置, , 公開 .參數(shù) 左邊, 整數(shù)型 .參數(shù) 頂邊, 整數(shù)型 類_左邊 = 左邊 類_頂邊 = 頂邊
對(duì)比代碼
.版本 2 .支持庫 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.置客戶區(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.事件_被單擊 (&開始對(duì)比) MainWindow.置進(jìn)入特效 (#特效類型_窗口_漸隱漸顯, , , , #緩動(dòng)類型_彈性緩動(dòng)) MainWindow.置退出特效 (#特效類型_窗口_彈性伸縮, , , , #緩動(dòng)類型_彈性緩動(dòng)) 窗口_消息循環(huán) (Mainhwnd) _FreeLibrary (Ex_hDll) 返回 (0) .子程序 開始對(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)容 (), “; ”, ) .判斷開始 (取數(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].重畫 () MSEditBox [4].重畫 ()
運(yùn)行結(jié)果:
總結(jié)
以上就是這篇文章的全部?jī)?nèi)容了,希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,謝謝大家對(duì)腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請(qǐng)查看下面相關(guān)鏈接
您可能感興趣的文章:
- 易語言仿按鍵精靈錄制鍵盤鼠標(biāo)操作的代碼
- 易語言實(shí)現(xiàn)YY批量自動(dòng)加好友的代碼
- 易語言拖拽文件獲取文件路徑詳細(xì)圖文教程
- 易語言運(yùn)算符分類詳細(xì)總結(jié)大全
- 易語言通過路徑來判斷是不是在壓縮包內(nèi)運(yùn)行的代碼
- 易語言解析獲得無水印下載地址的代碼
- 易語言NTAPI進(jìn)程操縱的代碼
- 易語言通過注冊(cè)表將易文件關(guān)聯(lián)修復(fù)的源碼
- 易語言注冊(cè)機(jī)生成永久或限時(shí)注冊(cè)碼的寫法
- 易語言通過百度錯(cuò)誤頁面獲取北京時(shí)間的代碼
- 易語言多線程多任務(wù)下載器的代碼
- 易語言調(diào)用墨跡天氣實(shí)現(xiàn)自動(dòng)定位獲取天氣情況的代碼
- 易語言通過枚舉密碼進(jìn)行破解rar壓縮包文件的代碼
- 易語言調(diào)用百度圖片識(shí)別實(shí)現(xiàn)的圖片轉(zhuǎn)表格的代碼
- 易語言實(shí)現(xiàn)截圖或右鍵二維碼識(shí)別的代碼
相關(guān)文章
易語言獲取漢字發(fā)音數(shù)目和拼音并取聲母和韻母
今天小編就為大家分享一篇關(guān)于易語言獲取漢字發(fā)音數(shù)目和拼音并取聲母和韻母,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧2018-11-11易語言設(shè)置組合框各選項(xiàng)之間距離的方法
今天小編就為大家分享一篇關(guān)于易語言設(shè)置組合框各選項(xiàng)之間距離的方法,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧2018-11-11易語言編程基礎(chǔ)數(shù)據(jù)類型變量及子程序
這篇文章主要為介紹了易語言編程的基礎(chǔ),文中詳細(xì)講解了易語言的數(shù)據(jù)類型易語言中的變量以及易語言的子程序,有需要的朋友可以借鑒參考下2021-11-11易語言設(shè)置組合框項(xiàng)目數(shù)值的方法
今天小編就為大家分享一篇關(guān)于易語言設(shè)置組合框項(xiàng)目數(shù)值的方法,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧2018-11-11