Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.06;
Скачать: CL | DM;

Вниз

Какое событие обработать??   Найти похожие ветки 

 
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;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.026 c
14-1106139129
Prohodil Mimo
2005-01-19 15:52
2005.02.06
Win98 и WinXP не видят друг друга. как лечить?


10-1082362359
7th_Angel
2004-04-19 12:12
2005.02.06
Диаграммы в Excel


3-1105113349
std
2005-01-07 18:55
2005.02.06
Инструментарий


6-1101130745
alenika
2004-11-22 16:39
2005.02.06
Помогите с закачкой файла на сервер по ftp


14-1103740532
Alexander Panov
2004-12-22 21:35
2005.02.06
Выборы в Украине. Противостояние. (Продолжение 5 - шестая ветка)