This is my class
Code: Select all
class SuperGUI {
__New(GuiIndex, Scale, Inifile) {
; Constructor code
Scale := Floor(Scale/10)
this.Scale := Scale
this.GUIIndex := GuiIndex
this.Inifile := Inifile
}
ToggleSwitch(x, y, w, h, Buton1Image, Buton2Image, Visual, Action, InifileTag, IniSection) {
; global Visual
Inifile := this.Inifile
Scale := this.Scale
GuiIndex := this.GUIIndex
; Visual := Visual2
LocationX := Floor(x / scale)
LocationY := Floor(y / scale)
SizeX := Floor(w / scale)
SizeY := Floor(h / scale)
IniRead, InifileTag, %IniFile% , %IniSection%, %InifileTag%
if (InifileTag = 1)
{
Live := Buton1Image
}
Else if (InifileTag = 2)
{
Live := Buton2Image
}
Gui, %GuiIndex%: Add, Picture, x%LocationX% y%LocationY% w%SizeX% h%SizeY% +BackgroundTrans g%Action% v%Visual%, %Live%
}
TogleButtonAction(InifileTag, IniSection, Buton1Image, Buton2Image, Visual){
Inifile := this.Inifile
IniRead, IniFileTagR, %Inifile%, %IniSection%, %IniFileTag%
if (IniFileTagR = 1) {
GuiControl, , %Visual%, %Buton1Image%
IniWrite, 2 , %Inifile%, %IniSection%, %IniFileTag%
}
Else if (IniFileTagR = 2) {
GuiControl, , %Visual%, %Buton2Image%
IniWrite, 1 , %Inifile%, %IniSection%, %IniFileTag%
}
}
}
Code: Select all
CommonGUI := new SuperGUI(1, 10, "SettingsSave.ini")
CommonGUI.ToggleSwitch(90,90,60,30, on, off, "TogTog", "Toggle", "YUIO", "Main")
;== This is Action
Toggle:
CommonGUI.TogleButtonAction("YUIO", "Main", On, Off, "TogTog")
Return
If there is one experienced person who has similar experience about this, please help me. I appreciate it more
[Mod action: Topic moved from "Ask for Help (v2)" since this is v1 code.]