Autoit Editbox beschreiben.

[Crack-7]

Ich möchte einen Prank virus machen, in welchem eine Editbox ist.

In dieser Editbox möchte ich sachen schreiben wie: "Ich bin der schlimmste virus den es gibt."

So.

Ist es nun möglich, dass ich diesen text buchstabe für buchstabe reinsetze?

Also dass es so aussieht, als würde es von hand geschrieben werden?

[butter123]

Ja es ist möglich.

So eigentlich wollte ich jetzt aufhören

Weiß leider nicht mehr genau wied er Befehl heißt. Such mal GuiCtrlSetData() Oder SetStatus oder irgendwie sowas^^

[Crack-7]

Originally Posted by butter123

Ja es ist möglich.

So eigentlich wollte ich jetzt aufhören

Weiß leider nicht mehr genau wied er Befehl heißt. Such mal GuiCtrlSetData() Oder SetStatus oder irgendwie sowas^^

Das kenne ich schon xD

Aber dann steht der text sofort in der editbox.

Ich möchte aber, dass er den text buchstabe für buchstabe reinschreibt.

Hackerstil eben ^^

Ich dachte mir eine funktion schreiben, welches den text splittet, und dann buchstabe für buchstabe zusammensetzt und reinschreibt.

Aber bin erstmal alteriwnet zocken ^^

[Buffmebuffyou]

Also, für sowas braucht man eine Schleife, ich schreib ma schnell ein Beispiel und editiers hier dann rein. ;P

Edit:

#include <GUIConstants.au3>

$Form = GUICreate("", 300, 300)
$Edit = GUICtrlCreateEdit("", 10, 10, 280, 280)

GUISetState()

_Write($Edit, "Test asdf asdf asdf asdf asdf")

While 1
	Switch GUIGetMsg()
		Case $GUI_EVENT_CLOSE
			ExitLoop
	EndSwitch
WEnd

Func _Write($Handle, $Data, $Start = 1, $Sleep = 50)
	For $i = $Start To StringLen($Data)
		GUICtrlSetData($Handle, StringMid($Data, 1, $i))
		Sleep($Sleep)
	Next
EndFunc

Also, mit der Funktion _Write kannst du nun etwas "schreiben" lassen.

Parameter
$Handle: Edit-Handle
$Data: zu schreibender Text
$Start: bei welchem Buchstaben beginnen
$Sleep: Pause zwischen "Tastendruck"

[xShizoidx]

_GUICtrlEdit_AppendText
und zwischendurch paar Sleeps reinbauen.

Mit freundlichen Grüßen,

Netterwurm8

[Crack-7]

Originally Posted by Buffmebuffyou

Also, für sowas braucht man eine Schleife, ich schreib ma schnell ein Beispiel und editiers hier dann rein. ;P

Edit:

#include <GUIConstants.au3>

$Form = GUICreate("", 300, 300)
$Edit = GUICtrlCreateEdit("", 10, 10, 280, 280)

GUISetState()

_Write($Edit, "Test asdf asdf asdf asdf asdf")

While 1
	Switch GUIGetMsg()
		Case $GUI_EVENT_CLOSE
			ExitLoop
	EndSwitch
WEnd

Func _Write($Handle, $Data, $Start = 1, $Sleep = 50)
	For $i = $Start To StringLen($Data)
		GUICtrlSetData($Handle, StringMid($Data, 1, $i))
		Sleep($Sleep)
	Next
EndFunc

Also, mit der Funktion _Write kannst du nun etwas "schreiben" lassen.

Parameter
$Handle: Edit-Handle
$Data: zu schreibender Text
$Start: bei welchem Buchstaben beginnen
$Sleep: Pause zwischen "Tastendruck"

Wow danke :O

Bei mir würde die funktion sicherlich größer ausfallen ^^

Kann closed werden ^^

[lolkop]

das ganze könnte man auch einfacher über controlsend machen.

wenn man es aber über eine schleife macht, dann doch bitte wenigstens ohne sleep, da hierdruch ja das gui blockiert wird^^

[Buffmebuffyou]

Originally Posted by lolkop

das ganze könnte man auch einfacher über controlsend machen.

wenn man es aber über eine schleife macht, dann doch bitte wenigstens ohne sleep, da hierdruch ja das gui blockiert wird^^

Les dir den Thread nochmal durch und dann denk nach.
Dein Post hier ist unsinnig...

1. Sleep wird benötigt, da er Tastendrücke vortäuschen will (und ja da braucht man Pausen, weil ja niemand so schnell schreibt)
2. ControlSend sendet Tastendrücke an ein Fenster, wozu braucht er das? Er kann doch einfach das Edit Control normal beschreiben. Klar kann man das mit ControlSend auch, ist aber total umständlich und unsinnig.

[lolkop]

Originally Posted by Buffmebuffyou

1. Sleep wird benötigt, da er Tastendrücke vortäuschen will (und ja da braucht man Pausen, weil ja niemand so schnell schreibt)

pausen braucht man keinesfalls. das ganze muss einfach getimt ablaufen. eine pause für das script bedeutet, das nichts mehr verarbeitet wird.

Originally Posted by Buffmebuffyou

2. ControlSend sendet Tastendrücke an ein Fenster, wozu braucht er das? Er kann doch einfach das Edit Control normal beschreiben. Klar kann man das mit ControlSend auch, ist aber total umständlich und unsinnig.

ControlSend arbeitet den eingabestring buchstabe für buchstabe ab. das delay ist in autoit hierbei frei einstellbar. das ist meiner meinung nach exakt das, was der threadersteller hier wollte.
die einfachste variante als umständlich und unsinnig zu bezeichnen finde ich etwas unprofessionell von dir.

davon abgesehen erfüllt dein script nichteinmal seine anforderungen, da der bisherige inhalt vom edit bei dir nicht berücksichtigt wird.

ich denke wenn man in einem forum etwas postet, so sollte man immer aufpassen, wie man sich gegenüber anderen usern (welche eventuell verbesserungsvorschläge haben) verhält. es gibt immer mehr als einen weg zum ziel. manche mögen auf den ersten blick umständlich oder ineffizient wirken, dennoch sollte man sich überlegen, warum die wege trotzdem genutzt/angesprochen werden.

[Crack-7]

Originally Posted by lolkop

pausen braucht man keinesfalls. das ganze muss einfach getimt ablaufen. eine pause für das script bedeutet, das nichts mehr verarbeitet wird.



ControlSend arbeitet den eingabestring buchstabe für buchstabe ab. das delay ist in autoit hierbei frei einstellbar. das ist meiner meinung nach exakt das, was der threadersteller hier wollte.
die einfachste variante als umständlich und unsinnig zu bezeichnen finde ich etwas unprofessionell von dir.

davon abgesehen erfüllt dein script nichteinmal seine anforderungen, da der bisherige inhalt vom edit bei dir nicht berücksichtigt wird.

ich denke wenn man in einem forum etwas postet, so sollte man immer aufpassen, wie man sich gegenüber anderen usern (welche eventuell verbesserungsvorschläge haben) verhält. es gibt immer mehr als einen weg zum ziel. manche mögen auf den ersten blick umständlich oder ineffizient wirken, dennoch sollte man sich überlegen, warum die wege trotzdem genutzt/angesprochen werden.

Tut mir leid aber deine variante ist nicht ganz das was ich wollte ^^

Ich möchte nämlich folgendes machen.

Ein Script, dass ein Fenster öffnet in welchem ein Jigsaw bild zu sehen ist.



Das Script setzt eine MouseTrap, dass die maus nur innerhalb des fensters bewegbar ist.

Dann soll in einer editbox etwas geschrieben werden.

Und es soll aussehen, als würde ein mensch es schreiben.

Und der nutzer des scripts soll diesen schreibvorgang nicht beenden können.

Und durch controlsend, würde ja alles was der nutzer eintippt auch dort stehen.

Ich möchte nämlich ein Jigsaw spiel machen, in welchem der nutzer irwo auf der festplatte innerhalb einer bestimmten zeit eine .txt mit einem passwort suchen muss, und das passwort eingeben.

Wenn er das richtige eingegeben hat, gehts weiter im spiel.

Wenn er verliert, soll der pc runtergefahren werden ^^

Ich habe mir jetzt aber überlegt es anders zu machen.

Ich mache eine gif von Jigsaw im fernsehen, und nehme meine verzerrte stimme auf, wo ich einfach spreche.

Dass kommt viel unheimlicher rüber ^^

Wer mir bei dem "projekt" helfen will, kann sich bei mir melden ^^


Im moment sieht das script so aus.

 Spoiler

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Misc.au3>
InetGet("http://s7.directupload.net/images/120119/bo6xn3ni.jpg",@tempdir&"\jigsaw.jpg")
$html_text='<embed src="http://www.youtube.com/v/rpwL6BxHfa8;autoplay=1" hidden="true" type="application/x-shockwave-flash" >'
$jigsaw = @tempdir &"\jigsaw.html"
$file_open = FileOpen($jigsaw,2)
FileWrite($file_open,$html_text)
FileClose($file_open)

#Region ### START Koda GUI section ### Form=
$oben = 0  ;20
Local $Form1, $coords[4]
$Form1 = GUICreate("Jigsaw Game", 616, 400, 524, 256,-1,$WS_EX_TOPMOST)
GUISetBkColor(0x000000)
$Pic1 = GUICtrlCreatePic(@tempdir&"\jigsaw.jpg", 0, 0, 617, 401)
$Edit1 = GUICtrlCreateEdit("", 248, 32, 305, 225)
WinSetTrans($Edit1, "", 200)
GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUISetState(@SW_SHOW)
$obj = ObjCreate("shell.Explorer.2")
GUICtrlCreateObj($obj,1000,1000,0,0)

#EndRegion ### END Koda GUI section ###
FuckIt()
While 1
	$coords = WinGetPos($Form1)
		_MouseTrap($coords[0], $coords[1]+$oben, $coords[0] + $coords[2], $coords[1] + $coords[3])
	$nMsg = GUIGetMsg()
	Switch $nMsg
	Case $GUI_EVENT_CLOSE
			FileDelete($jigsaw)
			Exit

	EndSwitch
WEnd


Func FuckIt()
	$obj.navigate($jigsaw)
	_Write($Edit1, "Hallo."&@crlf&"Ich möchte ein Spiel spielen."&@crlf&"Blablabla Unheimliche Scheiße", 1, 60)
EndFunc



Func _Write($Handle, $Data, $Start = 1, $Sleep = 50)
	For $i = $Start To StringLen($Data)
		GUICtrlSetData($Handle, StringMid($Data, 1, $i))
		Sleep($Sleep)
	Next
EndFunc