Forum: Sonstige Fragen zu Delphi
Delphi
by Uncle Cracker,
30. Mai 2004
Also ich habe das jetzt mal probiert mit X-Spy, ich habe auch die IDs usw. bekommen, doch irgendwie bekomme ich das mit dem setzten des Text nicht hin, obwohl es doch so hier gehen müsste:
var
wnd: HWND;
s: string;
begin
wnd := FindWindow('#32770', 'PESpin v0.41');
wnd := FindWindowEx(wnd, 0, 'Edit', 'have a little snack?'); //wnd := GetDlgItem(wnd, 11);
if wnd <> 0 then
...
Forum: Sonstige Fragen zu Delphi
Delphi
by Uncle Cracker,
28. Mai 2004
Also es ist das Programm PESpin, das ist ein Packer wie UPX, nur etwas besser.
Hier zu bekommen: http://wasm.ru/tools/8/pespin.zip (läuft ganz ohne Setup :zwinker: )
Ich möchte das Programm steuern, dass ich alles Vollautomatisch machen kann und nicht immer alles manuell konfigurieren muss, dass dauert bei vielen Dateien ziemlich lange.
@Cuchulainn Wäre nett, wenn du mir ein paar...
Forum: Sonstige Fragen zu Delphi
Delphi
by Uncle Cracker,
27. Mai 2004
Also ich habe jetzt mal mit XSpy geguckt aber das hat mir nicht wirklich viel geholfen und eine genau ID konnte ich mit EDA oder so auch nicht finden, dass mir weiterhilft :(
Ich konnte jedoch die Position des Edits auf dem Formular herausfinden, hilft mir das irgendwie weiter?
Kennt vielleicht noch jemand eine andere Methode das Edit zufinden, indem man alle Edits auf dem Formular...
Forum: Sonstige Fragen zu Delphi
Delphi
by Uncle Cracker,
25. Mai 2004
Mhhhhh, aber irgendwie hilft mir das nicht sonderlich weiter, habe es auch schon versucht.
Mit EDA hat das eingeben keine Probleme gemacht, aber da habe ich ja schon vorher angeben wo was eingetragen werden soll.
Forum: Sonstige Fragen zu Delphi
Delphi
by Uncle Cracker,
25. Mai 2004
Also ich habe das jetzt folgendermaßen hinbekommen:
procedure TForm1.Button1Click(Sender: TObject);
var
hMemo, hHandleDesFensters : HWND;
s: string;
begin
hHandleDesFensters := FindWindow(nil, 'ReCrackS.de');
hMemo:= FindWindowEx(hHandleDesFensters, 0, 'Edit', nil);
s := 'Test';
Forum: Sonstige Fragen zu Delphi
Delphi
by Uncle Cracker,
25. Mai 2004
Wie kann ich nun die Handles auf die einzelnen Controls bekommen? Mit Findwindow wird es ja nicht komplett funktionieren.
:love: Danke UC
Forum: Sonstige Fragen zu Delphi
Delphi
by Uncle Cracker,
25. Mai 2004
Wie kann ich ein anderes Programm mit Delphi komplett steuern, also z.B. Edit ausfüllen, Button klicken, Checkbox "checken" usw. ?
Ich habe zwar schon was gefunden, dass das über SendMessage gehen soll, aber irgendwie bekomme ich das nicht hin, da wird anstatt des Editfelds die Caption ausgefüllt :(
Mit SendDlgItemMessage habe ich es auch schon versucht, aber da hat irgendwie gar nix gefunzt...