[HILFE]F-Tasten tool??!!!!!!!

04/27/2011 21:34 ~BeOwNeD~#1
^
l


Ich suche ein Tool wo man für die F1-F.. tasten einen text oder zahlen eingeben kann und dann mit den F-tasten den text oder zahlen in verschiedenen programmen wieder aufrufen kann!?
Ca. so wie ein spammbot nur will ich selbst bestimmen wann er es schreibt!
04/27/2011 21:39 BlendedMed#2
autoit?
04/27/2011 21:41 ~BeOwNeD~#3
Ich suche ein "LEICHTES TOOL" wo ich einfach schnell was bei den F-tasten reinschreiben kann...
04/27/2011 21:42 xImbaer#4
Autoit?

Das ist doch einfach.
04/27/2011 21:44 ~BeOwNeD~#5
ich hab 0 ahnung davon.
Ich hatte son tool schonmal aufm pc aber wieder runtergeschmissen <.<!
04/27/2011 21:59 Chicken17#6
Such in google nach makro tool hatte mal eins weis aber den namen nicht.
04/27/2011 22:14 ~BeOwNeD~#7
Danke erster hilfreicher post :D!
04/28/2011 03:27 Quadratball#8
[Only registered and activated users can see links. Click Here To Register...] <-- Direkter Link!
[Only registered and activated users can see links. Click Here To Register...]
Falls du aufgrund der 4 funde angst hast dann compiliere es selber.
Source:
Code:
#NoTrayIcon
#include <File.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <ButtonConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Eingabe", 202, 22, 192, 124)
$Input1 = GUICtrlCreateInput("Text hier eingeben.", 0, 0, 201, 21)
$Button1 = GUICtrlCreateButton("Button1", 0, 0, 0, 1)
Dim $Form1_AccelTable[1][2] = [["{ENTER}", $Button1]]
GUISetAccelerators($Form1_AccelTable)
GUISetState(@SW_Hide)
#EndRegion ### END Koda GUI section ###
If FileExists(@ScriptDir & "\text.txt") = False Then
	_FileCreate(@ScriptDir & "\text.txt")
	GUISetState(@SW_SHOW)
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			FileWrite(@ScriptDir & "\text.txt",GUICtrlRead($Input1))
			ExitLoop
	EndSwitch
WEnd
ElseIf FileRead(@ScriptDir & "\text.txt") = False Then
GUISetState(@SW_SHOW)
	While 1
		$nMsg = GUIGetMsg()
	    Switch $nMsg
	     	Case $GUI_EVENT_CLOSE
				Exit
			Case $Button1
				FileWrite(@ScriptDir & "\text.txt",GUICtrlRead($Input1))
				ExitLoop
		EndSwitch
    WEnd
EndIf
GUISetState(@SW_DISABLE)
GUISetState(@SW_HIDE)
HotKeySet("{F1}","spam")
HotKeySet("{F3}","ende")
HotKeySet("{F2}","gui")
While 1
	Sleep(10000)
WEnd
Func spam ()
	send(FileRead(@ScriptDir & "\text.txt"))
EndFunc

Func ende()
	Exit
EndFunc

Func GUI()
	FileDelete(@ScriptDir & "\text.txt")
	_FileCreate(@ScriptDir & "\text.txt")
	GUISetState(@SW_ENABLE)
	GUISetState(@SW_SHOW)
	While 1
		$nMsg = GUIGetMsg()
	    Switch $nMsg
	     	Case $GUI_EVENT_CLOSE
				Exit
			Case $Button1
				FileWrite(@ScriptDir & "\text.txt",GUICtrlRead($Input1))
				ExitLoop
		EndSwitch
    WEnd
	GUISetState(@SW_DISABLE)
	GUISetState(@SW_HIDE)
EndFunc
Edit:
F1: schreibt den text
F2: neuen text eingeben
F3: beendet das tool