Na wierzchu!!!

Jak zrobić by program zawsze był na wierzchu??

form1.FormStyle := fsStayOnTop;

a jak zrobic ze jak nawet przycisk powrut do pulpitu to on i tak zostanie??

timer ustaw na 30 - 100

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Application.Restore;
Timer1.Enabled := False;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMinimize := Timer1Timer;
end;

a jak zrobic ze jak nawet nacisne na ikone do powrotu do pulpitu to i tak program sie nie zminimalizuje??

To co masz wyzej powinno zadziałać pod warunkiem ze timer jest ustawiony na Enabled := True. Nawet jeśli zostało kliknięte pokaz pulpit.