Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.08.19;
Скачать: [xml.tar.bz2];

Вниз

Запуск в свернутом виде   Найти похожие ветки 

 
ilg   (2002-08-06 02:23) [0]

Как сделать, чтобы программа запускалась свернутой в Tray, т. е. главная форма не появлялась при запуске?
Подобные вопросы не раз обсуждались... Я перепробовал несколько способов, но главная форма все-равно показывается.
Пробовал: Application.ShowMainForm:=false; - не помогает...
А в другой программе - работает безотказно. В чем дело? Из-за чего это может быть? Может быть кто-то встречался с подобным? Выручайте!!!
Заранее, большое спасибо!


 
Poirot   (2002-08-06 02:50) [1]

Таки в другой проге и посмотри... найди семь отличий.... проблем может быть даже в порядке выполнения или VCL


 
Rasa   (2002-08-06 02:52) [2]

Ну, я могу посоветовать тебе воспользоваться компонентами типа CoolTrayIcon - там это настроить мона. Просто ковырни исходник - найдешь...
Ну если ниче не помогло - то создавай ярлык, меняй запуск Минимизированным и вперед (Шучу)


 
nick_sniper   (2002-08-06 04:51) [3]

Вот так должно работать:
Application.Initialize;
Application.Title := "???";
Application.CreateForm(TForm1, Form1);
Application.ShowMainForm:=false;
Application.Run;


Если нет - то возможно на форме лежит компонет, который манипулирует со свойством Visible. Т.е. форма становится видимой только в одном случае, если Visible:=true;


 
Song   (2002-08-06 08:35) [4]

Определённо где-то форма у Вас показывается. У меня такое было при обработке TStringGrid.onDrawCell когда перед прорисовкой таблицы прога у меня минимизировалась.


 
ilg   (2002-08-06 12:30) [5]

Всем Огромное спасибо!!!
Ну, вроде как сделал то, что хотел...
Только вот интересный глюк получается:
Если просто писать Application.ShowMainForm:=false;, то не работает, а если при этом в процессе разработки задать у формы Visible=false, то всё Ok. Теперь, если нужно, чтобы форма показалась - в OnCreate пишем Visible:=true...

А если наоборот сделать: при разработке Visible=true, а в OnCreate Visible:=false, то не работает (форма покажется).:-(


 
Bass   (2002-08-06 13:35) [6]



begin
Application.Initialize;
Application.ShowMainForm:=False;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caNone;
Form1.Hide;
end;

begin
ShowWindow(Application.Handle, SW_HIDE);
end.




Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.08.19;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.005 c
3-60510
cooluser
2002-07-30 08:20
2002.08.19
СОздание таблицы Ошибка!


3-60521
Well
2002-07-30 11:55
2002.08.19
Как получить значение поля MEMO


1-60657
Просто прохожий
2002-08-09 10:11
2002.08.19
Сжатие файлов


1-60716
Ura
2002-08-06 16:29
2002.08.19
Help. TQuickRep при создании 3-ей страницы валится.


6-60774
Новеньки в Делфи
2002-06-06 16:22
2002.08.19
в дельфе Cgi





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский