Hi
mein Code soll ständig das aktive Fenster auf Desktop notieren
Durch ein Klick auf Button1 soll letzte aktive Fenster den Fokus bekommen
hier ist der Code :
Delphi-Quellcode:
Var
hwnd: THandle;
...
procedure TForm1.Button1Click(Sender: TObject);
begin
hWnd := GetForegroundWindow;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
var
lpRect : TRect;
begin
if not (GetForegroundWindow = self.Handle) and (GetForegroundWindow <> self.Handle)
then begin
hWnd := GetForegroundWindow; end;
end;
Der Timer soll aber nur das aktive Fenster notieren
Damit ich später durch ein Klick auf Button1 das letzte aktive Fenster aktivieren kann
Natürlich der Timer soll mein Programm-Fenster ignorieren
Wie soll der Code sein, damit mein Ziel erreiche ?
Güß