快捷導(dǎo)航

易語(yǔ)言超級(jí)列表框雙擊修改內(nèi)容示例

更新時(shí)間：2018年12月29日 08:35:34 作者：易語(yǔ)言源碼教程

今天小編就為大家分享一篇關(guān)于易語(yǔ)言超級(jí)列表框雙擊修改內(nèi)容示例，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧

DLL命令表

.版本 2
.DLL命令 取表項(xiàng)坐標(biāo)信息, 整數(shù)型, "user32", "SendMessageA"
  .參數(shù) hwnd, 整數(shù)型
  .參數(shù) wMsg, 整數(shù)型
  .參數(shù) wParam, 整數(shù)型
  .參數(shù) lParam, 坐標(biāo)
.DLL命令 取表項(xiàng)結(jié)構(gòu)信息, 整數(shù)型, "user32", "SendMessageA"
  .參數(shù) hwnd, 整數(shù)型
  .參數(shù) wMsg, 整數(shù)型
  .參數(shù) wParam, 整數(shù)型
  .參數(shù) lParam, 表項(xiàng)結(jié)構(gòu)信息
.DLL命令 執(zhí)行窗口程序, 整數(shù)型, , "CallWindowProcA"
  .參數(shù) 程序指針, 子程序指針
  .參數(shù) 窗口句柄, 整數(shù)型
  .參數(shù) 消息, 整數(shù)型
  .參數(shù) 參數(shù)1, 整數(shù)型
  .參數(shù) 參數(shù)2, 整數(shù)型
.DLL命令 置窗口特征, 子程序指針, , "SetWindowLongA"
  .參數(shù) 窗口句柄, 整數(shù)型
  .參數(shù) 要置的特征, 整數(shù)型
  .參數(shù) 新特征, 子程序指針, , 僅易語(yǔ)言3.0支持
.DLL命令 創(chuàng)建畫(huà)筆, 整數(shù)型, "gdi32", "CreatePen", , 用指定的樣式、寬度和顏色創(chuàng)建一個(gè)畫(huà)筆 如函數(shù)執(zhí)行成功，就返回指向新畫(huà)筆的一個(gè)句柄；否則返回零
  .參數(shù) 風(fēng)格, 整數(shù)型, , 指定畫(huà)筆樣式，可以是下述常數(shù)之一;PS_SOLID：畫(huà)筆畫(huà)出的是實(shí)線;PS_DASH：畫(huà)筆畫(huà)出的是虛線（nWidth必須是1）;PS_DOT：畫(huà)筆畫(huà)出的是點(diǎn)線（nWidth必須是1）;PS_DASHDOT：畫(huà)筆畫(huà)出的是點(diǎn)劃線（nWidth必須是1）;PS_DASHDOTDOT：畫(huà)筆畫(huà)出的是點(diǎn)-點(diǎn)-劃線（nWidth必須是1）;PS_NULL：畫(huà)筆不能畫(huà)圖;PS_INSIDEFRAME：畫(huà)筆在由橢圓、矩形、圓角矩形、餅圖以及弦等生成的封閉對(duì)象框中畫(huà)圖。如指定的準(zhǔn)確RGB顏色不存在，就進(jìn)行抖動(dòng)處理
  .參數(shù) 寬度, 整數(shù)型, , 以邏輯單位表示的畫(huà)筆的寬度
  .參數(shù) 顏色, 整數(shù)型, , 畫(huà)筆的RGB顏色;
.DLL命令 取對(duì)象句柄, 整數(shù)型, "gdi32", "GetStockObject", , 取得一個(gè)固有對(duì)象（Stock）。這是可由任何應(yīng)用程序使用的windows標(biāo)準(zhǔn)對(duì)象之一 指向指定對(duì)象的一個(gè)句柄。零表示出錯(cuò)
  .參數(shù) 類(lèi)型, 整數(shù)型, , 下述表格中定義的任何常數(shù)之一BLACK_BRUSH黑色刷子DKGRAY_BRUSH黑灰色刷子GRAY_BRUSH灰色刷子HOLLOW_BRUSH凹刷子LTGRAY_BRUSH淺灰色刷子NULL_BRUSH空刷子WHITE_BRUSH白色刷子BLACK_PEN黑色畫(huà)筆NULL_PEN空畫(huà)筆WHITE_PEN白色畫(huà)筆ANSI_FIXED_FONT采用windows（ANSI）字符集的等寬字體ANSI_VAR_FONT采用windows（ANSI）字符集的不等寬字體DEVICE_DEFAULT_FONT設(shè)備使用的默認(rèn)字體（NT）DEFAULT_GUI_FONT用戶(hù)界面的默認(rèn)字體，包括菜單和對(duì)話框字體（Windows 95）OEM_FIXED_FONTOEM字符集的固有字體SYSTEM_FONT屏幕系統(tǒng)字體。這是用于菜單、對(duì)話框等等的默認(rèn)不等寬字體SYSTEM_FIXED_FONT屏幕系統(tǒng)字體。這是用于菜單、對(duì)話框等等的默認(rèn)等寬字體（在windows 3.0之前使用）DEFAULT_PALETTE默認(rèn)調(diào)色板;
.DLL命令 選入設(shè)備場(chǎng)景, 整數(shù)型, "gdi32", "SelectObject", , 每個(gè)設(shè)備場(chǎng)景都可能有選入其中的圖形對(duì)象。其中包括位圖、刷子、字體、畫(huà)筆以及區(qū)域等等。一次選入設(shè)備場(chǎng)景的只能有一個(gè)對(duì)象。選定的對(duì)象會(huì)在設(shè)備場(chǎng)景的繪圖操作中使用。例如，當(dāng)前選定的畫(huà)筆決定了在設(shè)備場(chǎng)景中描繪的線段顏色及樣式 與以前選入設(shè)備場(chǎng)景的相同hObject類(lèi)型的一個(gè)對(duì)象的句柄，零表示出錯(cuò)。如選定的對(duì)象是一個(gè)區(qū)域（Region），結(jié)果就是下列常數(shù)之一：SIMPLEREGION， ;  COMPLEXREGION 或 NULLREGION 對(duì)區(qū)域進(jìn)行描述， GDI_ERROR 表示出錯(cuò)
  .參數(shù) 設(shè)備場(chǎng)景句柄, 整數(shù)型, , 一個(gè)設(shè)備場(chǎng)景的句柄
  .參數(shù) 對(duì)象句柄, 整數(shù)型, , 一個(gè)畫(huà)筆、位圖、刷子、字體或區(qū)域的句柄;
.DLL命令 刪除對(duì)象, 整數(shù)型, "gdi32", "DeleteObject", , 用這個(gè)函數(shù)刪除GDI對(duì)象，比如畫(huà)筆、刷子、字體、位圖、區(qū)域以及調(diào)色板等等。對(duì)象使用的所有系統(tǒng)資源都會(huì)被釋放 非零表示成功，零表示失敗
  .參數(shù) 對(duì)象句柄, 整數(shù)型, , 一個(gè)GDI對(duì)象的句柄;
.DLL命令 釋放設(shè)備場(chǎng)景, 整數(shù)型, "user32", "ReleaseDC", , 釋放由調(diào)用GetDC或GetWindowDC函數(shù)獲取的指定設(shè)備場(chǎng)景。它對(duì)類(lèi)或私有設(shè)備場(chǎng)景無(wú)效（但這樣的調(diào)用不會(huì)造成損害） 執(zhí)行成功為1，否則為0
  .參數(shù) 窗口句柄, 整數(shù)型, , 要釋放的設(shè)備場(chǎng)景相關(guān)的窗口句柄
  .參數(shù) 設(shè)備場(chǎng)景, 整數(shù)型, , 要釋放的設(shè)備場(chǎng)景句柄;
.DLL命令 畫(huà)矩形, 整數(shù)型, "gdi32", "Rectangle", , 用當(dāng)前選定的畫(huà)筆描繪矩形，并用當(dāng)前選定的刷子進(jìn)行填充 非零表示成功，零表示失敗。會(huì)設(shè)置GetLastError
  .參數(shù) 設(shè)備場(chǎng)景句柄, 整數(shù)型, , 設(shè)備場(chǎng)景的句柄
  .參數(shù) 左上角橫坐標(biāo), 整數(shù)型, , 指定矩形左上角位置
  .參數(shù) 左上角縱坐標(biāo), 整數(shù)型, , 同上
  .參數(shù) 右下角橫坐標(biāo), 整數(shù)型, , 指定矩形右下角位置
  .參數(shù) 右下角縱坐標(biāo), 整數(shù)型, , 同上;
.DLL命令 取設(shè)備場(chǎng)景, 整數(shù)型, "user32", "GetDC", , 獲取指定窗口的設(shè)備場(chǎng)景 指定窗口的設(shè)備場(chǎng)景句柄，出錯(cuò)則為0
  .參數(shù) 設(shè)備場(chǎng)景窗口句柄, 整數(shù)型, , 將獲取其設(shè)備場(chǎng)景的窗口的句柄。若為0，則要獲取整個(gè)屏幕的DC;

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

.版本 2
.數(shù)據(jù)類(lèi)型 表項(xiàng)結(jié)構(gòu)信息
  .成員 橫向, 整數(shù)型
  .成員 縱向, 整數(shù)型
  .成員 flags, 整數(shù)型
  .成員 行, 整數(shù)型
  .成員 列, 整數(shù)型
.數(shù)據(jù)類(lèi)型 坐標(biāo)
  .成員 x
  .成員 y
.數(shù)據(jù)類(lèi)型 矩形坐標(biāo)
  .成員 左
  .成員 上
  .成員 右
  .成員 下

超級(jí)列表框雙擊修改

.版本 2
.支持庫(kù) iext
.程序集 窗口程序集1
.程序集變量 表項(xiàng)信息, 表項(xiàng)結(jié)構(gòu)信息
.程序集變量 老矩形, 矩形坐標(biāo)
.程序集變量 老表項(xiàng)
.程序集變量 老列
.程序集變量 行高
.程序集變量 行
.程序集變量 列
.程序集變量 設(shè)備句柄
.程序集變量 hBrush
.程序集變量 默認(rèn)窗口, 子程序指針
.子程序 _編輯框1_失去焦點(diǎn)
超級(jí)列表框1.置標(biāo)題 (行, 列, 編輯框1.內(nèi)容)
編輯框1.可視 ＝ 假
超級(jí)列表框1.允許重畫(huà) ()
.子程序 __啟動(dòng)窗口_創(chuàng)建完畢
.局部變量 表項(xiàng)坐標(biāo), 坐標(biāo)
.局部變量 初始高度
默認(rèn)窗口 ＝ 置窗口特征 (超級(jí)列表框1.取窗口句柄 (), -4, &滾動(dòng)條事件)
取表項(xiàng)坐標(biāo)信息 (超級(jí)列表框1.取窗口句柄 (), 4096 ＋ 16, 0, 表項(xiàng)坐標(biāo))
初始高度 ＝ 表項(xiàng)坐標(biāo).y
取表項(xiàng)坐標(biāo)信息 (超級(jí)列表框1.取窗口句柄 (), 4096 ＋ 16, 1, 表項(xiàng)坐標(biāo))
行高 ＝ 表項(xiàng)坐標(biāo).y － 初始高度
編輯框1.高度 ＝ 行高 ＋ 1
設(shè)備句柄 ＝ 取設(shè)備場(chǎng)景 (超級(jí)列表框1.取窗口句柄 ())
hBrush ＝ 取對(duì)象句柄 (5)
選入設(shè)備場(chǎng)景 (設(shè)備句柄, hBrush)
.子程序 _編輯框1_放開(kāi)某鍵, 邏輯型
.參數(shù) 鍵代碼, 整數(shù)型
.參數(shù) 功能鍵狀態(tài), 整數(shù)型
.如果真 (鍵代碼 ＝ #回車(chē)鍵)
  編輯框1.可視 ＝ 假
  超級(jí)列表框1.置標(biāo)題 (行, 列, 編輯框1.內(nèi)容)
.如果真結(jié)束
.子程序 滾動(dòng)條事件, 整數(shù)型, , 不要修改該子程序的返回值及參數(shù)的類(lèi)型！
.參數(shù) 句柄, 整數(shù)型
.參數(shù) 消息, 整數(shù)型
.參數(shù) 參數(shù)1, 整數(shù)型
.參數(shù) 參數(shù)2, 整數(shù)型
.局部變量 畫(huà)筆句柄
.局部變量 矩形區(qū)域, 矩形坐標(biāo)
.判斷開(kāi)始 (消息 ＝ 276)
  取老矩形 (老表項(xiàng), 老列)
  畫(huà)筆句柄 ＝ 創(chuàng)建畫(huà)筆 (0, 1, 超級(jí)列表框1.背景顏色)
  選入設(shè)備場(chǎng)景 (設(shè)備句柄, 畫(huà)筆句柄)
  畫(huà)矩形 (設(shè)備句柄, 老矩形.左, 老矩形.上, 老矩形.右, 老矩形.下)
  .如果真 (是否已創(chuàng)建 (編輯框1))
    編輯框1.可視 ＝ 假
  .如果真結(jié)束
.判斷 (消息 ＝ 277)
  編輯框1.可視 ＝ 假
.默認(rèn)
.判斷結(jié)束
返回 (執(zhí)行窗口程序 (默認(rèn)窗口, 句柄, 消息, 參數(shù)1, 參數(shù)2))
.子程序 _超級(jí)列表框1_被雙擊, 邏輯型
.參數(shù) 橫向位置, 整數(shù)型
.參數(shù) 縱向位置, 整數(shù)型
.參數(shù) 功能鍵狀態(tài), 整數(shù)型
.局部變量 表項(xiàng)坐標(biāo), 坐標(biāo)
.局部變量 i
.局部變量 畫(huà)筆句柄
畫(huà)筆句柄 ＝ 創(chuàng)建畫(huà)筆 (0, 1, 超級(jí)列表框1.背景顏色)
選入設(shè)備場(chǎng)景 (設(shè)備句柄, 畫(huà)筆句柄)
取老矩形 (老表項(xiàng), 老列)
畫(huà)矩形 (設(shè)備句柄, 老矩形.左, 老矩形.上, 老矩形.右, 老矩形.下)
表項(xiàng)信息.橫向 ＝ 橫向位置
表項(xiàng)信息.縱向 ＝ 縱向位置
取表項(xiàng)結(jié)構(gòu)信息 (超級(jí)列表框1.取窗口句柄 (), 4153, 0, 表項(xiàng)信息)
超級(jí)列表框1.現(xiàn)行選中項(xiàng) ＝ -1
.如果真 (表項(xiàng)信息.行 ≠ -1)
  取表項(xiàng)坐標(biāo)信息 (超級(jí)列表框1.取窗口句柄 (), 4096 ＋ 16, 表項(xiàng)信息.行, 表項(xiàng)坐標(biāo))
  編輯框1.頂邊 ＝ 超級(jí)列表框1.頂邊 ＋ 表項(xiàng)坐標(biāo).y ＋ 1
  編輯框1.左邊 ＝ 表項(xiàng)坐標(biāo).x ＋ 超級(jí)列表框1.左邊
  .如果真 (表項(xiàng)信息.列 ＝ 0)
    編輯框1.左邊 ＝ 表項(xiàng)坐標(biāo).x ＋ 超級(jí)列表框1.左邊
  .如果真結(jié)束
  .計(jì)次循環(huán)首 (表項(xiàng)信息.列, i)
    編輯框1.左邊 ＝ 編輯框1.左邊 ＋ 超級(jí)列表框1.取列寬 (i － 1)
  .計(jì)次循環(huán)尾 ()
  編輯框1.寬度 ＝ 超級(jí)列表框1.取列寬 (表項(xiàng)信息.列)
  編輯框1.內(nèi)容 ＝ 超級(jí)列表框1.取標(biāo)題 (表項(xiàng)信息.行, 表項(xiàng)信息.列)
  編輯框1.可視 ＝ 真
  超級(jí)列表框1.禁止重畫(huà) ()
  編輯框1.獲取焦點(diǎn) ()
  編輯框1.被選擇字符數(shù) ＝ -1
.如果真結(jié)束
.子程序 _超級(jí)列表框1_鼠標(biāo)左鍵被按下, 邏輯型
.參數(shù) 橫向位置, 整數(shù)型
.參數(shù) 縱向位置, 整數(shù)型
.參數(shù) 功能鍵狀態(tài), 整數(shù)型
.局部變量 畫(huà)筆句柄
.局部變量 矩形區(qū)域, 矩形坐標(biāo)
取老矩形 (老表項(xiàng), 老列)
畫(huà)筆句柄 ＝ 創(chuàng)建畫(huà)筆 (0, 1, 超級(jí)列表框1.背景顏色)
選入設(shè)備場(chǎng)景 (設(shè)備句柄, 畫(huà)筆句柄)
畫(huà)矩形 (設(shè)備句柄, 老矩形.左, 老矩形.上, 老矩形.右, 老矩形.下)
畫(huà)筆句柄 ＝ 創(chuàng)建畫(huà)筆 (0, 1, #黑色)
選入設(shè)備場(chǎng)景 (設(shè)備句柄, 畫(huà)筆句柄)
取表項(xiàng)結(jié)構(gòu)信息 (超級(jí)列表框1.取窗口句柄 (), 4153, 0, 表項(xiàng)信息)
取得表項(xiàng)矩形區(qū)域 (橫向位置, 縱向位置, 矩形區(qū)域)
畫(huà)矩形 (設(shè)備句柄, 矩形區(qū)域.左, 矩形區(qū)域.上, 矩形區(qū)域.右, 矩形區(qū)域.下) ' 給點(diǎn)擊的表項(xiàng)畫(huà)個(gè)框來(lái)模擬選中，自創(chuàng)的^&^
老表項(xiàng) ＝ 表項(xiàng)信息.行
老列 ＝ 表項(xiàng)信息.列
.子程序 取老矩形
.參數(shù) 表項(xiàng)
.參數(shù) 列
.局部變量 i
.局部變量 表項(xiàng)坐標(biāo), 坐標(biāo)
取表項(xiàng)坐標(biāo)信息 (超級(jí)列表框1.取窗口句柄 (), 4096 ＋ 16, 表項(xiàng), 表項(xiàng)坐標(biāo))
老矩形.上 ＝ 表項(xiàng)坐標(biāo).y
老矩形.左 ＝ 表項(xiàng)坐標(biāo).x
.計(jì)次循環(huán)首 (表項(xiàng)信息.列, i)
  老矩形.左 ＝ 老矩形.左 ＋ 超級(jí)列表框1.取列寬 (i － 1)
.計(jì)次循環(huán)尾 ()
老矩形.右 ＝ 老矩形.左 ＋ 超級(jí)列表框1.取列寬 (表項(xiàng)信息.列) － 2
老矩形.下 ＝ 老矩形.上 ＋ 行高 － 1
.子程序 取得表項(xiàng)矩形區(qū)域
.參數(shù) 橫向
.參數(shù) 縱向
.參數(shù) 矩形區(qū)域, 矩形坐標(biāo), 參考
.局部變量 表項(xiàng)坐標(biāo), 坐標(biāo)
.局部變量 i
表項(xiàng)信息.橫向 ＝ 橫向
表項(xiàng)信息.縱向 ＝ 縱向
取表項(xiàng)結(jié)構(gòu)信息 (超級(jí)列表框1.取窗口句柄 (), 4153, 0, 表項(xiàng)信息)
超級(jí)列表框1.現(xiàn)行選中項(xiàng) ＝ -1
.如果真 (表項(xiàng)信息.行 ≠ -1)
  取表項(xiàng)坐標(biāo)信息 (超級(jí)列表框1.取窗口句柄 (), 4096 ＋ 16, 表項(xiàng)信息.行, 表項(xiàng)坐標(biāo))
  矩形區(qū)域.上 ＝ 表項(xiàng)坐標(biāo).y
  矩形區(qū)域.左 ＝ 表項(xiàng)坐標(biāo).x
  .計(jì)次循環(huán)首 (表項(xiàng)信息.列, i)
    矩形區(qū)域.左 ＝ 矩形區(qū)域.左 ＋ 超級(jí)列表框1.取列寬 (i － 1)
  .計(jì)次循環(huán)尾 ()
  矩形區(qū)域.右 ＝ 矩形區(qū)域.左 ＋ 超級(jí)列表框1.取列寬 (表項(xiàng)信息.列) － 2
  矩形區(qū)域.下 ＝ 矩形區(qū)域.上 ＋ 行高 － 1
.如果真結(jié)束
.子程序 _編輯框1_獲得焦點(diǎn)
行 ＝ 表項(xiàng)信息.行
列 ＝ 表項(xiàng)信息.列
.子程序 __啟動(dòng)窗口_將被銷(xiāo)毀
刪除對(duì)象 (hBrush)

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