MrGPro |
Дата: Пятница, 02.09.2016, 20:04 | Сообщение # 7
|
Боец
Сообщений: 202
Статус: Offline
|
Вот тебе мой набросок такого говно-кода. Если читал FAQ по ahk сможешь разобраться и сделать больше Например сделать вывод записаного Текста в TreeView с использование , и LoopReadLineFile с маркерами RegExMatch.
Код IfExist, %A_ScriptDir%/Config.profile { IniRead, f_DataFormEdit, %A_ScriptDir%/Config.profile, DataSet, Script_Data_Form_Edit IniRead, f_DataFormDropList, %A_ScriptDir%/Config.profile, DataSet, Script_Data_Form_DropList IniRead, f_DataFormCalendar, %A_ScriptDir%/Config.profile, DataSet, Script_Data_Form_Calendar } If (%f_DataFormEdit% == True or %f_DataFormEdit% == False and %f_DataFormDropList% == False and %f_DataFormCalendar% == False) { Gui, retet:Add, Edit, x20 y40 w44 h21 vDayEdit -Hidden, Gui, retet:Add, Edit, x70 y40 w95 h20 vMountEdit -Hidden, Gui, retet:Add, Edit, x175 y40 w55 h20 vYearEdit -Hidden, Gui, retet:Add, Radio, x270 y25 w105 h15 vFormEditLoad gShowDayEditForm +Checked, Форма ввода } else If (%f_DataFormEdit% == Null) { Gui, retet:Add, Edit, x20 y40 w44 h21 vDayEdit -Hidden, Gui, retet:Add, Edit, x70 y40 w95 h20 vMountEdit -Hidden, Gui, retet:Add, Edit, x175 y40 w55 h20 vYearEdit -Hidden, Gui, retet:Add, Radio, x270 y25 w105 h15 vFormEditLoad gShowDayEditForm +Checked, Форма ввода } else { Gui, retet:Add, Edit, x20 y40 w44 h21 vDayEdit +Hidden, Gui, retet:Add, Edit, x70 y40 w95 h20 vMountEdit +Hidden, Gui, retet:Add, Edit, x175 y40 w55 h20 vYearEdit +Hidden, Gui, retet:Add, Radio, x270 y25 w105 h15 vFormEditLoad gShowDayEditForm -Checked, Форма ввода }
If (%f_DataFormDropList% == True) { Gui, retet:Add, DropDownList, x20 y40 w45 h450 vDayDropList -Hidden, 1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31 Gui, retet:Add, DropDownList, x70 y40 w95 h200 vMountDropList -Hidden, январь|февраль|март|апрель|май|июнь|июль|август|сентябрь|октябрь|ноябрь|декабрь Gui, retet:Add, DropDownList, x175 y40 w55 h100 vYearDropList -Hidden, 2016|2017|2018|2019 Gui, retet:Add, Radio, x270 y40 w105 h15 vFormDroLisLoad gShowDayDropListForm +Checked, Форма выбора } else { Gui, retet:Add, DropDownList, x20 y40 w45 h450 vDayDropList +Hidden, 1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31 Gui, retet:Add, DropDownList, x70 y40 w95 h200 vMountDropList +Hidden, январь|февраль|март|апрель|май|июнь|июль|август|сентябрь|октябрь|ноябрь|декабрь Gui, retet:Add, DropDownList, x175 y40 w55 h100 vYearDropList +Hidden, 2016|2017|2018|2019 Gui, retet:Add, Radio, x270 y40 w105 h15 vFormDroLisLoad gShowDayDropListForm -Checked, Форма выбора } If (%f_DataFormCalendar% == True) { Gui, retet:Add, DateTime, x20 y40 w210 h20 vFullCalendar -Hidden, Gui, retet:Add, Radio, x270 y55 w120 h15 vFormCaleLoad gShowDayCalendarForm +Checked, Форма календарь } else { Gui, retet:Add, DateTime, x20 y40 w210 h20 vFullCalendar +Hidden, Gui, retet:Add, Radio, x270 y55 w120 h15 vFormCaleLoad gShowDayCalendarForm -Checked, Форма календарь } Gui, retet:Add, Text, x20 y25 w35 h15, число Gui, retet:Add, Text, x100 y25 w35 h15, месяц Gui, retet:Add, Text, x190 y25 w35 h15, год
Gui, retet:Add, Text, x20 y115 w55 h15, Урок: Gui, retet:Add, Edit, x20 y130 w170 h20 vUrok1 gCheck_Forms_Edit, Gui, retet:Add, Text, x205 y115 w125 h15, Домашнее задание: Gui, retet:Add, Edit, x205 y130 w500 h20 vHome1 gCheck_Forms_Edit, Gui, retet:Add, Text, x20 y155 w55 h15, Урок: Gui, retet:Add, Edit, x20 y170 w170 h20 vUrok2 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x205 y155 w125 h15, Домашнее задание: Gui, retet:Add, Edit, x205 y170 w500 h20 vHome2 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x20 y195 w55 h15, Урок: Gui, retet:Add, Edit, x20 y210 w170 h20 vUrok3 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x205 y190 w125 h15, Домашнее задание: Gui, retet:Add, Edit, x205 y210 w500 h20 vHome3 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x20 y235 w55 h15, Урок: Gui, retet:Add, Edit, x20 y250 w170 h20 vUrok4 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x205 y235 w125 h15, Домашнее задание: Gui, retet:Add, Edit, x205 y250 w500 h20 vHome4 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x20 y275 w55 h15, Урок: Gui, retet:Add, Edit, x20 y290 w170 h20 vUrok5 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x205 y275 w125 h15, Домашнее задание: Gui, retet:Add, Edit, x205 y290 w500 h20 vHome5 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x20 y315 w55 h15, Урок: Gui, retet:Add, Edit, x20 y330 w170 h20 vUrok6 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x205 y315 w125 h15, Домашнее задание: Gui, retet:Add, Edit, x205 y330 w500 h20 vHome6 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x20 y355 w55 h15, Урок: Gui, retet:Add, Edit, x20 y370 w170 h20 vUrok7 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x205 y355 w125 h15, Домашнее задание: Gui, retet:Add, Edit, x205 y370 w500 h20 vHome7 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x20 y395 w55 h15, Урок: Gui, retet:Add, Edit, x20 y410 w170 h20 vUrok8 gCheck_Forms_Edit +Disabled, Gui, retet:Add, Text, x205 y395 w125 h15, Домашнее задание: Gui, retet:Add, Edit, x205 y410 w500 h20 vHome8 gCheck_Forms_Edit +Disabled,
Gui, retet:Add, Button, x10 y450 w705 h35 gCreat, Готово Gui, retet:Add, GroupBox, x10 y5 w230 h75, Домашнее задание на: Gui, retet:Add, GroupBox, x260 y5 w150 h75, Настройки ДЗ: Gui, retet:Add, GroupBox, x425 y5 w175 h75, Настройки Дневника: Gui, retet:Add, Radio, x440 y30 w105 h15, Форма ввода Gui, retet:Add, Radio, x440 y45 w100 h15, Форма выбора Gui, retet:Add, GroupBox, x10 y90 w705 h350, Дневник Gui, retet:Add, Button, x605 y45 w105 h35 gSaveConfig, Запомнить Gui, retet:Show, w727 h495, return
Check_Forms_Edit: Loop { Loop, 8 { GuiControlGet, Urok%A_Index% GuiControlGet, Home%A_Index% } If (Urok1 != Null and Home1 != Null) { GuiControl -Disabled, Urok2 GuiControl -Disabled, Home2 Line1 = True } ;~ else ;~ { ;~ GuiControl +Disabled, Urok2 ;~ GuiControl +Disabled, Home2 ;~ } If (Urok2 != Null and Home2 != Null) { GuiControl -Disabled, Urok3 GuiControl -Disabled, Home3 Line2 := True } If (Urok3 != Null and Home3 != Null) { GuiControl -Disabled, Urok4 GuiControl -Disabled, Home4 Line3 := True } If (Urok4 != Null and Home4 != Null) { GuiControl -Disabled, Urok5 GuiControl -Disabled, Home5 Line4 := True } If (Urok5 != Null and Home5 != Null) { GuiControl -Disabled, Urok6 GuiControl -Disabled, Home6 Line5 := True } If (Urok6 != Null and Home6 != Null) { GuiControl -Disabled, Urok7 GuiControl -Disabled, Home7 Line6 := True } If (Urok7 != Null and Home7 != Null) { GuiControl -Disabled, Urok8 GuiControl -Disabled, Home8 Line7 := True } If (Urok8 != Null and Home8 != Null) { Line8 := True break } } return
Creat: GuiControlGet, DayEdit GuiControlGet, MountEdit GuiControlGet, YearEdit If (DayEdit != Null and MountEdit != Null and YearEdit != Null or ) { loop, 8 { GuiControlGet, Urok%A_Index% GuiControlGet, Home%A_Index% } If (Urok1 != Null and Home1 != Null) { FileAppend, Домашнее задание на %DayEdit% %MountEdit% %YearEdit% года.`n, %A_ScriptDir%/Domawka.txt FileAppend, %Urok1%: %Home1%`n, %A_ScriptDir%/Domawka.txt If (Urok2 != Null and Home2 != Null) FileAppend, %Urok2%: %Home2%`n, %A_ScriptDir%/Domawka.txt If (Urok3 != Null and Home3 != Null) FileAppend, %Urok3%: %Home3%`n, %A_ScriptDir%/Domawka.txt If (Urok4 != Null and Home4 != Null) FileAppend, %Urok4%: %Home4%`n, %A_ScriptDir%/Domawka.txt If (Urok5 != Null and Home5 != Null) FileAppend, %Urok5%: %Home5%`n, %A_ScriptDir%/Domawka.txt If (Urok6 != Null and Home6 != Null) FileAppend, %Urok6%: %Home6%`n, %A_ScriptDir%/Domawka.txt If (Urok7 != Null and Home7 != Null) FileAppend, %Urok7%: %Home7%`n, %A_ScriptDir%/Domawka.txt If (Urok8 != Null and Home8 != Null) FileAppend, %Urok8%: %Home8%`n, %A_ScriptDir%/Domawka.txt } } return
ShowDayEditForm: GuiControl, , FormDroLisLoad, 0 GuiControl, , FormCaleLoad, 0 GuiControl, , FormEditLoad, 1 GuiControl -Hidden, DayEdit GuiControl -Hidden, MountEdit GuiControl -Hidden, YearEdit GuiControl +Hidden, DayDropList GuiControl +Hidden, MountDropList GuiControl +Hidden, YearDropList GuiControl +Hidden, FullCalendar return
ShowDayDropListForm: GuiControl, , FormEditLoad, 0 GuiControl, , FormCaleLoad, 0 GuiControl, , FormDroLisLoad, 1 GuiControl +Hidden, DayEdit GuiControl +Hidden, MountEdit GuiControl +Hidden, YearEdit GuiControl -Hidden, DayDropList GuiControl -Hidden, MountDropList GuiControl -Hidden, YearDropList GuiControl +Hidden, FullCalendar return
ShowDayCalendarForm: GuiControl, , FormEditLoad, 0 GuiControl, , FormDroLisLoad, 0 GuiControl, , FormCaleLoad, 1 GuiControl +Hidden, DayEdit GuiControl +Hidden, MountEdit GuiControl +Hidden, YearEdit GuiControl +Hidden, DayDropList GuiControl +Hidden, MountDropList GuiControl +Hidden, YearDropList GuiControl -Hidden, FullCalendar return
SaveConfig: GuiControlGet, FormEditLoad GuiControlGet, FormDroLisLoad GuiControlGet, FormCaleLoad If (FormEditLoad == "1") { fr_Edit = True } else { fr_Edit = False }
If (FormDroLisLoad == "1") { fr_DroLis = True } else { fr_DroLis = False }
If (FormCaleLoad == "1") { fr_Cale = True } else { fr_Cale = False } IniWrite, %fr_Edit%, %A_ScriptDir%/Config.profile, DataSet, Script_Data_Form_Edit IniWrite, %fr_DroLis%, %A_ScriptDir%/Config.profile, DataSet, Script_Data_Form_DropList IniWrite, %fr_Cale%, %A_ScriptDir%/Config.profile, DataSet, Script_Data_Form_Calendar return
retetGuiClose: ExitApp ; This Gui is generated by X-GUI Creator
Тебе помогли не забывай про благодарность >> тыкни репутацию ---------------------------------------͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏ ----------------------------------------------------- Зам.Администратора на проекте "DayZ Epoсh SPN" сервер Arma 2OA DayZ Epoch пиратка и лицензия
|
|
|
|