Mit dem Code kann ich ein fremdes Button Klicken
d.h. man kann den Code bearbeiten um einen Wert in eine fremde Anwendung zu zuweisen
Der Code funktioniert aber bleibt das programm hängern !?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
wnd: THandle;
btn: THandle;
begin
wnd := FindWindow(nil, 'FormFremd'); // sucht das Fenster
btn := FindWindowEx(wnd, 0, 'TButton', 'Button1'); // sucht den Button
If btn <> 0 then SendMessage(btn, BM_CLICK, 0, 0); // führt den Klick auf dem Button aus
//Close;
end;