Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #SingleInstance, Force
- ; Variable List
- ;--------------------------------------------------------------------------------------
- Gui_BackGround_Color := "Black"
- Gui_Text_Color := "White"
- File_To_Edit :=
- Search_Template_File :=
- Replace_Template_File :=
- ; Gui Options & Settings
- ;------------------------------------------------------------------------------------------
- Gui, Color, %Gui_BackGround_Color%
- Gui, Font, c%Gui_Text_Color%
- Gui, +AlwaysOnTop
- ; Settings & File Options
- ;------------------------------------------------------------------------------------------
- ;--------------------------------------------------------------------------------------------
- Gui, Add, GroupBox,cRed x10 y10 w980 h100,Settings / File Options
- Gui, Add, CheckBox, x20 y30 Checked vAlways gAlways_On_Top, Always On Top
- ; Use File
- ;--------------------------------------------
- Gui, Add, GroupBox, x150 y14 w200 h90,
- Gui, Add, Text, x160 y25, Use Text File?
- Gui, Add, Radio, x160 y44 vUse_Text_File_Yes gUse_Text_File, Yes
- Gui, Add, Radio, x210 y44 Checked vUse_Text_File_No gUse_Text_File, No
- Gui, Add, Text, x160 y63, File Name:
- Gui, Add, Edit,cBlack x160 y80 w140 h17 vFile_To_Edit,
- Gui, Add, Button, x+5 y80 w40 h17 vLoad1,Load
- GuiControl,Disable,File_To_Edit
- GuiControl,Disable,Load1
- ; Use Search Template
- ;------------------------------------------
- Gui, Add, GroupBox, x360 y14 w200 h90,
- Gui, Add, Text, x370 y25, Use Search Template?
- Gui, Add, Radio, x370 y44 vUse_Search_Template_Yes gUse_Search_File, Yes
- Gui, Add, Radio, x420 y44 Checked vUse_Search_Template_No gUse_Search_File, No
- Gui, Add, Text, x370 y63, File Name:
- Gui, Add, Edit,cBlack x370 y80 w140 h17 vSearch_Template_File,
- Gui, Add, Button, x+5 y80 w40 h17 vLoad2,Load
- GuiControl,Disable,Search_Template_File
- GuiControl,Disable,Load2
- ; Use Replace Template
- ;------------------------------------------
- Gui, Add, GroupBox, x570 y14 w200 h90,
- Gui, Add, Text, x580 y25, Use Replace Template?
- Gui, Add, Radio, x580 y44 vUse_Replace_Template_Yes gUse_Replace_File, Yes
- Gui, Add, Radio, x630 y44 Checked vUse_Replace_Template_No gUse_Replace_File, No
- Gui, Add, Text, x580 y63, File Name:
- Gui, Add, Edit,cBlack x580 y80 w140 h17 vReplace_Template_File,
- Gui, Add, Button, x+5 y80 w40 h17 vLoad3,Load
- GuiControl,Disable,Replace_Template_File
- GuiControl,Disable,Load3
- ; Export File
- ;-------------------------------------------
- Gui, Add, GroupBox, x770 y14 w200 h90,
- Gui, Add, Text, x780 y25, Use Replace Template?
- Gui, Add, Radio, x780 y44 , Yes
- Gui, Add, Radio, x830 y44 Checked , No
- Gui, Add, Text, x780 y63, File Name:
- Gui, Add, Edit,cBlack x780 y80 w140 h17 ,
- Gui, Add, Button, x+5 y80 w40 h17 vLoad4,Load
- ;GuiControl,Disable,
- ;GuiControl,Disable,Load4
- Gui, Show, x0 y0 w1000 h600, Work Order GUI
- Gui, Submit,NoHide
- return
- ; Labels
- ;---------------------------------------------------------------------------------------------
- GuiClose:
- ExitApp
- Always_On_Top:
- Gui, Submit, NoHide
- if(Always==1)
- Gui, +AlwaysOnTop
- else if(Always==0)
- Gui, -AlwaysOnTop
- return
- Use_Text_File:
- Gui, Submit, NoHide
- if(Use_Text_File_Yes==1)
- {
- GuiControl,Enable,File_To_Edit
- GuiControl,Enable,Load1
- }
- if(Use_Text_File_No==1)
- {
- GuiControl,Disable,File_To_Edit
- GuiControl,Disable,Load1
- }
- return
- Use_Search_File:
- Gui, Submit, NoHide
- if(Use_Search_Template_Yes==1)
- {
- GuiControl,Enable,Search_Template_File
- GuiControl,Enable,Load2
- }
- if(Use_Search_Template_No==1)
- {
- GuiControl,Disable,Search_Template_File
- GuiControl,Disable,Load2
- }
- return
- Use_Replace_File:
- Gui, Submit, NoHide
- if(Use_Replace_Template_Yes==1)
- {
- GuiControl,Enable,Replace_Template_File
- GuiControl,Enable,Load3
- }
- if(Use_Replace_Template_No==1)
- {
- GuiControl,Disable,Replace_Template_File
- GuiControl,Disable,Load3
- }
- return
- ^Numpad0::ExitApp
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement