Code:
#cs======================================================================================================================================
| Eine Fertige Schnellstartleiste für jeden PC/jedes Betriebssystem
|
| Auflösung sollte größer als 1024*768 sein
| Anzahl der Anwendungen: 19 + Optionen + Exit
| Lädt die Daten aus einer Config.ini, damit sie bei einem neustart nicht verloren gehen
| Die Leiste erscheint wenn man mit der Maus an den oberen Bildschirmrand fährt
| und verschwindet wenn man mit der Maus von der Leiste herunter fährt
|
| Zum Beenden den Beenden-knopf ganz rechts klicken
|
| @Author : Proffni
| @version : 1.0.0.9
|
=========================================================================================================================================
#ce
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <IE.au3>
#include <Array.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#include <EditConstants.au3>
#include <File.au3>
Opt('MustDeclareVars', 1)
Local $pos
While 1
$pos = MouseGetPos()
If $pos[1] < 2 Then
_Main()
EndIf
WEnd
; die komplette schnellstartleiste ist als eine einzige Funktion erstellt. so kann sie später auch in andere Programme eingebaut werden als Toolbar oder "Cheatbar"
Func _Main()
;variablendevlaration
Local $slotname[19], $speicherort[19], $iconspeicherort[19], $iconnummer[19], $pos2, $desktopwidth, $mittelposition, $slot[2][19], $msg, $msg2, $optionen, $ExitID, $hfilesel,$Programmordner
$Programmordner = @ScriptDir
;festlegen der Startwerte der Variablen
; 1. die "Labels"
$slotname[0] = IniRead("Config.ini","slot1","Verknüpfungsname","Unbenannt")
$slotname[1] = IniRead("Config.ini","slot2","Verknüpfungsname","Unbenannt")
$slotname[2] = IniRead("Config.ini","slot3","Verknüpfungsname","Unbenannt")
$slotname[3] = IniRead("Config.ini","slot4","Verknüpfungsname","Unbenannt")
$slotname[4] = IniRead("Config.ini","slot5","Verknüpfungsname","Unbenannt")
$slotname[5] = IniRead("Config.ini","slot6","Verknüpfungsname","Unbenannt")
$slotname[6] = IniRead("Config.ini","slot7","Verknüpfungsname","Unbenannt")
$slotname[7] = IniRead("Config.ini","slot8","Verknüpfungsname","Unbenannt")
$slotname[8] = IniRead("Config.ini","slot9","Verknüpfungsname","Unbenannt")
$slotname[9] = IniRead("Config.ini","slot10","Verknüpfungsname","Unbenannt")
$slotname[10] = IniRead("Config.ini","slot11","Verknüpfungsname","Unbenannt")
$slotname[11] = IniRead("Config.ini","slot12","Verknüpfungsname","Unbenannt")
$slotname[12] = IniRead("Config.ini","slot13","Verknüpfungsname","Unbenannt")
$slotname[13] = IniRead("Config.ini","slot14","Verknüpfungsname","Unbenannt")
$slotname[14] = IniRead("Config.ini","slot15","Verknüpfungsname","Unbenannt")
$slotname[15] = IniRead("Config.ini","slot16","Verknüpfungsname","Unbenannt")
$slotname[16] = IniRead("Config.ini","slot17","Verknüpfungsname","Unbenannt")
$slotname[17] = IniRead("Config.ini","slot18","Verknüpfungsname","Unbenannt")
$slotname[18] = IniRead("Config.ini","slot19","Verknüpfungsname","Unbenannt")
;2. die Speicherorte der zu verlinkenden Programmen
$speicherort[0] = IniRead("Config.ini","slot1","Pfad",$Programmordner&"\not definited.exe")
$speicherort[1] = IniRead("Config.ini","slot2","Pfad",$Programmordner&"\not definited.exe")
$speicherort[2] = IniRead("Config.ini","slot3","Pfad",$Programmordner&"\not definited.exe")
$speicherort[3] = IniRead("Config.ini","slot4","Pfad",$Programmordner&"\not definited.exe")
$speicherort[4] = IniRead("Config.ini","slot5","Pfad",$Programmordner&"\not definited.exe")
$speicherort[5] = IniRead("Config.ini","slot6","Pfad",$Programmordner&"\not definited.exe")
$speicherort[6] = IniRead("Config.ini","slot7","Pfad",$Programmordner&"\not definited.exe")
$speicherort[7] = IniRead("Config.ini","slot8","Pfad",$Programmordner&"\not definited.exe")
$speicherort[8] = IniRead("Config.ini","slot9","Pfad",$Programmordner&"\not definited.exe")
$speicherort[9] = IniRead("Config.ini","slot10","Pfad",$Programmordner&"\not definited.exe")
$speicherort[10] = IniRead("Config.ini","slot11","Pfad",$Programmordner&"\not definited.exe")
$speicherort[11] = IniRead("Config.ini","slot12","Pfad",$Programmordner&"\not definited.exe")
$speicherort[12] = IniRead("Config.ini","slot13","Pfad",$Programmordner&"\not definited.exe")
$speicherort[13] = IniRead("Config.ini","slot14","Pfad",$Programmordner&"\not definited.exe")
$speicherort[14] = IniRead("Config.ini","slot15","Pfad",$Programmordner&"\not definited.exe")
$speicherort[15] = IniRead("Config.ini","slot16","Pfad",$Programmordner&"\not definited.exe")
$speicherort[16] = IniRead("Config.ini","slot17","Pfad",$Programmordner&"\not definited.exe")
$speicherort[17] = IniRead("Config.ini","slot18","Pfad",$Programmordner&"\not definited.exe")
$speicherort[18] = IniRead("Config.ini","slot19","Pfad",$Programmordner&"\not definited.exe")
;Die Speicherorte der zugehörigen Icons und die "Iconnummer"
; (Iconnummer ist z.B. in *.dll nötig, da dort mehrere Icons "vereint" sind
$iconspeicherort[0] = IniRead("Config.ini","slot1","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[1] = IniRead("Config.ini","slot2","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[2] = IniRead("Config.ini","slot3","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[3] = IniRead("Config.ini","slot4","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[4] = IniRead("Config.ini","slot5","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[5] = IniRead("Config.ini","slot6","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[6] = IniRead("Config.ini","slot7","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[7] = IniRead("Config.ini","slot8","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[8] = IniRead("Config.ini","slot9","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[9] = IniRead("Config.ini","slot10","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[10] = IniRead("Config.ini","slot11","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[11] = IniRead("Config.ini","slot12","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[12] = IniRead("Config.ini","slot13","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[13] = IniRead("Config.ini","slot14","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[14] = IniRead("Config.ini","slot15","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[15] = IniRead("Config.ini","slot16","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[16] = IniRead("Config.ini","slot17","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[17] = IniRead("Config.ini","slot18","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconspeicherort[18] = IniRead("Config.ini","slot19","IconPfad","%SystemDrive%/windows/system32/shell32.dll")
$iconnummer[0] = IniRead("Config.ini","slot1","Iconnummer","1")
$iconnummer[1] = IniRead("Config.ini","slot2","Iconnummer","1")
$iconnummer[2] = IniRead("Config.ini","slot3","Iconnummer","1")
$iconnummer[3] = IniRead("Config.ini","slot4","Iconnummer","1")
$iconnummer[4] = IniRead("Config.ini","slot5","Iconnummer","1")
$iconnummer[5] = IniRead("Config.ini","slot6","Iconnummer","1")
$iconnummer[6] = IniRead("Config.ini","slot7","Iconnummer","1")
$iconnummer[7] = IniRead("Config.ini","slot8","Iconnummer","1")
$iconnummer[8] = IniRead("Config.ini","slot9","Iconnummer","1")
$iconnummer[9] = IniRead("Config.ini","slot10","Iconnummer","1")
$iconnummer[10] = IniRead("Config.ini","slot11","Iconnummer","1")
$iconnummer[11] = IniRead("Config.ini","slot12","Iconnummer","1")
$iconnummer[12] = IniRead("Config.ini","slot13","Iconnummer","1")
$iconnummer[13] = IniRead("Config.ini","slot14","Iconnummer","1")
$iconnummer[14] = IniRead("Config.ini","slot15","Iconnummer","1")
$iconnummer[15] = IniRead("Config.ini","slot16","Iconnummer","1")
$iconnummer[16] = IniRead("Config.ini","slot17","Iconnummer","1")
$iconnummer[17] = IniRead("Config.ini","slot18","Iconnummer","1")
$iconnummer[18] = IniRead("Config.ini","slot19","Iconnummer","1")
;die Auflösung erfassen
$desktopwidth = @desktopwidth
;die Position der Icons erfassen
$mittelposition = $desktopwidth / 22
;erstellen der Schnellstartleiste
GUICreate("Schnellstarter", $desktopwidth, 40, 0, 0, 0x80000000)
;Deklarieren der Icons/Verknüpfungen mithilfe der oben deklarierten Variablen
$slot[0][0] = GUICtrlCreateButton($slotname[0], $mittelposition - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[0], $iconnummer[0])
$slot[0][1] = GUICtrlCreateButton($slotname[1], $mittelposition * 2 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[1], $iconnummer[1])
$ExitID = GUICtrlCreateButton("Exit", $mittelposition * 21 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, "C:\Windows\system32\shell32.dll", -113)
$slot[0][2] = GUICtrlCreateButton($slotname[2], $mittelposition * 3 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[2], $iconnummer[2])
$slot[0][3] = GUICtrlCreateButton($slotname[3], $mittelposition * 4 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[3], $iconnummer[3])
$slot[0][4] = GUICtrlCreateButton($slotname[4], $mittelposition * 5 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[4], $iconnummer[4])
$slot[0][5] = GUICtrlCreateButton($slotname[5], $mittelposition * 6 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[5], $iconnummer[5])
$slot[0][6] = GUICtrlCreateButton($slotname[6], $mittelposition * 7 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[6], $iconnummer[6])
$slot[0][7] = GUICtrlCreateButton($slotname[7], $mittelposition * 8 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[7], $iconnummer[7])
$slot[0][8] = GUICtrlCreateButton($slotname[8], $mittelposition * 9 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[8], $iconnummer[8])
$slot[0][9] = GUICtrlCreateButton($slotname[9], $mittelposition * 10 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[9], $iconnummer[9])
$slot[0][10] = GUICtrlCreateButton($slotname[10], $mittelposition * 11 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[10], $iconnummer[10])
$slot[0][11] = GUICtrlCreateButton($slotname[11], $mittelposition * 12 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[11], $iconnummer[11])
$slot[0][12] = GUICtrlCreateButton($slotname[12], $mittelposition * 13 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[12], $iconnummer[12])
$slot[0][13] = GUICtrlCreateButton($slotname[13], $mittelposition * 14 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[13], $iconnummer[13])
$slot[0][14] = GUICtrlCreateButton($slotname[14], $mittelposition * 15 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[14], $iconnummer[14])
$slot[0][15] = GUICtrlCreateButton($slotname[15], $mittelposition * 16 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[15], $iconnummer[15])
$slot[0][16] = GUICtrlCreateButton($slotname[16], $mittelposition * 17 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[16], $iconnummer[16])
$slot[0][17] = GUICtrlCreateButton($slotname[17], $mittelposition * 18 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[17], $iconnummer[17])
$slot[0][18] = GUICtrlCreateButton($slotname[18], $mittelposition * 19 - 20, 0, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[18], $iconnummer[18])
$optionen = GUICtrlCreateButton("Optionen", $mittelposition * 20 - 20, 0, 40, 40)
WinSetOnTop("Schnellstarter", "", 1)
GUISetState() ; display the GUI
Do
;erfassen der von GUI ausgehenden "Nachrichten"
$msg = GUIGetMsg()
;je nach nachricht die eintsprechenden Programme ausführen (auch mit oben deklarierten Variablen)
local $pos2
$pos2 = MouseGetPos()
If $pos2[1] > 40 Then
GUIDelete("Schnellstartleiste")
ExitLoop
EndIf
Select
Case $msg = $ExitID
GUIDelete("Schnellstartleiste")
Exit
Case $msg = $slot[0][0]
run($speicherort[0])
Case $msg = $slot[0][1]
Run($speicherort[1])
Case $msg = $slot[0][2]
Run($speicherort[2])
Case $msg = $slot[0][3]
Run($speicherort[3])
Case $msg = $slot[0][4]
Run($speicherort[4])
Case $msg = $slot[0][5]
Run($speicherort[5])
Case $msg = $slot[0][6]
Run($speicherort[6])
Case $msg = $slot[0][7]
Run($speicherort[7])
Case $msg = $slot[0][8]
Run($speicherort[8])
Case $msg = $slot[0][9]
Run($speicherort[9])
Case $msg = $slot[0][10]
Run($speicherort[10])
Case $msg = $slot[0][11]
Run($speicherort[11])
Case $msg = $slot[0][12]
Run($speicherort[12])
Case $msg = $slot[0][13]
Run($speicherort[13])
Case $msg = $slot[0][14]
Run($speicherort[14])
Case $msg = $slot[0][15]
Run($speicherort[15])
Case $msg = $slot[0][16]
Run($speicherort[16])
Case $msg = $slot[0][17]
Run($speicherort[17])
Case $msg = $slot[0][18]
Run($speicherort[18])
Case $msg = $optionen
local $ExitID2,$slotnamen[19],$pfadn[19],$iconpfadn[19],$iconnummern[19]
;Optionen Fenster öffnen
GUICreate("Optionen", 400, 400, 200, 200)
GUICtrlCreateLabel("bitte wähle einen Slot aus den du ändern willst", 0, 0)
$ExitID2 = GUICtrlCreateButton("Optionen schließen", 300, 0, 100, 30)
;die icons wieder einfügen, um auszuwählen welcher verknüpfung geändert werden soll
;die weiteren Slots werden noch hinzugefügt
$slot[1][0] = GUICtrlCreateButton($slotname[0], 0, 40, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[0], $iconnummer[0])
$slot[1][1] = GUICtrlCreateButton($slotname[1],40,40,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[1],$iconnummer[1])
$slot[1][2] = GUICtrlCreateButton($slotname[2],80,40,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[2],$iconnummer[2])
$slot[1][3] = GUICtrlCreateButton($slotname[3],120,40,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[3],$iconnummer[3])
$slot[1][4] = GUICtrlCreateButton($slotname[4],160,40,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[4],$iconnummer[4])
$slot[1][5] = GUICtrlCreateButton($slotname[5],200,40,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[5],$iconnummer[5])
$slot[1][6] = GUICtrlCreateButton($slotname[6],240,40,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[6],$iconnummer[6])
$slot[1][7] = GUICtrlCreateButton($slotname[7],0,80,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[7],$iconnummer[7])
$slot[1][8] = GUICtrlCreateButton($slotname[8],40,80,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[8],$iconnummer[8])
$slot[1][9] = GUICtrlCreateButton($slotname[9],80,80,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[9],$iconnummer[9])
$slot[1][10] = GUICtrlCreateButton($slotname[10],120,80,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[10],$iconnummer[10])
$slot[1][11] = GUICtrlCreateButton($slotname[11],160,80,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[11],$iconnummer[11])
$slot[1][12] = GUICtrlCreateButton($slotname[12],200,80,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[12],$iconnummer[12])
$slot[1][13] = GUICtrlCreateButton($slotname[13],240,80,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[13],$iconnummer[13])
$slot[1][14] = GUICtrlCreateButton($slotname[14],0,120,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[14],$iconnummer[14])
$slot[1][15] = GUICtrlCreateButton($slotname[15],40,120,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[15],$iconnummer[15])
$slot[1][16] = GUICtrlCreateButton($slotname[16],80,120,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[16],$iconnummer[16])
$slot[1][17] = GUICtrlCreateButton($slotname[17],120,120,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[17],$iconnummer[17])
$slot[1][18] = GUICtrlCreateButton($slotname[18],160,120,40,40,$BS_ICON)
GUICtrlSetImage(-1, $iconspeicherort[18],$iconnummer[18])
;GUI anzeigen:
GuiSetState()
Do
;erfassen der vom Optionenfenster ausgehenden "Nachrichten":
$msg2 = GUIGetMsg()
Select
; je nach nachricht eingabefenster starten, um die daten der neuen
;verknüpfung festzulegen
; wird in den variablen abgespeichert
Case $msg2 = $slot[1][0]
$slotnamen[0] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[0])
IniWrite("Config.ini","slot1","Verknüpfungsname",$slotnamen[0]
$pfadn[0] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[0])
IniWrite("Config.ini","slot1","Pfad",$pfadn[0]
$iconpfadn[0] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[0])
IniWrite("Config.ini","slot1","IconPfad",$iconpfadn[0]
$iconnummern[0] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[0])
IniWrite("Config.ini","slot1","Iconnummer",$iconnummern[0])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run("@ScriptDir/Schnellstartleiste.exe")
Case $msg2 = $slot[1][1]
;Abfragen der neuen Daten
$slotnamen[1] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[1])
$pfadn[1] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[1])
$iconpfadn[1] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[1])
$iconnummern[1] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[1])
;Schreiben der geänderten daten in die Config.ini
IniWrite("Config.ini","slot2","Verknüpfungsname",$slotnamen[1])
IniWrite("Config.ini","slot2","Pfad",$pfadn[1])
IniWrite("Config.ini","slot2","IconPfad",$iconpfadn[1])
IniWrite("Config.ini","slot2","Iconnummer",$iconnummern[1])
;Beenden des Optionenfensters und der Schnellstartleiste
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
;neustart der Schnellstartleiste mit den geänderten daten aus der Config.ini
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][2]
$slotnamen[2] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[2])
$pfadn[2] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[2])
$iconpfadn[2] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[2])
$iconnummern[2] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[2])
IniWrite("Config.ini","slot3","Verknüpfungsname",$slotnamen[2])
IniWrite("Config.ini","slot3","Pfad",$pfadn[2])
IniWrite("Config.ini","slot3","IconPfad",$iconpfadn[2])
IniWrite("Config.ini","slot3","Iconnummer",$iconnummern[2])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][3]
$slotnamen[3] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[3])
$pfadn[3] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[3])
$iconpfadn[3] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[3])
$iconnummern[3] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[3])
IniWrite("Config.ini","slot4","Verknüpfungsname",$slotnamen[3])
IniWrite("Config.ini","slot4","Pfad",$pfadn[3])
IniWrite("Config.ini","slot4","IconPfad",$iconpfadn[3])
IniWrite("Config.ini","slot4","Iconnummer",$iconnummern[3])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][4]
$slotnamen[4] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[4])
$pfadn[4] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[4])
$iconpfadn[4] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[4])
$iconnummern[4] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[4])
IniWrite("Config.ini","slot5","Verknüpfungsname",$slotnamen[4])
IniWrite("Config.ini","slot5","Pfad",$pfadn[4])
IniWrite("Config.ini","slot5","IconPfad",$iconpfadn[4])
IniWrite("Config.ini","slot5","Iconnummer",$iconnummern[4])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][5]
$slotnamen[5] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[5])
$pfadn[5] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[5])
$iconpfadn[5] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[5])
$iconnummern[5] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[5])
IniWrite("Config.ini","slot6","Verknüpfungsname",$slotnamen[5])
IniWrite("Config.ini","slot6","Pfad",$pfadn[5])
IniWrite("Config.ini","slot6","IconPfad",$iconpfadn[5])
IniWrite("Config.ini","slot6","Iconnummer",$iconnummern[5])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][6]
$slotnamen[6] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[6])
$pfadn[6] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[6])
$iconpfadn[6] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[6])
$iconnummern[6] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[6])
IniWrite("Config.ini","slot7","Verknüpfungsname",$slotnamen[6])
IniWrite("Config.ini","slot7","Pfad",$pfadn[6])
IniWrite("Config.ini","slot7","IconPfad",$iconpfadn[6])
IniWrite("Config.ini","slot7","Iconnummer",$iconnummern[6])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][7]
$slotnamen[7] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[7])
$pfadn[7] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[7])
$iconpfadn[7] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[7])
$iconnummern[7] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[7])
IniWrite("Config.ini","slot8","Verknüpfungsname",$slotnamen[7])
IniWrite("Config.ini","slot8","Pfad",$pfadn[7])
IniWrite("Config.ini","slot8","IconPfad",$iconpfadn[7])
IniWrite("Config.ini","slot8","Iconnummer",$iconnummern[7])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][8]
$slotnamen[8] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[8])
$pfadn[8] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[8])
$iconpfadn[8] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[8])
$iconnummern[8] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[8])
IniWrite("Config.ini","slot9","Verknüpfungsname",$slotnamen[8])
IniWrite("Config.ini","slot9","Pfad",$pfadn[8])
IniWrite("Config.ini","slot9","IconPfad",$iconpfadn[8])
IniWrite("Config.ini","slot9","Iconnummer",$iconnummern[8])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][9]
$slotnamen[9] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[9])
$pfadn[9] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[9])
$iconpfadn[9] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[9])
$iconnummern[9] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[9])
IniWrite("Config.ini","slot10","Verknüpfungsname",$slotnamen[9])
IniWrite("Config.ini","slot10","Pfad",$pfadn[9])
IniWrite("Config.ini","slot10","IconPfad",$iconpfadn[9])
IniWrite("Config.ini","slot10","Iconnummer",$iconnummern[9])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][10]
$slotnamen[10] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[10])
$pfadn[10] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[10])
$iconpfadn[10] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[10])
$iconnummern[10] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[10])
IniWrite("Config.ini","slot11","Verknüpfungsname",$slotnamen[10])
IniWrite("Config.ini","slot11","Pfad",$pfadn[10])
IniWrite("Config.ini","slot11","IconPfad",$iconpfadn[10])
IniWrite("Config.ini","slot11","Iconnummer",$iconnummern[10])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][11]
$slotnamen[11] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[11])
$pfadn[11] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[11])
$iconpfadn[11] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[11])
$iconnummern[11] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[11])
IniWrite("Config.ini","slot12","Verknüpfungsname",$slotnamen[11])
IniWrite("Config.ini","slot12","Pfad",$pfadn[11])
IniWrite("Config.ini","slot12","IconPfad",$iconpfadn[11])
IniWrite("Config.ini","slot12","Iconnummer",$iconnummern[11])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][12]
$slotnamen[12] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[12])
$pfadn[12] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[12])
$iconpfadn[12] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[12])
$iconnummern[12] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[12])
IniWrite("Config.ini","slot13","Verknüpfungsname",$slotnamen[12])
IniWrite("Config.ini","slot13","Pfad",$pfadn[12])
IniWrite("Config.ini","slot13","IconPfad",$iconpfadn[12])
IniWrite("Config.ini","slot13","Iconnummer",$iconnummern[12])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][13]
$slotnamen[13] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[13])
$pfadn[13] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[13])
$iconpfadn[13] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[13])
$iconnummern[13] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[13])
IniWrite("Config.ini","slot14","Verknüpfungsname",$slotnamen[13])
IniWrite("Config.ini","slot14","Pfad",$pfadn[13])
IniWrite("Config.ini","slot14","IconPfad",$iconpfadn[13])
IniWrite("Config.ini","slot14","Iconnummer",$iconnummern[13])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][14]
$slotnamen[14] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[14])
$pfadn[14] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[14])
$iconpfadn[14] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[14])
$iconnummern[14] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[14])
IniWrite("Config.ini","slot15","Verknüpfungsname",$slotnamen[14])
IniWrite("Config.ini","slot15","Pfad",$pfadn[14])
IniWrite("Config.ini","slot15","IconPfad",$iconpfadn[14])
IniWrite("Config.ini","slot15","Iconnummer",$iconnummern[14])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][15]
$slotnamen[15] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[15])
$pfadn[15] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[15])
$iconpfadn[15] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[15])
$iconnummern[15] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[15])
IniWrite("Config.ini","slot16","Verknüpfungsname",$slotnamen[15])
IniWrite("Config.ini","slot16","Pfad",$pfadn[15])
IniWrite("Config.ini","slot16","IconPfad",$iconpfadn[15])
IniWrite("Config.ini","slot16","Iconnummer",$iconnummern[15])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][16]
$slotnamen[16] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[16])
$pfadn[16] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[16])
$iconpfadn[16] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[16])
$iconnummern[16] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[16])
IniWrite("Config.ini","slot17","Verknüpfungsname",$slotnamen[16])
IniWrite("Config.ini","slot17","Pfad",$pfadn[16])
IniWrite("Config.ini","slot17","IconPfad",$iconpfadn[16])
IniWrite("Config.ini","slot17","Iconnummer",$iconnummern[16])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][17]
$slotnamen[17] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[17])
$pfadn[17] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[17])
$iconpfadn[17] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[17])
$iconnummern[17] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[17])
IniWrite("Config.ini","slot18","Verknüpfungsname",$slotnamen[17])
IniWrite("Config.ini","slot18","Pfad",$pfadn[17])
IniWrite("Config.ini","slot18","IconPfad",$iconpfadn[17])
IniWrite("Config.ini","slot18","Iconnummer",$iconnummern[17])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $slot[1][18]
$slotnamen[18] = InputBox("ändern des slots 1", "bitte gib den Namen der neuen Verknüpfung an", $slotname[18])
$pfadn[18] = InputBox("ändern des slots 1", "bitte gib den Pfad der neuen Verknüpfung an", $speicherort[18])
$iconpfadn[18] = InputBox("ändern des slots 1", "bitte gib den Speicherort des LinkIcons an", $iconspeicherort[18])
$iconnummern[18] = InputBox("ändern des slots 1", "bitte gib die Iconnummer an (meist 1)", $iconnummer[18])
IniWrite("Config.ini","slot19","Verknüpfungsname",$slotnamen[18])
IniWrite("Config.ini","slot19","Pfad",$pfadn[18])
IniWrite("Config.ini","slot19","IconPfad",$iconpfadn[18])
IniWrite("Config.ini","slot19","Iconnummer",$iconnummern[18])
GUIDelete("Optionen")
GUIDelete("Schnellstarter")
Run($Programmordner&"/Schnellstartleiste.exe")
Exit
Case $msg2 = $GUI_EVENT_CLOSE or $msg2 = $ExitID2
GUIDelete("Optionen")
EndSelect
;schließen des Optionenfensters
Until $msg2 = $GUI_EVENT_CLOSE or $msg2 = $ExitID2
EndSelect
;schließen der Schnellstartleiste
Until $msg = $ExitID
EndFunc ;==>_Main
