#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include "MetroGUI-UDF\MetroGUI_UDF.au3"
#include "TyleoAboutMe.au3"
#include "WindowsLCA.au3"

$CurrentVer = FileGetVersion(@AutoItExe)
$Progname   = "Modern Note " & $CurrentVer

Global $Note = GUICreate("Modern Note", 264, 189, 234, 184)
GUISetBkColor($CurrentAccent)


Global $File = GUICtrlCreateMenu("File")
Global $File_Open = GUICtrlCreateMenuItem("Open Note" & @TAB & "NTT",$File)
Global $File_Save = GUICtrlCreateMenuItem("Save Note" & @TAB & "NTT",$File)
Global $File_Save_As = GUICtrlCreateMenuItem("Save Note As..." & @TAB & "NTT",$File)

Global $File_Export = GUICtrlCreateMenu("Export",$File)
Global $File_Export_TXT = GUICtrlCreateMenuItem("Text File" & @TAB & "TXT",$File_Export)
Global $File_Export_PDF = GUICtrlCreateMenuItem("PDF File" & @TAB & "PDF",$File_Export)


Global $Edition = GUICtrlCreateMenu("Edition")
Global $Edition_SelectAll = GUICtrlCreateMenuItem("Select All",$Edition)


Global $Configuration = GUICtrlCreateMenu("Configuration")
Global $Configuration_Font = GUICtrlCreateMenuItem("Change Font",$Configuration)


Global $About = GUICtrlCreateMenu("About")
Global $About_About = GUICtrlCreateMenuItem("About Me",$About)
Global $About_Ver = GUICtrlCreateMenuItem($CurrentVer,$About)

GUICtrlSetState($About_Ver,$GUI_DISABLE)
Global $NoteEditor = GUICtrlCreateEdit("", 4, 4, 255, 160, BitOR($ES_WANTRETURN, $WS_VSCROLL))
GUICtrlSetData(-1, "")
GUISetState(@SW_SHOW)

$ButtonBKColor = $CurrentAccent


While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
  Case $About_About
   TyleoAbout($Progname)

 EndSwitch
WEnd