73%
22%
19%
11%
6%
Samstag, 4. September 2004, 12:44
Klar ist sowas möglich. Hier mal nen Link ausm Delphi-Forum[.de]:
http://www.luckie-online.de/Downloads/LuckieSpy2.zip
Das solltest du als Basis benutzen können, aber mach ja kein Quatsch damit
http://www.luckie-online.de/Downloads/LuckieSpy2.zip
Das solltest du als Basis benutzen können, aber mach ja kein Quatsch damit
Warum kann ein Tag nicht 36 Stunden haben? ://
Sonntag, 5. September 2004, 10:50
wenn du dieses Dinge beachtest, Ja:
aber ich würde mir einfach nur eine anregung holen und es dann nachprogrammieren...
Zitat
Copyright (c) 2001-2003, Michael Puff ["copyright holder(s)"]
All rights reserved.
Redistribution and use in source and binary forms, with or without
modification, are permitted provided that the following conditions are met:
1. Redistributions of source code must retain the above copyright notice, this
list of conditions and the following disclaimer.
2. Redistributions in binary form must reproduce the above copyright notice,
this list of conditions and the following disclaimer in the documentation
and/or other materials provided with the distribution.
3. The name(s) of the copyright holder(s) may not be used to endorse or
promote products derived from this software without specific prior written
permission.
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
aber ich würde mir einfach nur eine anregung holen und es dann nachprogrammieren...
Über mich: www.heinervdm.de
Persönlich Mitteilungen an mich bitte als PN (nicht Email) hier im Forum. ICQ und Skype bitte nur in Notfällen.
Persönlich Mitteilungen an mich bitte als PN (nicht Email) hier im Forum. ICQ und Skype bitte nur in Notfällen.
Sonntag, 5. September 2004, 13:00
Man kann sich auch mal bei www.delphipraxis.net oder bei www.delphi-forum.de anmelden und Luckie direkt fragen .
Solange die Fragen nicht zu einfältig sind, hilft er gerne
.
Alfons
.Solange die Fragen nicht zu einfältig sind, hilft er gerne
.Alfons
Sonntag, 5. September 2004, 17:05
frage
Hallo,
ich würde auch Interesse haben an der weiter entwickelten version, und da hätte ich auch noch eine frage und zwar ich hab da mal mit wem im msn geschrieben, und hier wurde es so geloggt:
[aladria - Message Session]
nieergends, nnuurr icchh fiindds ccoool denn ddennke need ddas er vvoon allleeiinnee auuffeehörrt hat zzu sschrreeiibeen abbeerr jaa
[LuckieSpy 2.0]
Komisch warum aus einem buchstaben, dann mehrere werden also wie gesagt wenn dieses Programm irgendwer weiter entwickeln würde, bessere versteck funktion bzw. auch logs auf nem server speichern und das der normale text da steht ohne doppelten buchstaben würd ichs doch gerne benutzen
Liebe grüße
ich würde auch Interesse haben an der weiter entwickelten version, und da hätte ich auch noch eine frage und zwar ich hab da mal mit wem im msn geschrieben, und hier wurde es so geloggt:
[aladria - Message Session]
nieergends, nnuurr icchh fiindds ccoool denn ddennke need ddas er vvoon allleeiinnee auuffeehörrt hat zzu sschrreeiibeen abbeerr jaa
[LuckieSpy 2.0]
Komisch warum aus einem buchstaben, dann mehrere werden also wie gesagt wenn dieses Programm irgendwer weiter entwickeln würde, bessere versteck funktion bzw. auch logs auf nem server speichern und das der normale text da steht ohne doppelten buchstaben würd ichs doch gerne benutzen
Liebe grüße
web solutions für jedermann Hp in Kürze Online
Hp in Kürze Online 
Mittwoch, 8. September 2004, 21:05
Klar geht es auch ohne Hooks.
"Zauberformel":
GetAsyncKeyState
Wer behauptet das geht nicht, der kann nicht Recht haben, denn ich habe früher, als ich es auch nicht besser kannte und nicht wusste, was Hooks waren, wirklich nur mit dieser GetAsyncKeyState-Funktion einen funktionierenden Keylogger programmiert
Nur ist auch bei dieser Funktion viel "Spielerei"/Experimentierung nötig, da die Keycodes zum Teil anders angeordnet sind.
Dieser Code in einem 10ms-Timer loggt die Tastatureingaben der Ziffern 0-9 (vom Tastenblock, NICHT der vom Zahlenblock) in einem Textfeld, egal in welchem Fenster man sich befindet
"Zauberformel":
GetAsyncKeyState
Wer behauptet das geht nicht, der kann nicht Recht haben, denn ich habe früher, als ich es auch nicht besser kannte und nicht wusste, was Hooks waren, wirklich nur mit dieser GetAsyncKeyState-Funktion einen funktionierenden Keylogger programmiert
Nur ist auch bei dieser Funktion viel "Spielerei"/Experimentierung nötig, da die Keycodes zum Teil anders angeordnet sind.
|
Quellcode |
1 2 3 4 5 6 7 |
procedure TForm1.Timer1Timer(Sender: TObject);
var i:integer;
begin
for i:=0 to 9 do
if (Getasynckeystate($30+i) and (1 shl 0))<>0 then
Edit1.Text:=Edit1.Text+IntToStr(i);
end;
|
Dieser Code in einem 10ms-Timer loggt die Tastatureingaben der Ziffern 0-9 (vom Tastenblock, NICHT der vom Zahlenblock) in einem Textfeld, egal in welchem Fenster man sich befindet
Fighting for peace is like fucking for virginity
Dienstag, 21. September 2004, 14:55
Original von Slude
Klar geht es auch ohne Hooks.
"Zauberformel":
GetAsyncKeyState
Ich sag dir, warum genau das nicht geht: Es mag zwar den Anschein haben, als wenn das funktionieren sollte, in der Praxis allerdings tuen sich mit dieser Lösung gleich 2 Probleme auf:
1.) Wenn jemand schnell tippt kriegst du nur die Hälfte geloggt.
2.) Bei einem Interval von 10ms erzeugst du unnötige Auslastung für die CPU.
Hooks sind einfach wesentlich resourcenschonender und vor allem auch zuverlässiger. Ich hab damals auch mal angefangen mit GetAsyncKeyState nen Keylogger zu schreiben. Ich habe allerdings schnell gemerkt, dass ein Hook einfach die wesentlich bessere Variante ist ein derartiges Programm zu realisieren.
Warum kann ein Tag nicht 36 Stunden haben? ://
Donnerstag, 30. September 2004, 10:11
Original von Abi_Andy
Original von Slude
Klar geht es auch ohne Hooks.
"Zauberformel":
GetAsyncKeyState
Ich sag dir, warum genau das nicht geht: Es mag zwar den Anschein haben, als wenn das funktionieren sollte, in der Praxis allerdings tuen sich mit dieser Lösung gleich 2 Probleme auf:
1.) Wenn jemand schnell tippt kriegst du nur die Hälfte geloggt.
2.) Bei einem Interval von 10ms erzeugst du unnötige Auslastung für die CPU.
Hooks sind einfach wesentlich resourcenschonender und vor allem auch zuverlässiger. Ich hab damals auch mal angefangen mit GetAsyncKeyState nen Keylogger zu schreiben. Ich habe allerdings schnell gemerkt, dass ein Hook einfach die wesentlich bessere Variante ist ein derartiges Programm zu realisieren.
Unsinn..
Zu 1) 10ms reichen voll aus, um alles mitzuloggen. 1000/10=100, das sind 100 Anschläge pro Sekunden, -oder- 6000 Anschläge pro Minute. Die dürfte wohl keiner Schaffen. Nach meiner Erfahrung loggt auch ein 25ms-Intervall sicher
Zu 2) Die CPU-Auslastung ist wirklich sehr gering, wenn man nicht gerade wie ein blutigen Anfänger programmiert sondern mehr optimiert - zum Vergleich zu Winamp ist die CPU-Auslastung 'n Witz. For-Schleife von 2 bis 255 mit GetAsyncKeyState und Ergebnis in einen (Ring)buffer schreiben, geht Blitzschnell.
Die Routine, der den Buffer in ein größeren Buffer schreibt oder es auf Festplatte schreibt, darf ja via zusätzlichen Timer ruhig ein Intervall von ner Minute haben.
Also bitte nicht mehr sagen "es geht nicht", bei mir läuft der und loggt zuverlässig, sogar ohne das man es irgendwie merkt ...
Ist zwar zugegebenermaßen nicht DIE ultimative Lösung.
Nochmal zum Thema Hooks, mit Hooks geht es so -> http://www.delphi-treff.de/content/tutor…ndex.php4?kat=3 <-
Fighting for peace is like fucking for virginity