Форум: "Основная";
Текущий архив: 2005.02.06;
Скачать: [xml.tar.bz2];
ВнизКакое событие обработать?? Найти похожие ветки
← →
ShimON © (2005-01-21 11:43) [0]Какое событие мне обработать, чтобы сделать что-то как только форма полностью загружена.
← →
Ega23 © (2005-01-21 11:47) [1]А кто её грузит?
← →
ShimON © (2005-01-21 11:50) [2]При загрузке мне надо, чтобы прога просто появилась в трее, а форма не показывалась. Я делал так:
в крит форм
TrayIcon.Show;
ShowWindow(Application.Handle,SW_HIDE);
но не помогло, кнопка на панели пуска все равно появляется и иконка в трее тоже
← →
ShimON © (2005-01-21 11:53) [3]Пихнул в FormActivate, помогло но не совсем
Пока происходит форм крит, кнопка на панели пуск все равно видна!!!
← →
ShimON © (2005-01-21 11:58) [4]Так как мне добиться нужного результата, МАСТЕРА????
← →
Smithson (2005-01-21 12:00) [5]
procedure HideApp(AHide: Boolean);
var I: DWord;
Begin
I := GetWindowLong(Application.Handle, GWL_EXSTYLE);
if AHide then begin
ShowWindow(Application.Handle, SW_HIDE);
Application.MainForm.Hide;
Application.Minimize;
iAppDefEXSTYLE := I;
I := I and (not WS_EX_APPWINDOW);
I := I or WS_EX_TOOLWINDOW;
end
else begin
ShowWindow(Application.Handle, SW_Show);
if iAppDefEXSTYLE > 0 then I := iAppDefEXSTYLE
else begin
I := I and (not WS_EX_TOOLWINDOW);
I := I or WS_EX_APPWINDOW;
end;
end;
SetWindowLong(Application.Handle, GWL_EXSTYLE, I);
if not AHide then begin
Application.Restore;
Application.MainForm.Show;
Application.MainForm.WindowState := wsNormal;
Application.BringToFront;
end;
End;
← →
ShimON © (2005-01-21 12:07) [6]Что такое iAppDefEXSTYLE, может есть какие нить зависимости??
← →
Юрий Зотов © (2005-01-21 12:15) [7]> ShimON © (21.01.05 11:50) [2]
Просто добавьте еще одну строчку:
Application.ShowMainForm := False;
← →
ShimON © (2005-01-21 12:23) [8]К сожалению не помогло, так как после того как приложение загрузилось окно должно мочь показываться, но оно не может, почемуто даже если это свойство переставить в true!!!
КАК ЖЕ ЭТО СДЕЛАТЬ!!!!
← →
ShimON © (2005-01-21 12:29) [9]Все, сделал... Вот так:
Application.ShowMainForm:= True;
Application.MainForm.Show;
← →
Юрий Зотов © (2005-01-21 18:07) [10]> ShimON © (21.01.05 12:23) [8]
> К сожалению не помогло
Странная логика. Вы спрашивали, как СПРЯТАТЬ. И оно спряталось. А Вы говорите - не помогло. Как же "не помогло", если оно все-таки спряталось?
← →
Style © (2005-01-21 18:11) [11]
> Странная логика. Вы спрашивали, как СПРЯТАТЬ. И оно спряталось.
> А Вы говорите - не помогло. Как же "не помогло", если оно
> все-таки спряталось?
Скорее всего это продолжение мысли ->Application.ShowMainForm:= True;
Application.MainForm.Show;
У него получилось поднять форму из трея обратно :))))
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.02.06;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.05 c