2

Мне нужно, чтобы окно, в том числе и вот это

alt text

скрывалось при запуске программы. Как это сделать?

6
  • 1
    Эх, давно я программировал на Delphi... Может быть, Window.hide()?
    – neoascetic
    30 мар 2012 в 6:25
  • Хоть и не Window.hide() а Form1.Hide; но всё равно большое спасибо!!! 30 мар 2012 в 6:29
  • 1
    @Андрющенко Андрей, Если вам дан исчерпывающий ответ, отметьте его как верный (нажмите на галку рядом с выбранным ответом).
    – neoascetic
    30 мар 2012 в 6:52
  • 3
    Никогда не думал, что скажу такое кому-нибудь, но, поразмыслив над вопросами задаваемыми ТС каждый день, могу порекомендовать печальную книгу Фленова "Delphi глазами хакера". Там есть все, что вас интересует в данный момент.
    – Nofate
    30 мар 2012 в 8:06
  • 1
    Книжку делфи для хакеров прочтите, раз троян писать решил 15 сен 2015 в 12:32

5 ответов 5

4

Чтобы форма не отображалась в пенели задач, нужно в конструкторе формы установить свойство BorderStyle в bsDialog или bsToolWindow, например. Для скрытия нужно тоже в конструкторе установить Visible := false.
Все это нужно устанавливать в дизайнере или программно присвоить в конструкторе класса формы.
UPD
Попробуйте еще

ShowWindow(Self.Handle, SW_HIDE);

Для того, что бы visible := false сработало, нужно похоже сначала StayOnTop := true; делать.

3
Form1.Hide;
2
procedure TForm1.FormShow(Sender: TObject);
begin

ShowWindow(Application.Handle, SW_HIDE);

end;
1

Ну, если просто надо, чтобы его не было видно, можно в OnCreate установить его свойство visible на false.

3
  • Пробовал, не получается. 30 мар 2012 в 6:29
  • Что не получается? Скрывается, но не сразу? Обновил ответ.
    – Ildar
    30 мар 2012 в 6:50
  • Вообще не скрывается, как будто ничего ни делал. 30 мар 2012 в 6:54
1

В FormCreate введите

Action:=caNone; Application.Minimize;

1
  • Думаю просто и ясно.
    – MrGons18
    8 дек 2012 в 12:55

Ваш ответ

Нажимая на кнопку «Отправить ответ», вы соглашаетесь с нашими пользовательским соглашением, политикой конфиденциальности и политикой о куки

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.