Post by garry » 16 Apr 2024, 14:04
evtl dies .. (?)
falls Menu erst später , nach Auswahl von DropDownList startet ...
( in diesem Beispiel, Menu sichtbar mit F1 , danach klicke auf row, zeigt nur die ausgewählte Sprache )
Code: Select all
;- mit DropDownList ausgewählt :
var=konkani
;-
h=
(
Replace IN language>%var%
bbb>notepad
ccc>zzzz
)
Array := []
loop,parse,h,`n,`r
{
x:=a_loopfield
stringsplit,x,x,`>
;Array.Push(x2)
;Array1.Push(x1)
Array.Push(x)
}
for index, element in Array
Menu, MyMenu, Add,%index% %element%,aacc
return
;-----------------------
~$F1::Menu, MyMenu, Show
;Menu, MyMenu, Show
aacc(ItemName,itempos)
{
aa:=itemname
;msgbox,%aa%
stringsplit,aa,aa,`>
msgbox,%aa2% ;- << aa2=konkani
}
return
;-------------
esc::exitapp
;=============
evtl dies .. (?)
falls Menu erst später , nach Auswahl von DropDownList startet ...
( in diesem Beispiel, Menu sichtbar mit F1 , danach klicke auf row, zeigt nur die ausgewählte Sprache )
[code]
;- mit DropDownList ausgewählt :
var=konkani
;-
h=
(
Replace IN language>%var%
bbb>notepad
ccc>zzzz
)
Array := []
loop,parse,h,`n,`r
{
x:=a_loopfield
stringsplit,x,x,`>
;Array.Push(x2)
;Array1.Push(x1)
Array.Push(x)
}
for index, element in Array
Menu, MyMenu, Add,%index% %element%,aacc
return
;-----------------------
~$F1::Menu, MyMenu, Show
;Menu, MyMenu, Show
aacc(ItemName,itempos)
{
aa:=itemname
;msgbox,%aa%
stringsplit,aa,aa,`>
msgbox,%aa2% ;- << aa2=konkani
}
return
;-------------
esc::exitapp
;=============[/code]