Здравствуйте.
Есть окно в котором несколько групп элементов, которые задают условия выполнения задачи.
Ключ - Номер сообщения, он же является названием блока в INI файле
Каким образом сохранить данные из каждой группы в файл?
Как лучше записать значение мин./часы.
Есть окно в котором несколько групп элементов, которые задают условия выполнения задачи.
Ключ - Номер сообщения, он же является названием блока в INI файле
Каким образом сохранить данные из каждой группы в файл?
Как лучше записать значение мин./часы.
Код:
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIConstants.au3>
#include <FTPEx.au3>
Local $name_rules
$sPath_ini = @ScriptDir & "\rules.ini"
#Region ### START Koda GUI section ###
$Form1_1 = GUICreate("Form1", 286, 361, 205, 129)
$Group1 = GUICtrlCreateGroup("Тип события", 16, 10, 255, 71)
$Radio1 = GUICtrlCreateRadio("Входящее", 24, 26, 80, 17)
$Radio2 = GUICtrlCreateRadio("Исходящее", 24, 50, 80, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label1 = GUICtrlCreateLabel("Номер сообщения", 120, 26, 98, 17)
$Input1 = GUICtrlCreateInput("", 220, 22, 41, 21)
$Group4 = GUICtrlCreateGroup("Файл-источник", 112, 42, 153, 36)
$Input4 = GUICtrlCreateInput("", 120, 55, 100, 20)
$Button3 = GUICtrlCreateButton("Файл", 221, 54, 41, 20, 0)
$Group2 = GUICtrlCreateGroup("Периодичность", 16, 80, 255, 89)
$Radio3 = GUICtrlCreateRadio("Однократно", 24, 96, 90, 20)
$Radio4 = GUICtrlCreateRadio("Ежедневно в", 145, 96, 85, 20)
$Input5 = GUICtrlCreateInput(_NowTime(4), 230, 96, 35, 20)
$Radio5 = GUICtrlCreateRadio("Повторять каждые", 24, 120, 120, 20)
$Input2 = GUICtrlCreateInput("", 150, 120, 35, 20)
$Combo1 = GUICtrlCreateCombo("", 194, 120, 57, 20)
GUICtrlSetData(-1, "мин.|час.")
$Label2 = GUICtrlCreateLabel("Начало действия", 25, 146, 98, 17)
$Date1 = GUICtrlCreateDate(_NowDate(), 120, 144, 140, 20)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("Формат обработки", 16, 176, 255, 49)
$Input3 = GUICtrlCreateInput("**666*ss*33*", 24, 192, 233, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Сохранить", 33, 320, 79, 25, 0)
$Button2 = GUICtrlCreateButton("Отмена", 154, 320, 79, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$nMsg = GUIGetMsg()
$name_rules=GUICtrlRead($input1)
$time_rules=GUICtrlRead($input2)
$format_rules=GUICtrlRead($input3)
$adress_file_rules=GUICtrlRead($input4)
While 1
Switch $nMsg
Case $GUI_EVENT_CLOSE
GUIDelete($Form1_1)
ExitLoop
Case $Button2
GUIDelete($Form1_1)
ExitLoop
Case $Button1
If $name_rules="" Then MsgBox(0, "Ошибка", "Введите номер сообщения.")
If $format_rules="" Then MsgBox(0, "Ошибка", "Не задан формат сообщения.")
If $adress_file_rules="" And BitAND(GUICtrlRead($Radio2), $GUI_CHECKED)=$GUI_CHECKED Then MsgBox(0, "Ошибка", "Не указан файл с данными.")
If $time_rules="" And BitAND(GUICtrlRead($Radio5), $GUI_CHECKED)=$GUI_CHECKED Then MsgBox(0, "Ошибка", "Не указан интервал времени.")
If BitAND(GUICtrlRead($Radio1), $GUI_CHECKED)=$GUI_CHECKED Then
IniWriteSection($sPath_ini, $name_rules, StringFormat('$Radio1=%s\r\n', GUICtrlRead($radio1)))
Else
IniWriteSection($sPath_ini, $name_rules, StringFormat('$Radio2=%s\r\n$input4=%s\r\n', GUICtrlRead($radio2), GUICtrlRead($input4)))
If BitAND(GUICtrlRead($Radio3), $GUI_CHECKED)=$GUI_CHECKED Then
IniWriteSection($sPath_ini, $name_rules, StringFormat('$Radio3=%s\r\n', GUICtrlRead($radio3)))
Else
If BitAND(GUICtrlRead($Radio4), $GUI_CHECKED)=$GUI_CHECKED Then
IniWriteSection($sPath_ini, $name_rules, StringFormat('$Radio4=%s\r\n$input5=%s\r\n', GUICtrlRead($radio4), GUICtrlRead($input5)))
Else
IniWriteSection($sPath_ini, $name_rules, StringFormat('$Radio5=%s\r\n$input2=%s\r\n', GUICtrlRead($radio5), GUICtrlRead($input2)))
EndIf
EndIf
EndIf
Case $Button3
$Button03 = FileOpenDialog("Указать файл", @WorkingDir & "", "Любой (*.*)", 1)
If @error Then ContinueLoop
GUICtrlSetData($Input4, $Button03)
EndSwitch
WEnd
1. Возможно ли время задать формулой, т.е. что бы при его удалении в окне оставалось 00:00
2...
2...