最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

易語(yǔ)言編輯框加背景圖片代碼實(shí)例

 更新時(shí)間:2018年11月20日 15:00:14   作者:易語(yǔ)言源碼教程  
今天小編就為大家分享一篇關(guān)于易語(yǔ)言編輯框加背景圖片代碼實(shí)例,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧

DLL代碼

.版本 2
.DLL命令 CreatePatternBrush, 整數(shù)型, "gdi32", "CreatePatternBrush"
  .參數(shù) hBitmap, 整數(shù)型
.DLL命令 GetWindowLong, 整數(shù)型, "user32", "GetWindowLongA"
  .參數(shù) hwnd, 整數(shù)型
  .參數(shù) nIndex, 整數(shù)型
.DLL命令 SetWindowLong, 整數(shù)型, "user32", "SetWindowLongA"
  .參數(shù) hwnd, 整數(shù)型
  .參數(shù) nIndex, 整數(shù)型
  .參數(shù) dwNewLong, 整數(shù)型
.DLL命令 CallWindowProcA, 整數(shù)型, , "CallWindowProcA"
  .參數(shù) lproc, 整數(shù)型
  .參數(shù) hwnd, 整數(shù)型
  .參數(shù) umsg, 整數(shù)型
  .參數(shù) wparam, 整數(shù)型
  .參數(shù) lparam, 整數(shù)型
.DLL命令 DeleteObject, 整數(shù)型, "gdi32", "DeleteObject"
  .參數(shù) hObject, 整數(shù)型
.DLL命令 SetBkMode, 整數(shù)型, "gdi32", "SetBkMode"
  .參數(shù) hdc, 整數(shù)型
  .參數(shù) nBkMode, 整數(shù)型

常量表

.版本 2
.常量 GWL_WNDPROC, "-4"
.常量 WM_CTLCOLOREDIT, "307"
.常量 TRANSPARENT, "1"

編輯框加背景代碼

.版本 2
.程序集 窗口程序集1
.程序集變量 lpOldProc, 整數(shù)型
.程序集變量 hBlackBrush, 整數(shù)型
.子程序 __啟動(dòng)窗口_創(chuàng)建完畢
.局部變量 圖片, 對(duì)象
圖片框1.可視 = 假
圖片.創(chuàng)建圖片對(duì)象 (圖片框1.圖片)
hBlackBrush = CreatePatternBrush (圖片.讀數(shù)值屬性 (“handle”, ))
lpOldProc = GetWindowLong (取窗口句柄 (), #GWL_WNDPROC)
SetWindowLong (取窗口句柄 (), #GWL_WNDPROC, 到數(shù)值 (&WndProc))
.子程序 WndProc, 整數(shù)型
.參數(shù) hwnd, 整數(shù)型
.參數(shù) umsg, 整數(shù)型
.參數(shù) wparam, 整數(shù)型
.參數(shù) lparam, 整數(shù)型
.如果真 (umsg = #WM_CTLCOLOREDIT)
  SetBkMode (wparam, #TRANSPARENT)
  返回 (hBlackBrush)
.如果真結(jié)束
返回 (CallWindowProcA (lpOldProc, hwnd, umsg, wparam, lparam))
.子程序 __啟動(dòng)窗口_可否被關(guān)閉, 邏輯型
.如果真 (hBlackBrush > 0)
  DeleteObject (hBlackBrush)
.如果真結(jié)束
.子程序 _編輯框1_內(nèi)容被改變
編輯框1.重畫 ()
.子程序 _編輯框1_滾輪被滾動(dòng), 邏輯型
.參數(shù) 滾動(dòng)距離, 整數(shù)型
.參數(shù) 功能鍵狀態(tài), 整數(shù)型
編輯框1.重畫 ()

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

總結(jié)

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

相關(guān)文章

最新評(píng)論

德江县| 南丹县| 潜山县| 绍兴县| 牟定县| 南投县| 柳河县| 滕州市| 凯里市| 德格县| 长宁县| 乳山市| 天长市| 东兰县| 阳江市| 朝阳区| 且末县| 天门市| 蓬安县| 武陟县| 兴安盟| 仲巴县| 柳江县| 阿拉善左旗| 富裕县| 亳州市| 阿合奇县| 正宁县| 犍为县| 利川市| 莆田市| 乌什县| 明光市| 民乐县| 调兵山市| 丰台区| 闸北区| 乐昌市| 南开区| 辰溪县| 鄂托克旗|