ACHTUNG v 1.0.0.9 released
Danke an alle die mir geholfen haben, meine Schnellstartleiste zu vervollständigen
Hier Der Code (v 1.0.0.8): (als Download unten)
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
|
| @Author : Proffni
| @version : 1.0.0.8
|
================================================== ================================================== ===================================
#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)
_Main()
; 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], $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)
Select
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
Die Datei definited ist nötig, damit eine Fehlermeldung erscheint, wenn man versucht einen nicht festgelegten Button zu nutzen Hier der Code für die datei "not definited.exe"
Code:
#cs | Dies ist ein Unterprogramm der Anwendung "Schnellstartleiste.exe" |bei fragen ist ein Support untermöglich | Diese Datei ist ab Version 1.0.0.7 enthalten #ce ;ganz schlicht und einfach eine Textausgabe, dass der Button noch nicht belegt wurde ; bei klick auf ok schließt sich die meldung und dieses "not definited" programm msgbox(0,"not definited","dieser Button wurde noch nicht belegt") exit
DIE AKTUELLE VERSION: 1.0.0.9 released
Hier der Code:
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
es sind 19 buttons, ausgelegt auf die eine Bildschirmauflösung von mindestens 1024 als Breite (z.B. 1024/768 ; 1280/1024:1680/1050 (andere Auflösung natürlich auch möglich, da sich die Schnellstartleiste anpasst)
19 buttons +1 optionen button und 1 Beenden Button
Versions Infos:
neu version 1.0.0.4:Schnellstartleiste permanent im Vordergrund
neu Version 1.0.0.5:Icons statt Namen eingebaut
neu Version 1.0.0.6:Die Icons passen sich der Bildschirmweite an.
neu Version 1.0.0.7:Die Verknüpfungen sind via Optionen zu ändern (diese Version funktioniert nicht richtig
neu Version 1.0.0.8:Die Daten der Verknüpfungen sind in einer Config.ini (im selben ordner wie die Leiste) abgespeichert, so dass sie bei einem neustart der leiste nicht verloren gehen. Die funktion die Verknüpfungen abzuändern ist nun voll funktionstüchtig
neu Version 1.0.0.9:Die Schnellstartleiste erscheint nur wenn man ganz an den oberen Rand des Bildschirms fährt. sobald man mit der Maus von der leiste runterfährt verschwindet sie wieder
neu Version 1.0.0.5:Icons statt Namen eingebaut
neu Version 1.0.0.6:Die Icons passen sich der Bildschirmweite an.
neu Version 1.0.0.7:Die Verknüpfungen sind via Optionen zu ändern (diese Version funktioniert nicht richtig
neu Version 1.0.0.8:Die Daten der Verknüpfungen sind in einer Config.ini (im selben ordner wie die Leiste) abgespeichert, so dass sie bei einem neustart der leiste nicht verloren gehen. Die funktion die Verknüpfungen abzuändern ist nun voll funktionstüchtig
neu Version 1.0.0.9:Die Schnellstartleiste erscheint nur wenn man ganz an den oberen Rand des Bildschirms fährt. sobald man mit der Maus von der leiste runterfährt verschwindet sie wieder
Ich werde jetzt die nächste Zeit nicht weiter daran arbeiten. Wenn es Probleme oder fragen gibt einfach eine email an
schicken
Im Download enthalten:
In der Schnellstartleiste.rar File sind enthalten:
Schnellstartleiste.exe
mit
Schnellstartleiste.au3
not definited.exe
mit
not definited.au3 (die Fehlermeldung bei nicht definierten Buttons)
Config.ini (mit vorgespeichert: Editor, Firefox, Internet Explorer)
ReadMe.txt (nochmal die anleitung und supportmail)
Schnellstartleiste.exe
mit
Schnellstartleiste.au3
not definited.exe
mit
not definited.au3 (die Fehlermeldung bei nicht definierten Buttons)
Config.ini (mit vorgespeichert: Editor, Firefox, Internet Explorer)
ReadMe.txt (nochmal die anleitung und supportmail)
die "Schnellstartleiste.rar" enthält die Version 1.0.0.8
die aktuellste version erhält man durch download der
"Schnellstartleistev1009.rar"
was der unterschied ist findet man in den Versionsinfos
die aktuellste version erhält man durch download der
"Schnellstartleistev1009.rar"
was der unterschied ist findet man in den Versionsinfos
zum Download:
VirenCheck ist in einem meiner Posts (auf seite 2)
MfG, euer Proffni





möglich
| Diese Datei ist ab Version 1.0.0.7 enthalten
#ce
;ganz schlicht und einfach eine Textausgabe, dass der Button noch nicht belegt wurde
; bei klick auf ok schließt sich die meldung und dieses "not definited" programm
msgbox(0,"not definited","dieser Button wurde noch nicht belegt")
exit

