Форма поверх всех окон

[LordTor]

Подскажите как сделать так чтобы после срабатывания таймера форма восстанавливалась из трея поверх всех открытых окон
(добиться сворачивания и разворачивания у меня получилось)

[FaTaL]

fsStayOnTop

[Lime]

Сообщение от LordTor

Подскажите как сделать так чтобы после срабатывания таймера форма восстанавливалась из трея поверх всех открытых окон
(добиться сворачивания и разворачивания у меня получилось)

procedure TForm1.Timer1Timer(Sender: TObject);
begin
//разворачиваеш и
Form1.FormStyle := fsStayOnTop;
end;

Хотя можно ещё подумать на счёт порядка действий

[BOBAH13]

BringWindowToTop (может менятся в зависимости от куда вызывать). SetForegroundWindow, SetFocus (хотя думаю и первых 2х хватит)

Edit:
Ауу народ раскройте глаза, что сразу за внимание на слово-сочетание "поверх всех окон". Вчитайтесь в вопрос.

[raxp]

procedure TForm1.Timer1Timer(Sender: TObject);
begin
 SetWindowPos(handle, HWND_TOPMOST, 0,0,0,0,SWP_NOSIZE or SWP_NOMOVE);
 //SetForegroundWindow(Handle);

[Lime]

Сообщение от BOBAH13

BringWindowToTop (может менятся в зависимости от куда вызывать). SetForegroundWindow, SetFocus (хотя думаю и первых 2х хватит)

Edit:
Ауу народ раскройте глаза, что сразу за внимание на слово-сочетание "поверх всех окон". Вчитайтесь в вопрос.

Хех , действительно )
Тогда хватит приведённых веше функций