#include #include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include <ListBoxConstants.au3>
#include <StaticConstants.au3>
#include <Misc.au3>
#include <GuiButton.au3>
#include <WinAPI.au3>
#include <Array.au3>
#include <GuiEdit.au3>
#include <SendMessage.au3>
#include <String.au3>
#include <File.au3>
#include <Date.au3>
#include <GuiListBox.au3>
#include <ComboConstants.au3>
#include <TabConstants.au3>
#include <GuiImageList.au3>
#include <GuiButton.au3>
#include <GDIPlus.au3>
#include <WinAPIEx.au3>
Opt("GUIOnEventMode", 1)
;(Координаты razmerov i pologeniy);
Global $xx[100]
Global $yy[100]
Global $Razmer_Shirina[100]
Global $Razmer_Visota[100]
$index_massiv = 1
papmetri_ellementa($index_massiv, @DesktopWidth / 20, @DesktopHeight / 20, @DesktopWidth * 0.7, @DesktopHeight * 0.7)
Global $Okno_Glavnoe = GUICreate("14", $Razmer_Shirina[$index_massiv], $Razmer_Visota[$index_massiv], $xx[$index_massiv], $yy[$index_massiv], BitOR($WS_MINIMIZEBOX, $WS_SYSMENU, $WS_MAXIMIZEBOX, $WS_MAXIMIZE), $WS_EX_ACCEPTFILES);,$WS_MAXIMIZE) ;создает главное окно
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSE_Okno_Glavnoe") ;создает функцию для главного окна
Global $tab_karta = GUICtrlCreateTab(0, 0, @DesktopWidth, @DesktopHeight, BitOR($TCS_FORCEICONLEFT, $TCS_FIXEDWIDTH, $TCS_HOTTRACK, $TCS_RIGHTJUSTIFY, $TCS_MULTILINE))
Global $parametri_karta = GUICtrlCreateTabItem("Карта")
$index_massiv = 2
papmetri_ellementa($index_massiv, 30, 45, 85, 20)
$vrem_element = GUICtrlCreateLabel("Путь к картинке", $xx[$index_massiv], $yy[$index_massiv], $Razmer_Shirina[$index_massiv], $Razmer_Visota[$index_massiv])
Global $tab_osobennost_karta = GUICtrlCreateTabItem("Особенности")
For $i=3 To 20
$index_massiv = $i
papmetri_ellementa($index_massiv, 100 + $i * 6, 100, 180, 20)
$noviy_shablon_osobennosti = GUICtrlCreateLabel("НОВЫЙ ШАБЛОН", $xx[$index_massiv], $yy[$index_massiv], $Razmer_Shirina[$index_massiv], $Razmer_Visota[$index_massiv])
GUICtrlSetFont($noviy_shablon_osobennosti, 13, 800, 0, "Segoe Script")
Next
$index_massiv = 55
papmetri_ellementa($index_massiv, 300, 300, 150, 150)
Global $knopka_svernut_razvernut_1 = GUICtrlCreateButton("Нажми", $xx[$index_massiv], $yy[$index_massiv], $Razmer_Shirina[$index_massiv], $Razmer_Visota[$index_massiv])
GUICtrlSetOnEvent($knopka_svernut_razvernut_1, "t")
GUISwitch($Okno_Glavnoe) ;переключение на главное окно
GUISetState() ;отображение конопок и окон
While 1
Sleep(1000) ; Цикл ожидания
WEnd
Func t()
GUISwitch($Okno_Glavnoe, $tab_osobennost_karta)
$index_massiv = 48
papmetri_ellementa($index_massiv, 200, 200, 180, 20)
$noviy_shablon_osobennosti = GUICtrlCreateLabel("НОВЫЙ ШАБЛОН", $xx[$index_massiv], $yy[$index_massiv], $Razmer_Shirina[$index_massiv], $Razmer_Visota[$index_massiv])
GUICtrlSetFont($noviy_shablon_osobennosti, 13, 800, 0, "Segoe Script")
GUICtrlCreateTabItem("")
EndFunc ;==>t
Func CLOSE_Okno_Glavnoe()
Exit
EndFunc ;==>CLOSE_Okno_Glavnoe
Func papmetri_ellementa($index, $x_cor, $y_cor, $razmer_w, $razmer_h)
$xx[$index] = $x_cor
$yy[$index] = $y_cor
$Razmer_Shirina[$index] = $razmer_w
$Razmer_Visota[$index] = $razmer_h
EndFunc ;==>papmetri_ellementa