Home

Page 94
Page 94
background image

Система 87

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

вого слова

 пишут подключаемые модули. У нас их будет всего два:

windows и messages. В этих двух модулях идет описание

 WinAPI-

функций (модуль windows) и сообщений операционной системы (модуль

messages). Из этих модулей Delphi узнает о существовании функций WinAPI

и способах работы с ними.

Дальше

 функций

 И

 О

поговорим немного позже, а сейчас перейдем на начало программы.

После старта программа сразу же запускает бесконечный цикл:

while условие do

begin
end;

Цикл while условие do означает: выполнять операторы, расположенные

в теле цикла, пока условие равно true. Если в качестве условия указано

true, то цикл будет выполняться бесконечно, потому что true никогда не

станет равным false. Чтобы цикл был не бесконечным, используют какую-

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

указали значение, которое всегда будет истинным.

Внутри цикла вызывается функция —

 Это

 ко-

торая используется для перечисления всех запущенных окон. В качестве един-

ственного параметра ей нужно передать адрес другой функции, которая будет

вызываться каждый раз, когда найдено какое-нибудь окно. Для этого служит
ФУНКЦИЯ EnumWindowsWnd. Таким образом,

 раз,

 ОКНО, будет ВЫПОЛНЯТЬСЯ КОД, наПИСанНЫЙ В EnumWindowsWnd.

код выглядит вот так:

//Эта функция вызывается, когда найдено главное окно

function

 hwnd): BOOL; stdcall;

begin

 тобой

1

)));

end;

У функции EnumWindowsWnd есть один параметр

 идентификатор найденного

окна. Этого достаточно, чтобы мы могли изменить его заголовок. Есть такая

 которая посылает сообщения. У нее 4 параметра.

1. Первый— идентификатор окна, которому надо отослать сообщение.

ЭТОТ Идентификатор МЫ получаем В

 параметра EnumWindowsWnd.

2. Второй параметр — тип сообщения. Указан

 Сообщения дан-

ного типа

 окно сменить заголовок или свое содержание.

3. Третий — для данного сообщения должен быть о.

4. Четвертый параметр — новое имя или текст окна.


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

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