Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 01.12.2009, 21:53
Аватар для AnKor94
AnKor94 AnKor94 вне форума
Прохожий
 
Регистрация: 01.12.2009
Сообщения: 13
Репутация: 10
Вопрос Минимизация при авторане

Здравствуйте многоуважаемые кодеры)
Как сделать так чтобы при простом запуске приложения главная форма была развернутой а при автозапуске свёрнутой в трей? Сворачивание в трей происходит на основе винапи. Автозапуск через реестр. Но при желании эти параметры можно переделать.
Ответить с цитированием
  #2  
Старый 01.12.2009, 21:57
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,088
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Я делал так:
1. Признаком старта через автозапуск являлся специальный параметр командной строки.
2. В файле проекта (dpr) если такой специальный параметр присутствует, то перед Application.Run выполняется Application.ShowMainForm := False;
Все. Правда для показа иконки в трее я использовал компонент TCoolTrayIcon.
Ответить с цитированием
  #3  
Старый 01.12.2009, 22:04
Аватар для AnKor94
AnKor94 AnKor94 вне форума
Прохожий
 
Регистрация: 01.12.2009
Сообщения: 13
Репутация: 10
По умолчанию

можете пояснить как реализовать пункт 1?
а по поводу сворачивания в трей я думаю принцип тот же самый..
Ответить с цитированием
  #4  
Старый 01.12.2009, 22:37
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

Используйте Paramstr и ParamCount
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием
  #5  
Старый 02.12.2009, 10:40
Аватар для AnKor94
AnKor94 AnKor94 вне форума
Прохожий
 
Регистрация: 01.12.2009
Сообщения: 13
Репутация: 10
По умолчанию

Цитата:
Сообщение от Страдалецъ
Используйте Paramstr и ParamCount
мм.. не совсем понял как это использовать в данном случае..
не могли бы поподробнее?
__________________
141.116.168.135 : damiu2d449028.dami.army.pentagon.mil (.MIL | US Military)
Ответить с цитированием
  #6  
Старый 02.12.2009, 10:58
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

Ну вы блин даете. Справкой уже давно бы воспользовались, там же есть примеры.
Первое, проверяем есть ли нужное количество параметров при запуске программы:
Код:
if ParamCount > 1 then 
Второе, проверям параметры:
Код:
if (ParamStr(1) = '\a') and (ParamStr(2) = 'Тили-тили') then ShowMessage('Есть два нужных параметра');
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием
  #7  
Старый 02.12.2009, 11:00
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

Для отладки в дизайне, используйте опцию меню Run\Parameters
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 05:43.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025