I use a cheap small 4K computer (12*12*2-cm) WIN10 PRO
must ask specialist ...
https://cse.google.com/cse?cx=003825578684429028588:oved6rfvrlq
start this ahk-search above and search for > EM_SETCUEBANNER
another example from user
@teadrinker
( I just used EM_SETCUEBANNER and removed function SetEditCueBanner ) from last script above
Code: Select all
;....
Gui,add,Edit, x10 y260 w400 h37 hwndHED11 vED1
Gui Add, Button, x270 y100 w160 h37 gDEL,DELETE
;SetEditCueBanner(HED11, "ADD NAME")
SendMessage, EM_SETCUEBANNER := 0x1501, true, "ADD NAME",, ahk_id %HED11%
;.....
viewtopic.php?style=19&t=85648
Code: Select all
;-------- saved at 星期二 一月 2022-01-25 19:29 UTC --------------
;- Modal Windows
;- https://www.autohotkey.com/boards/viewtopic.php?style=19&t=85648
Gui, Add, Edit, w300 hwndhEdit
SendMessage, EM_SETCUEBANNER := 0x1501, true, "Enter some text here and click OK",, ahk_id %hEdit%
Gui, Add, Button, x120 w80 Default, OK
Gui, Show
WinWaitClose, ahk_id %hEdit%
MsgBox, You entered:`n %Edit1%
ExitApp
ButtonOK:
GuiControlGet, Edit1
Gui, Destroy
Return
GuiClose:
Gui, Destroy
Return
;esc::exitapp
this is the same like last script above , used EM_SETCUEBANNER
Code: Select all
;-- MODIFIED=20220125
;-- Listbox add new or delete row
;-- Focus is on ADD NAME
;--
#NoEnv
SendMode Input
SetWorkingDir %A_ScriptDir%
SetTitleMatchMode 2
SetBatchLines, -1
Gui,1: -dpiscale
Gui,1:default
Filename:="TEST_LB"
F1=%a_scriptdir%\ListboxNames22.txt
ifnotexist,%f1%
gosub,a1
fileread,aa,%f1%
Gui,Font,s12,Lucida Console
Gui Add, ListBox,x10 y10 w250 h230 altsubmit vVar1 ,%aa%
Gui Add, Button, x270 y30 w260 h37 gShow,Show_Selected
Gui,add,Edit, x10 y260 w400 h37 hwndHED11 vED1
Gui Add, Button, x270 y100 w160 h37 gDEL,DELETE
SendMessage, EM_SETCUEBANNER := 0x1501, true, "ADD NAME",, ahk_id %HED11%
Gui, Show,x10 y10 w550 h350 ,%filename%
GuiControl,1: Focus,ed1
return
;------------
#IfWinActive,TEST_LB ahk_class AutoHotkeyGUI
$enter::
Gui,1:submit,nohide
GuiControl,1:,Var1, %ed1%
GuiControl,1:,ed1
GuiControl,1: Focus,ed1
#Ifwinactive
return
;----------------------------
Guiclose:
Guicontrolget,Var1
ControlGet, Items, List,,Listbox1,%filename%
e:=""
Loop, Parse, Items, `n
e .= a_loopfield . "|"
ifexist,%f1%
filedelete,%f1%
Fileappend,%e%,%f1%,utf-8
e=
exitapp
;------------
Show:
Gui,1:submit,nohide
GuiControl, -AltSubmit,var1
GuiControlGet,vr, ,var1
if (vr="")
{
;msgbox, 262208,SHOW_LB_ROW ,NAME is NOT SELECTED
GuiControl, +AltSubmit,var1
GuiControl,1: Focus,ed1
return
}
else
msgbox, 262208,SHOW_LB_ROW ,NAME=%vr%
GuiControl, +AltSubmit,var1
GuiControl,1: Focus,ed1
return
;------------
DEL:
lb=listbox1
vr=var1
GuiControlGet, TheSelectedLine,,%vr% ; get the focused item Number
Control, Delete, %TheSelectedLine%, %lb% ; delete the focused item
;ControlGet, Wholex, List,,%lb% ;- get the whole listbox1
;Fileappend,%wholex%,%f1%,utf-8
GuiControl,1: Focus,ed1
return
;-----------
A1:
e5=
(Ltrim join|
Sam Smith
John Doe
Sammy Susa
Alex Brown
INPUT
)
Fileappend,%e5%,%f1%,utf-8
e5=
return
;=====================================