okay ich habe jetzt eine lösung gefunden:
Delphi-Quellcode:
procedure Vordergrund();
begin
while true do
begin
Application.ProcessMessages;
SetWindowPos(Application.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);
Sleep(10);
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
Var tmp : Pointer;
tmp2: Cardinal;
begin
CreateThread(nil,0,@Vordergrund,tmp,0,tmp2);
end;
das braucht kaum prozessor! damit hat sich das jetzt fürs erste erledigt!
danke
gruß