Pascal 7 & Objects

       

Основные инструментальные средства


-----------------------------------------------------------------

Основные инструментальные средства создаются функцией GDI GetStockObject. Например:

var TheBrush: HBrush begin TheBrush:=GetStockObject(LtGray_Brush); . . . end;

где LtGray_Brush - это целая константа, определенная в модуле WinTypes в ObjectWindows. Приведем список всех имеющихся констант основного инструментального средства:

Основные инструменты рисования Таблица 17.1 +-------------------+------------------+------------------------+ | Кисти | Перья | Шрифты | +-------------------+------------------+------------------------| | White_Brush | White_Pen | OEM_Fixed_Font | | LtGray_Brush | Black_Pen | ANSI_Fixed_Font | | Gray_Brush | Null_Pen | ANSI_Var_Font | | DkGray_Brush | | System_Font | | Black_Brush | | Device_Default_Font | | Null_Brush | | System_Fixed_Font | | Hoolow_Brush | | | +-------------------+------------------+------------------------+

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



Содержание раздела