Button in Programm betätigen

[Gehstock]

Ich möchte winrar fernsteuern

Delphi-Quellcode:

procedure TForm2.Timer1Timer(Sender: TObject);
var
  wndMain, wndChild: HWND;
begin
  wndMain := FindWindow('#32770','Passwort eingeben');
  if wndMain <> 0 then
  begin
    wndChild := FindWindowEx(wndMain, 0, 'Edit', nil);
    if wndChild <> 0 then
     begin
      SetWinText(wndChild, 'passwort');
       wndChild := FindWindowEx(wndMain, 0, 'Button', nil);
        if wndChild <> 0 then
         SendMessage(wndChild, wm_... //???
  end;                             //919664 Hwnd Button
end;

Eingabe des Passwortes läuft erstmal aber es scheitert an betätigen des Buttons

[Matze]

Hallo,

nicht "wm_...", sondern "BM_CLICK".

Grüße, Matze

[himitsu]

Und nach dem nächsten WinRAR-Update darfste es womöglich wieder von neuem Überarbeiten?

Hat WinRAR nicht auch 'ne API?

Ansonsten einfach 7Zip verwenden, daß kennt ebenfalls RAR, ist kostenlos und besitzt auf jeden Fall 'ne nette API.

[Gehstock]

Ok klappt Danke

Edit : Ist nur für heute weil ich ne menge Dateien hatte mit immer den selben PW (ich weiß währ auch per Batch gegangen aber ich will ja was lernen)

[himitsu]

kann man mit WinRAR denn nicht mehrere Dateien auf einmal entpacken?

[Gehstock]

ja aber man muss trotzdem für jede das PW einzeln eingeben