Hotkey Programm

franjob

Hi,
Ich scripte mir gerade ein Prograamm für Hotkeys, aber es funktioniert gerade nicht. Es kommt keine Fehler meldung. Aber es klappt nicht. Vielleicht kann mir wer helfen.
mein Code:

Code

#include <GUIConstants.au3>


$i1 = IniRead ( @ScriptDir & "\Klasse.ini", "Verzeichnis", "1", "0")
$i2 = IniRead ( @ScriptDir & "\Klasse.ini", "Verzeichnis", "2", "0")
$i3 = IniRead ( @ScriptDir & "\Klasse.ini", "Verzeichnis", "3", "0")
$i4 = IniRead ( @ScriptDir & "\Klasse.ini", "Verzeichnis", "4", "0")
$i5 = IniRead ( @ScriptDir & "\Klasse.ini", "Verzeichnis", "5", "0")
$i6 = IniRead ( @ScriptDir & "\Klasse.ini", "Hotkeys", "1", "0")
$i7 = IniRead ( @ScriptDir & "\Klasse.ini", "Hotkeys", "2", "0")
$i8 = IniRead ( @ScriptDir & "\Klasse.ini", "Hotkeys", "3", "0")
$i9 = IniRead ( @ScriptDir & "\Klasse.ini", "Hotkeys", "4", "0")
$i10 = IniRead ( @ScriptDir & "\Klasse.ini", "Hotkeys", "5", "0")


#Region ### START Koda GUI section ### Form=C:\Users\Franz\Desktop\Hotkey\Hotkeymanager.kxf
GUICreate("Hotkeymanager", 401, 461, 193, 125)
GUISetFont(12, 400, 0, "Comic Sans MS")
GUISetBkColor(0x3399FF)
GUICtrlCreatePic("header.jpg", 0, 0, 400, 100)
GUICtrlCreateLabel("Programmverzeichnis", 10, 104, 156, 27)
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlCreateLabel("Hotkey", 288, 104, 57, 27)
GUICtrlSetColor(-1, 0xFF0000)
$p1 = GUICtrlCreateInput( $i1, 24, 160, 105, 31)
GUICtrlSetColor(-1, 0xFF0000)
$p2 = GUICtrlCreateInput($i2, 24, 210, 105, 31)
GUICtrlSetColor(-1, 0xFF0000)
$p3 = GUICtrlCreateInput($i3, 24, 260, 105, 31)
GUICtrlSetColor(-1, 0xFF0000)
$p4 = GUICtrlCreateInput($i4, 24, 310, 105, 31)
GUICtrlSetColor(-1, 0xFF0000)
$p5 = GUICtrlCreateInput($i5, 24, 360, 105, 31)
GUICtrlSetColor(-1, 0xFF0000)
$h1 = GUICtrlCreateInput($i6, 270, 160, 105, 31)
GUICtrlSetColor(-1, 0xFF0000)
$h2 = GUICtrlCreateInput($i7, 270, 210, 105, 31)
GUICtrlSetColor(-1, 0xFF0000)
$h3 = GUICtrlCreateInput($i8, 270, 260, 105, 31)
GUICtrlSetColor(-1, 0xFF0000)
$h4 = GUICtrlCreateInput($i9, 270, 310, 105, 31)
GUICtrlSetColor(-1, 0xFF0000)
$h5 = GUICtrlCreateInput($i10, 270, 360, 105, 31)
GUICtrlSetColor(-1, 0xFF0000)
$button1 = GUICtrlCreateButton("Abspeichern", 138, 424, 120, 33, 0)
GUICtrlSetColor(-1, 0xFF0000)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


Func start()
	Run ( $p1 )
EndFunc


HotKeySet ( $h1, "start")


While 1
$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $button1
		IniWrite(@ScriptDir & "\Klasse.ini", "Verzeichnis", "1", guictrlread($p1))
		IniWrite(@ScriptDir & "\Klasse.ini", "Verzeichnis", "2", guictrlread($p2))
		IniWrite(@ScriptDir & "\Klasse.ini", "Verzeichnis", "3", guictrlread($p3))
		IniWrite(@ScriptDir & "\Klasse.ini", "Verzeichnis", "4", guictrlread($p4))
		IniWrite(@ScriptDir & "\Klasse.ini", "Verzeichnis", "5", guictrlread($p5))
		IniWrite(@ScriptDir & "\Klasse.ini", "Hotkeys", "1", guictrlread($i6))
		IniWrite(@ScriptDir & "\Klasse.ini", "Hotkeys", "2", guictrlread($i7))
		IniWrite(@ScriptDir & "\Klasse.ini", "Hotkeys", "3", guictrlread($i8))
		IniWrite(@ScriptDir & "\Klasse.ini", "Hotkeys", "4", guictrlread($i9))
		IniWrite(@ScriptDir & "\Klasse.ini", "Hotkeys", "5", guictrlread($i10))
	EndSwitch
WEnd

Alles anzeigen

Sithlord95

1)also run funktioniert nur mit dem ersten teil wenn das programm das du starten willst im win32 ordner ist sonst musst du den pfad mit exe angeben
und dann nach dem komma das folgt nochmal den pfad

2)und ich vermute mal du hast zb wenn du zb f5 als hotkey haben willst f5 eingetippt aber es ist {f5} genau wie die send befehle

ich habe das so gemacht also den hotkey zum senden und dann ging es also der fehler liegt wohl darin das du die tasten falsch benannt hast

[autoit]

Func start()
send($p1)
EndFunc

[/autoit][autoit][/autoit][autoit][/autoit]

naja mfg

franjob

nein, ich habe das Problem gelöst. Tortzdem Danke für deine Hilfe. Ne andere Frage bei manchen Programmen kann man ja sachen öffnen dann komt so ne kleine exlpoere anwendung wo man z.b. ein Bild auswählen kann. Ich möchte dass wenn man ins Inputfeld klickt das dann so nen Explorer kommt und man dann eine exe anwendung auswählen kann .Und dann wenn man auf auswählen klickt der programm Pfad imk Input feld steht.

Sithlord95

fileopendialog anschauen .....

und dann ungefähr so $pfad1 = fileopendialog(...............)
und dann guictrlsetdata angucken dann kansnt du es damit reinschreiben in das inputfeld

franjob

Chekc ich nicht ganz. Also mit fileopenDialog bekommt man so nen fester hi?

FunH@cker

Ja da bekommt man dieses Öffnen fenster !
aber wiso öffnest du 2 threats ? [ offen ] GUI fenster optionen

franjob

ja weil da was anderes eingentlich drin war und die Überschrift nicht gepasst hat. Aber was muss ich bei dem Parameter Filter rein schreiben. Und wie kopiere ich dann den Pfad von dem ausgewählten?

FunH@cker

Bitte ma die Autoit Hilfe ansehen da gibs auch beispiele
aber hir ma eins was du auch brauchen kannst[ ist jetz sehr einfach gehalten ]

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 244, 116, 192, 124)
$Input1 = GUICtrlCreateInput("Input1", 8, 48, 121, 21)
$Button1 = GUICtrlCreateButton("Öffnen", 144, 48, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

[/autoit] [autoit][/autoit] [autoit]

Case $Button1
$var = FileOpenDialog("Öffnen", @DesktopDir, "All Files (*.*)")
guictrlsetdata($Input1,$var)
EndSwitch
WEnd

[/autoit]

franjob

Danke ich habe mein Programm jetzt fertig. danke, Danke für erue Hilfe