Иллюстрированный самоучитель по Turbo Pascal

Типы. Переменные.

type

PaletteType = record {Используется в GetPallete}
Size: Byte;
Colors: array [0..MaxColors] of Shortlnt;
end;

LineSettingsType = record {Используется в GetLineSettings}
LineStyle Word;
Pattern Word;
Thickness Word;
end;

TextSettingsType = record {Используется в GetTextSettings}
Font:Word;
Direction: Word;
CharSize: Word;
Horiz: Word;
Vert: Word;
end;

FillSettingsType = record {Используется в GetFillSettings}
Pattern: Word;
Color: Word;
end;

FillPatternType = array [1..8] of Byte;

PointType = record {Для задания координат многоугольников}
X,Y: Integer;
end;

ViemPortType = record {Используется в GetViewSettings}
X1, Y1, X2, Y2: Integer;
Clip: Boolean;
end;

ArcCoordsType = record {Используется в GetArcCoords}
X, У: Integer;
Xstart, Ystart: Integer;
Xend, Yend: Integer;
end;

Переменные

var
GraphGetMemPrt: Pointer; {Распределение кучи}
GraphFreeMemPrt: Pointer; {Освобождение кучи}

Эти переменные указывают на программы управления кучей модуля Graph. Если Ваша программа использует собственный алгоритм управления памятью, присвойте адреса Ваших программ распределения и освобождения памяти переменным GraphGetMemPrt и GraphFreeMemPrt.