Home

Page 334
Page 334
background image

Полезное 327

дочерним, используя панель задач. Несмотря на то, что подобных свойств
у формы в Delphi нет, мы можем повлиять на ход событий, и в этом разделе

я покажу, как это сделать.
Создайте новый проект и поместите на главную форму только одну кнопку.
Теперь добавьте к проекту еще одну форму. При нажатии кнопки на глав-

ной форме мы будем отображать дочернее окно:

procedure
begin

end;

Окно отображается методом show, чтобы оно было немодальным, и можно

было переключаться между окнами. Таким образом, на экране будут нахо-

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

него обработчик события OnCreate. В нем мы напишем следующее:

procedure

 TObject);

begin

 or

end;
Фокус достаточно прост. Здесь вызывается WinAPI-функция setwindowLong,
которая может изменять параметры окна. В инспекторе объектов нам дос-

тупно не все, а с помощью этой функции мы можем изменить любые свой-
ства, какие есть. У функции имеется три параметра.

 Указатель на окно, параметры которого надо изменить. Указано текущее

окно, т. е. наше дочернее окошко.

 Что мы хотим изменить. Здесь можно указать несколько значений (их вы

можете увидеть в файле справки

 WinAPI, если запустите поиск слова

SetwindowLong. Но реально вам могут пригодиться только два из доступ-

ных параметров:

 — изменить стандартный стиль окна. Стандартные стили

вы можете увидеть в файле справки

 WinAPI, если запустите поиск

слова

 Такие стили начинаются с префикса ws_. Эти

изменения можно сделать и в инспекторе объектов с помощью
свойств формы;

 — изменить расширенный стиль окна. Здесь находятся рас-

ширенные стили, которых нет в инспекторе объектов. Расширенные сти-

ли вы можете увидеть в файле справки

 WinAPI, если запустите поиск

слова

 Такие стили начинаются с префикса

 Новое значение изменяемого параметра.


Copyright © 2020 Файлообменник files.d-lan.dp.ua

Использование любых материалов сайта возможно только с разрешения автора.