#NoTrayIcon
$Gui = GUICreate("Aut2Exe", 300, 94, -1, -1, -1, 0x00000010)
$filemenu = GUICtrlCreateMenu ("Файл")
$Readme = GUICtrlCreateMenuitem ("О программе",$filemenu)
$Quit = GUICtrlCreateMenuitem ("Выход",$filemenu)
$Input1 = GUICtrlCreateLabel('', 0, 0, 300, 94)
GUICtrlSetState(-1, 136)
GUICtrlCreateLabel ("Кинь сюда файл для конвертации", 10,2,280,17)
GUISetState ()
While 1
$msg = GUIGetMsg()
Select
Case $msg = -13
$filename=StringRegExp(@GUI_DRAGFILE,4) ;<-------Этого
; Case $msg = $folder1
; $folder01 = FileOpenDialog("Указать файл", @WorkingDir & "", "Все файлы (*.*)", 1 + 4 )
; If @error Then ContinueLoop
; GUICtrlSetData($Input1, $folder01)
Case $msg = $Readme
MsgBox(0, 'Readme', 'Compiler')
Case $msg = -3 Or $msg = $Quit
Exit
EndSelect
WEnd