Aloa,
also ich habe es mal damit versucht:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
p : TWindowPlacement ;
x, y : Integer;
hwnd : THandle;
begin
hwnd := FindWindow('Testfenster', nil);
if hwnd <> 0 Then
begin
BringWindowToTop(hwnd);
SetActiveWindow(hwnd);
begin
GetWindowPlacement(hwnd, @p);
x := p.rcNormalPosition.left+400;
y := p.rcNormalPosition.top+300;
SetCursorPos(x,y);
mouse_event(MOUSEEVENTF_LEFTDOWN, x, y, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, x, y, 0, 0);
end;
end;
end;
Aber er setz das Fenster nicht in den Vordergrund, was mich daraus schließen lässt, das es gar nicht gefunden wird.
Mit freundlichem Gruß
Lostriga