Tray-глюк

← →
ss300 (2003-07-16 12:27) [0]

вообщем такая ситуация господа мастера:
есть главная форма и командная кнопка, при minimized добавляю в трей, а с панели задач убираю
когда нажимаю на кнопку, висит :((
ShowModal не пашет

в чем дело?

← →
Anatoly Podgoretsky (2003-07-16 12:30) [1]

Ошибка в программе!

← →
ss300 (2003-07-16 12:33) [2]

но до добавления в трей все нормально было

← →
Юрий Зотов (2003-07-16 12:38) [3]

Значит, стало ненормально после добавления.

Если Вы ожидали других ответов, то подумайте о том, как можно их дать, не видя ни одной строчки кода...

← →
ss300 (2003-07-16 12:50) [4]

с глюком разобрался

а как сделать чтобы когда прога в трее, через допустим 30 сек
автоматически прога восстанавливалась??

в ОнТаймере пишу след. код, но не помогает

if Application.Active = false then
begin
Inc(Ticker);
//Timer2.Enabled := True;
if Ticker>10 then
begin
ShowMessage("dfhgdf");
Ticker := 10;
WSX := FindWindow("TApplication", "PTest");
SetForegroundWindow(WSX);
Application.Restore;
Application.BringToFront;
ShowMessage("dfhgdf");
end;

end

что делать?

← →
Юрий Зотов (2003-07-16 14:37) [5]

WSX := FindWindow("TApplication", "PTest");
SetForegroundWindow(WSX);
Application.Restore;
Application.BringToFront

Вот это все вряд ли восстановит программу. А восстановит ее, скорее всего просто
ShowWindow(Application.Нandle, SW_SHOWNORMAL);
Application.MainForm.Show;

Только сначала покажите, как именно Вы сажаете ее в трей.

← →
ss300 (2003-07-16 17:32) [6]

всё разобрался
Юра, ShowWindow(Application.Нandle, SW_SHOW);- пашет

Tray-глюк Найти похожие ветки