twiz

Problem on Line #28

Apr 8th, 2021
354
1 day
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #SingleInstance, Force
  2. #NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
  3. SetWorkingDir, %A_ScriptDir%
  4. CoordMode, ToolTip, Window
  5.  
  6. List := "1`tAardvark|2`tBaboon|3`tCaracal|4`tDingo|5`tElephant|6`tFrog|7`tGorilla"
  7. Gui, Add,           Edit,       x10 y8  w150    vDDListBox_Edit +hwndDDListBox_EditID ReadOnly
  8. Gui, DDListBox:Add, ListBox,    x0  y0  w150    vDDListBox_List gDDListBox_Select r5 +BackgroundTrans, %List%
  9. GuiControl,, DDListBox_Edit, WORKS
  10. Gui, Show, h75
  11. OnMessage(0x201, "WM_LBUTTONDOWN")
  12. Return
  13.  
  14. WM_LBUTTONDOWN(wParam, lParam) {
  15.     GoSub, DDListBox_Show
  16. }
  17.  
  18. DDListBox_Show:
  19.     If (A_GuiControl = "DDListBox_Edit") {
  20.         WinGetPos, ClientPosX, ClientPosY
  21.         Gui, DDListBox:Show, x%ClientPosX% y%ClientPosY% NA
  22.     }
  23. Return
  24.  
  25. DDListBox_Select:
  26.     Gui, DDListBox:Submit
  27.     MsgBox % DDListBox_List
  28.     GuiControl,, DDListBox_Edit, FAILS ;%DDListBox_List% ;; <--- This line fails to put text into box
  29. Return
  30.  
  31. GuiClose:
  32. ExitApp
RAW Paste Data

Adblocker detected! Please consider disabling it...

We've detected AdBlock Plus or some other adblocking software preventing Pastebin.com from fully loading.

We don't have any obnoxious sound, or popup ads, we actively block these annoying types of ads!

Please add Pastebin.com to your ad blocker whitelist or disable your adblocking software.

×