anbei ein Skript auf Tab 3 Basis. Dank des Forums wurde dieses aufgehübscht.
Fügt in den Pfaden eure Bilder ein.
Viel Spaß damit.
Code: Select all
SplashImage, C:\... , B CW00FFFF FS50 , Die Anwendung wird gestartet... ; bei C:\... Link für Startbild eingeben
Sleep, 4000 ; Startscreen erscheint 4000ms
SplashImage, Off ;Startsequenz Ende
; Tab-Steuerelement:
Gui, Destroy ; Vermeidung mehrerer Anwendungen
BkgImg := "C:\..." ; Pfad für Hintergundbild der Anwendung hier eingeben
Gui, Color, White ; Hintergrundfarbe Anwendung
Gui, Add, Picture, x20 y50 w1000 h65, C:\... ; Logo für Kopf der Anwendung hier eingeben
Gui, Font, s35, ; Schriftgröße Karten Auswahlreiter
Gui, Add, Tab3, w1300 h600 Y+50, Reiter 1|Reiter 2|Reiter 3|Reiter 4|Reiter 5 ; TAB-Steuerelemente, Größe
Gui, Font, s25, ; Schriftgröße der Buttons etc.
Gui, Add, Button, VBtn, Button1 ; Tab 1
GuiControlGet, Btn, Pos
Gui, Add, Button,, Button2
Gui, Add, Button,, Button3
Gui, Add, Button,, Button4
Gui, Add, Button,,Button5
Gui, Add, Pic, x%BtnX% y%BtnY% w1280 h470 +0x04000000, %BkgImg% ; wichtig: das Hintergrundbild muss als letztes control mit +0x04000000 eingefügt werden
Gui, Tab, 2, ; Tab 2
Gui, Add, Button,, Button6
Gui, Add, Pic, x%BtnX% y%BtnY% w1280 h470 +0x04000000, %BkgImg% ; wichtig: das Hintergrundbild muss als letztes control mit +0x04000000 eingefügt werden
Gui, Tab, 3 ; Tab 3
Gui, Add, Button,, Button7
Gui, Add, Button,, Button8
Gui, Add, Button,, Button9
Gui, Add, Button,, Button10
Gui, Add, Button,, Button11
Gui, Add, Pic, x%BtnX% y%BtnY% w1280 h470 +0x04000000, %BkgImg% ; wichtig: das Hintergrundbild muss als letztes control mit +0x04000000 eingefügt werden
Gui, Tab, 4 ; Tab 4
Gui, Add, Button,, Button12
Gui, Add, Button,, Button13
Gui, Add, Pic, x%BtnX% y%BtnY% w1280 h470 +0x04000000, %BkgImg% ; wichtig: das Hintergrundbild muss als letztes control mit +0x04000000 eingefügt werden
Gui, Tab, 5 ; Tab 5
Gui, Add, Button,, Button14
Gui, Add, Pic, x%BtnX% y%BtnY% w1280 h470 +0x04000000, %BkgImg% ; wichtig: das Hintergrundbild muss als letztes control mit +0x04000000 eingefügt werden
Gui, Tab ; nachfolgende Steuerelemente werden nicht als Teil des Tab-Steuerelements angesehen
Gui, Add, Button, default x1100, Beenden
Gui, Show, , Titel für Steuerelement hier angeben ; Fensterbreite optional, Titel Steuerelement
return
;Nachfolgend wird den einzelnen Buttons anhand ihrer Bezeichnung eine Funktion zugeordnet, * sind Platzhalter für Variablen:
;immer nach Loop Files den Pfad für Anwendung, Datei eingeben
Button1:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
Button2:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
Button3:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
Button4:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
Button5:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
Button6:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
Button7:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
Button8:
Run, \\C:\...
return
Button9:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
Button10:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
Button11:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
Button12:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
Button13:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
Button14:
Loop Files, \\C:\...
{
run %A_LoopFileFullPath%
IfMsgBox, No
break
}
return
ButtonBeenden:
GuiClose:
SplashImage, C:\... , B CW00FFFF FS50 , Die Anwendung wird beendet... ; Bei C:\... Pfad für Endbild eingeben
Sleep, 4000 ; Endbild erscheint für 4 Sekunden
SplashImage, Off
ExitApp ; Ende