Что нового

Вывод в настраеваемом формате ($d & "текст" & $w)

o_nix

Чайник
Сообщения
35
Репутация
1
Код:
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)

;Фейс
$Form1 = GUICreate("Генерилка", 386, 267, 362, 361)

;Выбор выходного формата
$Group2 = GUICtrlCreateGroup("Выходной формат", 8, 0, 369, 49)
$Input1 = GUICtrlCreateInput("$d & ':' & $w", 16, 16, 305, 28)
GUICtrlSetOnEvent(-1, "Input1Change")


;Кнопка старта генерирования
$Button1 = GUICtrlCreateButton("Старт", 328, 16, 41, 25, $WS_GROUP)
GUICtrlSetOnEvent(-1, "Button1Click")
GUICtrlCreateGroup("", -99, -99, 1, 1)

GUISetState(@SW_SHOW)

While 1
Sleep(100)
WEnd

;Генерирование
Func Button1Click()
	$out = FileOpen("rezult.txt", 1)
	$rez_format = GUICtrlRead($Input1)
	
	
	For $i = 50 to 1 Step -1
	$d = Random(0, 99,1)
	$w = Chr(Random(Asc("a"), Asc("z"), 1))
	
	$rez = "?????????????" ;Как этой переменной присвоть значение из сгенерированных в текущий момент данных в формате указанном в $Input1 ...
;	тоесть чтобы можно было вписав в поле $Input1 данные вывести сгенерированное в нужном виде
;Например чтобы можно было вписать "$d & ':' & $w" или "$w & '-' & $d"
	
	FileWriteLine($out, $rez & @CRLF)
;	FileWriteLine($out, $d & ':' & $w & @CRLF)
Next
FileClose($out)
EndFunc

Func Input1Change()
EndFunc


Как получить текущее значение переменной $rez = в этом случае??
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4 020
Репутация
622
Код:
$rez = Execute($rez_format)
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8 156
Репутация
2 329
Можно ещё использовать StringFormat...

Код:
$Input1 = GUICtrlCreateInput("%s : %s", 16, 16, 305, 28)
...
$rez = StringFormat($rez_format, $d, $w)
 
Верх