Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> скрыть прогу в баре 
:(
    Опции темы
BLACK_KOT
Дата 26.11.2007, 00:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 305
Регистрация: 20.12.2006

Репутация: нет
Всего: -1



всё впринципе просто:
Код

procedure TForm1.FormShow(Sender: TObject);
begin
ShowWindow(Application.Handle,SW_HIDE);
end;


но в первую секунду после запуска прога таки появляется в баре! вернее начинает появляться и исчезает- а это портит всё впечатление. как исключить эту недоработку?

пробовал закинкть код в собитие TForm1.FormCreate но тогда код ваабще не фурычит.


--------------------
                       .. я - демо версия Бога от Microsoft..
PM MAIL   Вверх
Rohoss
Дата 26.11.2007, 07:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Начальник интернета
***


Профиль
Группа: Завсегдатай
Сообщений: 1308
Регистрация: 9.10.2006
Где: Matrix

Репутация: нет
Всего: 18



Application.ShowMainForm:=false ;


--------------------
Файловый менеджер Explorer.Net скачать  video
PM ICQ   Вверх
BLACK_KOT
Дата 26.11.2007, 10:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 305
Регистрация: 20.12.2006

Репутация: нет
Всего: -1



 и с чем это едят?

в какое собитие  вставлять этот код? oncreate, onshow вставлял - не катит. 

ПРИВЕДИТЕ ПРИМЕР, ЁПТЬ!!


--------------------
                       .. я - демо версия Бога от Microsoft..
PM MAIL   Вверх
THandle
Дата 26.11.2007, 11:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 50
Всего: 372



В TForm1.OnCreate Поставить 

Код

  SetWindowLong(Application.Handle, GWL_EXSTYLE, GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW);



ЗЫ: За последние два месяца я на этом форуме 3 раз отвечаю на такой вопрос smile 

Это сообщение отредактировал(а) THandle - 26.11.2007, 11:35
PM   Вверх
Rohoss
Дата 26.11.2007, 12:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Начальник интернета
***


Профиль
Группа: Завсегдатай
Сообщений: 1308
Регистрация: 9.10.2006
Где: Matrix

Репутация: нет
Всего: 18



Цитата(BLACK_KOT @  26.11.2007,  10:26 Найти цитируемый пост)
и с чем это едят?


Тут нужно в файл Project1.dpr вставить, примерно так
Код

program Project1;

uses
  Forms,
  FSGraber in 'Project1.pas' {Form1};

{$R *.res}

begin
 Application.Initialize;

  Application.CreateForm(TForm1, Form1);
  Application.ShowMainForm:=false ;
  Application.Run;
end.



Это сообщение отредактировал(а) Rohoss - 26.11.2007, 12:34


--------------------
Файловый менеджер Explorer.Net скачать  video
PM ICQ   Вверх
Snowy
Дата 26.11.2007, 12:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 31
Всего: 484



Цитата(Rohoss @  26.11.2007,  07:17 Найти цитируемый пост)
Application.ShowMainForm:=false ;
Примечание:
Это решение для Delphi 2007.
Остальные варианты - для более ранних версий дельфи.
PM MAIL   Вверх
maxim1000
Дата 26.11.2007, 13:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник
Сообщений: 3334
Регистрация: 11.1.2003
Где: Киев

Репутация: нет
Всего: 110



хм... а зачем тогда вообще форма?


--------------------
qqq
PM WWW   Вверх
Alexeis
Дата 26.11.2007, 13:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 34
Всего: 459



Цитата(maxim1000 @  26.11.2007,  13:21 Найти цитируемый пост)
хм... а зачем тогда вообще форма?

  Так форма видна на экране, ее нет только на панели задач.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
maxim1000
Дата 26.11.2007, 16:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник
Сообщений: 3334
Регистрация: 11.1.2003
Где: Киев

Репутация: нет
Всего: 110



Цитата(Alexeis @  26.11.2007,  13:42 Найти цитируемый пост)
Так форма видна на экране, ее нет только на панели задач.

хм... я просто исходил из

Цитата(BLACK_KOT @  26.11.2007,  00:36 Найти цитируемый пост)
ShowWindow(Application.Handle,SW_HIDE);

насколько я понимаю, это должно убрать форму не только из панели задач, но и с экрана
а т.к. проблема с этим способом только в том, что
Цитата(BLACK_KOT @  26.11.2007,  00:36 Найти цитируемый пост)
но в первую секунду после запуска прога таки появляется в баре! вернее начинает появляться и исчезает- а это портит всё впечатление. как исключить эту недоработку?

то я и подумал, что форму и не надо показывать...


--------------------
qqq
PM WWW   Вверх
Snowy
Дата 26.11.2007, 16:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 31
Всего: 484



Цитата(maxim1000 @  26.11.2007,  16:24 Найти цитируемый пост)
насколько я понимаю, это должно убрать форму не только из панели задач, но и с экрана
Нет. Hide выполняется к Application, а не к форме.
Если ты не в курсе, то Application в Delphi до 2007 является самостоятельным окном, размером в 0 пикселей.
Поэтому, как минус, по правому клику нет пунктов размер, развернуть и т.п., т.к. окно приложения не может менять размеры.
А в Delphi 2007 наконец-то от этого ушли, и роль приложения теперь выполняет главная форма.
Отсюда и разница в подходе.
В D2007 мы просто говорим не показывать. А для более ранних версий приходится применять WinAPI методы к окну приложения.
PM MAIL   Вверх
maxim1000
Дата 26.11.2007, 17:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник
Сообщений: 3334
Регистрация: 11.1.2003
Где: Киев

Репутация: нет
Всего: 110



хм... не знал...


--------------------
qqq
PM WWW   Вверх
BLACK_KOT
Дата 26.11.2007, 23:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 305
Регистрация: 20.12.2006

Репутация: нет
Всего: -1



THandle  благодарю! 


--------------------
                       .. я - демо версия Бога от Microsoft..
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »


 




[ Время генерации скрипта: 0.0577 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.