Die Bot Hilfs Unit

12/20/2009 12:10 HardCore.1337#1

Hilfs/Unterst�zungs Unit

Jetzt auch als DLL!!! Download im unterem Post

Was ist die Hilfs Unit

Die Unit habe ich mal gemacht als mir langweillig war. Ich finde sie heute sehr hilfreich, grade wenn ich Bots, Hacks o.a erstelle.
Die enth�lt eine FUnktionssammlung die sich dann einfach im Programm aufrufen l�sst.

Diese wird noch erweitert! Dies ist lediglich eine vorab Version

Funktionen

Die Unit enth�lt zurzeit folgende Funktionen:

Code:

 - Run: Startet eine Anwendung
 - CheckHandle: Pr�ft ob ein Handle verf�gbar ist
 - iniWrite: Schreibt einen String in eine INI Datei
 - iniRead: Lie�t einen String aus einer ini aus
 - iniIntWrite: Schreibt einen Integer Wert in eine ini
 - iniIntread: Lie�t einen Integer Wert aus einer ini
 - ControlSend: Sendet einen tastendruck an ein verstecktes Fenster
 - ControlClick: simuliert einen Mausklick
 - WinClose: Schlie�t ein beliebigen Prozess
 - HIDE: Versteckt die Delphi Anwendung
 - SHOW: Zeigt die Delphi Anwendung
 - ProzessListe: Listet alle laufenden Prozese auf
 - MouseMove: Bewegt die Maus in einem aktiven Fenster

To Do Liste

Code:

- MemoryRead
- MemoryWrite
- PointerRead
- PointerWrite
- sicheres ControlClick
- PixelSearch

Genau erkl�rung

Run (Pfad)

Code:

Run ('C:\...\Solit�r.exe');

Startet eine beliebige Anwendung. Dabei muss der komplette Pfad angegeben
werden.

CheckHandle (Handle)

Code:

Bsp. CheckHandle ('Solit�r');

Pr�ft ob ein Handle exestiert.

Wenn ja, wird eine MessageBox ausgegeben ("Handle gefunden")
Wenn keins gefunden wurde steht ("kein handle gefunden")

iniWrite (Pfad, Section, Key, Value)

Code:

iniWrite ('C:\Test.ini', 'Main', 'X', 'Test');

Schreibt einen String in eine INI. Dabei muss der komplette Pfad aufgeschrieben werden.

iniRead (Pfad, Section, Key, Value)

Code:

iniRead ('C:\Test.ini', 'Main', 'X', 'Test');

Lie�t einen String aus einer INI. Dabei muss der komplette Pfad aufgeschrieben wenden.

iniIntWrite (Pfad, Section, Key, Value)

Code:

iniIntWrite ('C:\Test.ini', 'Main', 'X', '15');

Schreibt einen Integer in eine INI. Dabei muss der komplette Pfad aufgeschrieben wernden.

iniIntRead (Pfad, Section, Key, Value)

Code:

iniIntRead ('C:\Test.ini', 'Main', 'X', '15');

Lie�t einen Integer aus einer INI. Dabei muss der komplette Pfad aufgeschrieben wernden.

ControlSend (Key, Handle)

Code:

ControlSend ('VK_RETURN', 'Notepad');

Sendet einen Tastendruck an ein nicht sichtbares Fenster
Tasten sind [Only registered and activated users can see links. Click Here To Register...] sichtbar

ControlClick (Handle, Key, x, y, Klicks)

Code:

ControlClick ('Solit�r', 'WM_LBUTTONUP', '500', '800', 2);

Sendet einen Tastendruck an ein nicht sichtbares Fenster.
Key M�glickeiten sind:

Code:

- WM_MOUSEMOVE
- WM_LBUTTONDOWN und WM_LBUTTONUP
- WM_RBUTTONDOWN und WM_RBUTTONUP

WinClose (Handle)

Code:

WinClose ('Solit�r');

Schlie�t eine beliebiege Anwendung. Dabei muss das Handle bekannt sein.

HIDE

Code:

Hide;

Versteckt die Delphi Anwendung

SHOW

Code:

Show;

Zeigt die Delphi Anwendung

Prozessliste(Anzeige)

Code:

ProzessListe (ListBox1.Items);

Listet alle laufende Prozesse auf. Dabei ist egal wo.
Geeignet sind ListBoxen und ComboBoxen.

MouseMove (x, y, Geschwindigkeit)

Code:

MouseMove ('500', '500', '100');

Bewegt die Maus in einem aktiven Fenster. Die Geschwindigkeit wird in ms gemssen

ShutDown (Flag)

Code:

ShutDown ('EWX_Shutdown');

Bietet mehrere M�glichkeiten zum herunterfahren des Systemes.
Folgende M�glichkeiten gibt es:

Code:

EWX_Logoff - Loggt den User aus
EWX_Poweroff - Schaltet den Strom aus wenn der PC heruntergefahren ist
EWX_Reboot - Computer wird neu gestartet
EWX_Shutdown - Der Computer wird normal herruntergefahren

Diese Prozedure habe ich von:
[Only registered and activated users can see links. Click Here To Register...]

So, viel Spa�!!

€ Virentest: [Only registered and activated users can see links. Click Here To Register...]

Markus

12/21/2009 17:38 Whitedog#2

Ein sehr guter Thread !
Danke
ABER:
Gibt es auch diese HIDE & SHOW ; einen Tastendruck an ein nicht sichtbares Fenster senden ; auch bei AutoIt ?

12/21/2009 19:44 HardCore.1337#3

MemoryWrite (Handle, Adresse, Wert)

Code:

MemoryWrite ('Solit�r', '0x157547', '100');

Schreibt in eine Adresse einen neuen Wert. Dabei muss das Handle angegeben werden und anschlie�end die Adreese die mit 0x beginnen muss. Anschlie�end kommt der Wert, der als Integer (Ganzzahl) angebeben werden muss.

MemoryRead (Handle, Adresse)

Code:

MemoryWrite ('Solit�r', '0x157547');

Lie�t aus einer Adresse einen Wertt. Dabei muss das Handle angegeben werden und anschlie�end die Adreese die mit 0x beginnen muss. Anschlie�end wird der Wert ausgelesen und als INI im Stammverzeichniss gespeichert.

Bug Fixes:

Code:

ControlClick sendet nun zuverlssiger an fremde Fenster
ControlSend erzeugt nun keine Buffer Overflow mehr
MemoryWrite wurde entfernt --> zu buggy
VorarbVersion von SendText hinzugef�gt
MousePos entfernt.
Source Code hinzugef�gt
Kleine Bugs entfernt
CheckHandle gibt nun True oder False zur�ck --> DIalogsfelder wurden entfernt

12/30/2009 10:52 HardCore.1337#4

Neu!!

Jetzt f�r alle Programmiersprachen (C++, VB...) als DLL erh�ltlich!!

01/14/2010 20:52 .nAno#5

sieht nach sch�ner Arbeit aus, aber da ich mich vorerst von DLLs fern halt (hoffentlich nach dem WE nicht mehr ;) ) und ich von Delphi ziemlich genau 0,0 Peilung hab bringt mir die Unit erstmal nichts - trotzdem thx ^^

04/22/2010 15:42 Dakidor#6

Alles nur geklaut oder bist du der User im Delphi Forum ?

Quelle: [Only registered and activated users can see links. Click Here To Register...]

04/22/2010 15:50 Cholik#7

Quote:

Originally Posted by Dakidor

Alles nur geklaut oder bist du der User im Delphi Forum ?

Quelle: [Only registered and activated users can see links. Click Here To Register...]

Richtig lesen w�r mal angesagt...

Quote:

Verfasst am: Do 31.12.09 11:21

Oder glaubst du er hat das ganze geklaut und ist 11 Tage in die Vergangenheit gereist um das hier zu posten ?