易語言自繪皮膚學習教程源碼
系統結構:取位高,取位低,是否在矩形,皮膚創建,取窗口尺寸,初始化按鈕,窗口回調事件,畫_背景,畫_控制按鈕,鼠標被按下,鼠標被提起,鼠標被移動,按鈕事件,設置指針,調整大小,尺寸被改變,DeleteObject,GetDC,DeleteDC,StretchBlt,FillRect,CreateSolidBrush,發送命令_,API_SetCursor,GdiTransparentBlt,API_LoadCursor,SetWindowlong,GetWindowRect,
======程序集_啟動
| |
| |------ _啟動子程序
| |
| |------ _臨時子程序
| |
| |
======程序集_公用
| |
| |------ 取位高
| |
| |------ 取位低
| |
| |------ 是否在矩形
| |
| |
======程序集_皮膚
| |
| |------ 皮膚創建
| |
| |------ 取窗口尺寸
| |
| |------ 初始化按鈕
| |
| |------ 窗口回調事件
| |
| |------ 畫_背景
| |
| |------ 畫_控制按鈕
| |
| |------ 鼠標被按下
| |
| |------ 鼠標被提起
| |
| |------ 鼠標被移動
| |
| |------ 按鈕事件
| |
| |------ 設置指針
| |
| |------ 調整大小
| |
| |------ 尺寸被改變
| |
| |
======窗口程序集1
| |
| |------ _窗口_測試_創建完畢
| |
| |
======調用的Dll
| |
| |---[dll]------ DeleteObject
| |
| |---[dll]------ GetDC
| |
| |---[dll]------ DeleteDC
| |
| |---[dll]------ StretchBlt
| |
| |---[dll]------ FillRect
| |
| |---[dll]------ CreateSolidBrush
| |
| |---[dll]------ 發送命令_
| |
| |---[dll]------ API_SetCursor
| |
| |---[dll]------ GdiTransparentBlt
| |
| |---[dll]------ API_LoadCursor
| |
| |---[dll]------ SetWindowlong
| |
| |---[dll]------ GetWindowRect
======程序集_啟動
| |
| |------ _啟動子程序
| |
| |
======窗口程序集_主窗口
| |
| |------ _窗口_主窗口_創建完畢
調用的DLL命令:
.DLL命令 DeleteObject, 整數型, , , , 失敗為0
.參數 hObject, 整數型
.DLL命令 GetDC, 整數型, , , , 獲取指定窗口的設備場景。返回指定窗口的設備場景句柄,出錯則為0
.參數 hwnd, 整數型
.DLL命令 DeleteDC, 整數型, , , , 刪除專用設備場景或信息場景,釋放所有相關窗口資源。不要將它用于GetDC函數取回的設備場景
.參數 hdc, 整數型
.DLL命令 StretchBlt, 整數型, , "StretchBlt"
.參數 目標hdc, 整數型
.參數 目標左邊, 整數型
.參數 目標頂部, 整數型
.參數 目標寬度, 整數型
.參數 目標高度, 整數型
.參數 源hdc, 整數型
.參數 源左邊, 整數型
.參數 源頂部, 整數型
.參數 源寬度, 整數型
.參數 源高度, 整數型
.參數 光柵運算, 整數型
.DLL命令 FillRect, 整數型, "user32", "FillRect", , 用指定的刷子填充一個矩形 非零表示成功,零表示失敗。會設置GetLastError
.參數 hdc, 整數型, , 設備場景的句柄
.參數 lpRect, GP_矩形L, , RECT,對填充區域進行描述的一個矩形,采用邏輯坐標
.參數 hBrush, 整數型, , 欲使用的刷子的句柄;
.DLL命令 CreateSolidBrush, 整數型, "gdi32", "CreateSolidBrush", , 用純色創建一個刷子 如執行成功,返回新刷子的一個句柄;否則返回零
.參數 crColor, 整數型, , 數字的RGB彩色;
.DLL命令 發送命令_, 整數型, "user32", "SendMessageA", , 調用一個窗口的窗口函數,將一條消息發給那個窗口。除非消息處理完畢,否則該函數不會返回。SendMessageBynum, ; SendMessageByString是該函數的“類型security”聲明形式 由具體的消息決定
.參數 窗口句柄, 整數型, , 要接收消息的那個窗口的句柄
.參數 信息值, 整數型, , 消息的標識符
.參數 參數一, 整數型, , 具體取決于消息
.參數 參數二, 整數型, , 具體取決于消息;
.DLL命令 API_SetCursor, 整數型, "user32", "SetCursor", , 將指定的鼠標指針設為當前指針 前一個指針的值
.參數 指針句柄, 整數型, , 要設為當前指針的一個指針的句柄。如設為零,表示不顯示任何指針;
.DLL命令 GdiTransparentBlt, 整數型, "gdi32"
.參數 hdc1, 整數型
.參數 X1, 整數型
.參數 Y1, 整數型
.參數 W1, 整數型
.參數 H1, 整數型
.參數 Hdc2, 整數型
.參數 X2, 整數型
.參數 Y2, 整數型
.參數 W2, 整數型
.參數 H2, 整數型
.參數 Color, 整數型
.DLL命令 API_LoadCursor, 整數型, "user32", "LoadCursorA", , 從指定的模塊或應用程序實例中載入一個鼠標指針。LoadCursorBynum是LoadCursor函數的類型security聲明 執行成功則返回已載入的指針的句柄;零表示失敗。在Windows ; 95 和Win16環境中,這個函數只能載入標準尺寸的圖標
.參數 實例句柄, 整數型, , 一個DLL的模塊句柄;或者一個實例句柄,指定包含了鼠標指針的可執行程序
.參數 鼠標指針標識, 整數型, , 作為一個字串,指定欲載入的指針資源。作為一個長整數值,指定欲載入的資源ID;或者設置一個常數,代表某幅固有系統指針。如裝載的是一個固有系統指針,注意hInstance參數應設為零。在api32.txt文件中以前綴IDC_ 作為標志;
.DLL命令 SetWindowlong, , , "SetWindowLongA", , 設置窗口樣式
.參數 hwnd, 整數型
.參數 nIndex, 整數型
.參數 dwNewLong, 整數型
.DLL命令 GetWindowRect, , , "GetWindowRect", , 取窗口尺寸
.參數 hwnd, 整數型
.參數 rect, GP_矩形L
易語言卷簾工具箱源碼,初始化卷簾,取星期,更換風格,搜索文件,線程搜索,修改底色,獲取信息,取信息記錄,取網絡信息...
易語言僅用核心支持庫實現對外部數據庫的操作ADODB操作外部數據庫例程源碼,根據村組查詢數據,數據庫_讀取數據到高級表格,數據庫_保存高級表格數據到數據庫,數據庫_讀取數據到列表...
易語言僅用核心支持庫實現對外部數據庫的操作ADODB操作外部數據庫例程源碼,根據村組查詢數據,數據庫_讀取數據到高級表格,數據庫_保存高級表格數據到數據庫,數據庫_讀取數據到列表...
易語言僅用核心支持庫實現對外部數據庫的操作ADODB操作外部數據庫例程源碼,根據村組查詢數據,數據庫_讀取數據到高級表格,數據庫_保存高級表格數據到數據庫,數據庫_讀取數據到列表...
易語言兩個文件內存中通訊源碼,子程序1,打開文件,生成空文件,生成重復字節文件,移到文件首,移到文件尾,移動讀寫位置,取讀寫位置,關閉文件,取文件長度,寫出字節集,是否在文件尾,取錯...
易語言易模塊管理器Include目錄源碼,CopyTo_CreateProcessDebugInfo,CopyTo_CreateThreadDebugInfo,CopyTo_ExitThreadDebugInfo,CopyTo_ExitProcessDebugInfo,CopyTo_LoadDllDebugInfo,CopyTo_UnloadDllDebugInfo,CopyTo_ExceptionDebugInfo,Copy...
易語言卷簾工具箱源碼,初始化卷簾,取星期,更換風格,搜索文件,線程搜索,修改底色,獲取信息,取信息記錄,取網絡信息...
子程序1,打開文件,生成空文件,生成重復字節文件,移到文件首,移到文件尾,移動讀寫位置,取讀寫位置,關閉文件,取文件長度,寫出字節集,是否在文件尾,取錯誤信息,讀入字節集,讀入2M字節集,清除文件緩沖區,讀入文本,寫出文本,寫文本行,讀入一行,插入字節集,取文件號...
初始化卷簾,取星期,更換風格,搜索文件,線程搜索,修改底色,獲取信息,取信息記錄,取網絡信息...