Gui Add, DropDownList, vRank x260 y91 w134, Рядовой|Сержант|Старшина|Лейтенант|Старший лейтенант|Капитан|Майор|Подполковник|Полковник|Генерал-майор
Gui Add, Button, gLabel, Ok
Gui, Show
return
Label:
Gui, Submit
Msgbox, %Rank%.
За место Msgbox подставьте свой SendInput.
Если хотите изменённый вывод, то после Gui, Submit измените информацию в переменной Rank с помощью RegExReplace.
Gui Add, DropDownList, vRank x260 y91 w134, Рядовой|Сержант|Старшина|Лейтенант|Старший лейтенант|Капитан|Майор|Подполковник|Полковник|Генерал-майорСюда вставляться -
SendInput, /do На плечах погоны %%.Вашу критику по поводу дизайна - учту!
]]>Да, ради визуальности.
Тогда читайте пост 15, он как раз делает то, что вам нужно.
Может быть вам что-то объяснить нужно?
Вот вам пример с Массивом:
Array := ["Рядовой", "Сержант", "Старшина", "Лейтенант", "Старший Лейтенант", "Генерал-майор"] ; Массив слов.
Var := RegExReplace(Array[2], Array[2], "Сержанта") ; Array[N] Там где N - номер Index'a массива.
Msgbox % Var ; Выводим изменённое слово.
Таким образом Array всегда будет неизменным и его можно использовать для Gui элементов, просто вставляя массив в качестве переменной.
P.S еще хотелось немного покритиковать ваш дизайн, он слишком 'Кислый', сделайте интерфейс попроще, не кладите яркий красный текст на синеватый фон, глаза выжигают. Так же насчёт шрифта, достаточно будет стандартного, т.к подобный текст не очень вяжется без приметного дизайна интерфейса.
]]>
Это происходит из-за того, что есть две отыгровки:
say Здравия желаю, Майор полиции.
и
do На плечах погоны майора.
И в этих отыгровках слово используется в разных падежах
]]>Это всё?
В таком случае к чему эти изменения, чисто для визуальности?
SendInput, /do На плечах погоны %Var%. {Enter}Или в что-то подобное.
]]>
И как можно сделать выбор
Совсем просто:
myVar := "Рядовой, Сержант, Старшина, Лейтенант, Старший Лейтенант, Генерал-майор"
newVar := StrReplace(myVar, "Рядовой", "Рядового")
MsgBox, % newVarSendInput, /do На плечах погоны %Var%. {Enter}List := {"Рядовой": "Рядового", "Сержант": "Сержанта", "Старшина": "Старшины", "Лейтенант": "Лейтенанта", "Старший": "Старшего", "Генерал-майор": "Генерал-майора"}
myVar := "Рядовой, Сержант, Старшина, Лейтенант, Старший Лейтенант, Генерал-майор"
for k, v in List
myVar := StrReplace(myVar, k, v)
MsgBox, % myVar