#SingleInstance, Force
Menu, Tray, nostandard
Menu, Tray, DeleteAll
Menu, Tray, Add, Свернуть, goHideTray
Menu, Tray, Add, Выход, AppExit
Menu, Tray, Default, Свернуть

Gui, Load:-caption -sysmenu +AlwaysOnTop +Border
Gui, Load:font, S16
SetKeyDelay, 0

global checked := false
global hidden :=
global checkList := object(), pColor := object(), getName := object(), notMemCK := object()
global wDir := A_ScriptDir "\Лог"
IfNotExist, %wDir%
FileCreateDir, %wDir%

APPNAME := "Test"

loop, %wDir%\*.txt, 1, 1
Files .= RTrim(A_LoopFileName, ".txt") "`n"
Sort, Files, R
if(strlen(Files) < 1)
Files := "Список пуст"
Files := RegExReplace(Files, "`n", "|")

Gui, Add, Text, x12 y9 w110 h20 , Выберите дату:
Gui, Add, Button, x12 y349 w120 h20 , Свернуть в трей
Gui, Add, Button, x152 y349 w120 h20 , Перезапустить
Gui, Add, Button, x472 y349 w120 h20 , Выход из программы
Gui, Add, DropDownList, x-368 y-201 w1120 h580 , DropDownList
Gui, Add, Text, x272 y9 w130 h20 , Сегодня:
Gui, Add, CheckBox, x282 y349 w190 h20 , Сворачивать в трей при запуске
Gui, Add, DropDownList, x-398 y-201 w1550 h970, DropDownList
Gui, Add, Edit, x412 y9 w120 h20 , Поиск...
Gui, Add, Edit, x12 y39 w580 h300 veTXT ReadOnly -Border
Gui, Add, DropDownList, x122 y9 w130 r10 vDDL, %Files% ;vgetFile geditFile Choose1, %Files%
Gui, Show, w606 h400, APPNAME
return

goHideTray:
if(Hidded)
{
    Menu, Tray, Rename, Развернуть, Свернуть
    Menu, tray, default, Свернуть
    Gui, Main:Show
} else {
    Menu, Tray, Rename, Свернуть, Развернуть
    Menu, tray, default, Развернуть
    Gui, Main:Hide
}
Hidded := !Hidded
return
AppExit:
ExitApp

#SingleInstance, Force
Menu, Tray, nostandard
Menu, Tray, DeleteAll
Menu, Tray, Add, Свернуть, goHideTray
Menu, Tray, Add, Выход, AppExit
Menu, Tray, Default, Свернуть
SetKeyDelay, 0

global checked := false
global hidden :=
global checkList := object(), pColor := object(), getName := object(), notMemCK := object()
global wDir := A_ScriptDir "\Лог"
IfNotExist, %wDir%
FileCreateDir, %wDir%

APPNAME := "Test"

loop, %wDir%\*.txt, 1, 1
Files .= RTrim(A_LoopFileName, ".txt") "`n"
Sort, Files, R
if(strlen(Files) < 1)
Files := "Список пуст"
Files := RegExReplace(Files, "`n", "|")

Gui, Add, Text, x12 y9 w110 h20 , Выберите дату:
Gui, Add, Button, x12 y349 w120 h20 , Свернуть в трей
Gui, Add, Button, x152 y349 w120 h20 , Перезапустить
Gui, Add, Button, x472 y349 w120 h20 , Выход из программы
Gui, Add, Text, x272 y9 w130 h20 , Сегодня:
Gui, Add, CheckBox, x282 y349 w190 h20 , Сворачивать в трей при запуске
Gui, Add, Edit, x412 y9 w120 h20 , Поиск...
Gui, Add, Edit, x12 y39 w580 h300 veTXT ReadOnly -Border
Gui, Add, DropDownList, x122 y9 w130 r10 vDDL gLoadFile, %Files% ;vgetFile geditFile Choose1, %Files%
Gui, Show, w606 h400, APPNAME
return

LoadFile:
GuiControlGet, ChoosedFile,, DDL
GuiControl,, eTXT,% FileOpen(wDir "\" choosedFile ".txt","r").Read()
exit

F2::reload

goHideTray:
if(Hidded)
{
    Menu, Tray, Rename, Развернуть, Свернуть
    Menu, tray, default, Свернуть
    Gui, Main:Show
} else {
    Menu, Tray, Rename, Свернуть, Развернуть
    Menu, tray, default, Развернуть
    Gui, Main:Hide
}
Hidded := !Hidded
return
AppExit:
ExitApp