Работа с контекстом дисплея
-----------------------------------------------------------------
Обычно нужно определять поле оконного объекта для записи описателя текущего контекста дисплея, аналогично тому, как в HWindow сохраняется описатель окна:
type TMyWindows = object(TWindow) TheDC: HDC; . . . end;
Чтобы получить для окна контекст дисплея, вызовите функцию Windows GetDC:
TheDC := GetDC(HWindow);
Затем вы можете выполнить операцию изображения в контексте дисплея. Вы можете использовать описатель контекста дисплея в графических функциях Windows:
LineTo(TheDC, Msg.LParamLo, Msg.LParamHi);
Как только вы закончите работу с контекстом дисплея, освобо- дите его с помощью вызова функции ReleaseDC:
ReleaseDC(HWindow, TheDC);
Не вызывайте GetDC в строке дважды, не включив между вызова- ми вызов ReleaseDC. В итоге это приведет к сбою системы при рабо- те программы, так как она исчерпает все доступные контексты дисп- лея.