Программирование графики

Xakep, номер #040, стр. 040-075-4

Тут всего три параметра: заполненная структура SurfaceDesc, переменная типа IDirectDrawSurface7 (сюда будет записан указатель на созданную поверхность) и резерв.

Выход

При выходе из программы все созданные объекты и поверхности (у нас это FPrimarySurface и FDirectDraw) должны быть уничтожены. Уничтожать надо в обратном порядке их создания. В нашем случае я сначала создавал FDirectDraw, а потом FPrimarySurface. Значит, сначала уничтожается FPrimarySurface, а потом FDirectDraw. Для уничтожения нужно просто присвоить этим указателям значение nil.

Вот так должна выглядеть теперь твоя процедура выхода из проги:

procedure DoExit;

begin

FPrimarySurface := nil;

FDirectDraw := nil;

Halt;

end;

Эта процедура вызывается по системному событию wm_destroy из обработчика событий WindowProc.

Press Exit

На этом я закончу сегодняшний урок. В качестве домашнего задания я решил дать тебе исходник этого примера, в котором добавлено рисование простого белого квадрата. Ну а в следующий раз я объясню, как происходит этот процесс, и продвинусь дальше. Пример можно скачать с моего сайта www.cydsoft.com/vr-online после выхода журнала в свет. Там же ты сможешь найти дополнительную инфу по DirectX кодингу, но уже с использованием преимуществ Delphi. Так что статьи в Х практически не будут повторять содержимое сайта. Даже наоборот, сайт будет служить для тебя дополнительным источником инфы.

На моем сайте ты должен еще скачать заголовочные файлы для DirectX7 и 8 в разделе Download -> "Заголовочные файлы".

На этом я могу откланяться и пожелать тебе дождаться следующего месяца и очередного урока по компьютерной графике.