procedureInit(Left,Top,Width,Height: integer; BackColor: Color := clWhite);
Устанавливает положение, размеры и цвет графического окна
|
procedureSave(fname: string);
Сохраняет содержимое графического окна в файл с именем fname
|
procedureLoad(fname: string);
Восстанавливает содержимое графического окна из файла с именем fname
|
procedureFill(fname: string);
Заполняет содержимое графического окна обоями из файла с именем fname
|
procedureClose;
Закрывает графическое окно и завершает приложение
|
procedureMinimize;
Сворачивает графическое окно
|
procedureMaximize;
Максимизирует графическое окно
|
procedureNormalize;
Возвращает графическое окно к нормальному размеру
|
procedureCenterOnScreen;
Центрирует графическое окно по центру экрана
|
functionCenter: Point;
Возвращает центр графического окна
|
Кроме того, можно изменять свойства графического окна, используя соответствующие процедуры и функции.
Подпрограммы для работы с координатами графического окна
Доступ к свойствам координат графического окна можно осуществлять как в процедурном, так и в объектно-ориентированном стиле.
Процедуры и функции для изменения системы координат окна приведены ниже:
procedureSetCoordinateOrigin(x0,y0: integer);
Устанавливает начало координат в точку (x0,y0)
|
procedureSetCoordinateScale(sx,sy: real);
Устанавливает масштаб системы координат
|
procedureSetCoordinateAngle(a: real);
Устанавливает поворот системы координат
|
Можно также изменять свойства системы координат графического окна через объект Coordinate.
Класс GraphABCCoordinate графического окна
Объект текущей системы координат возвращается функцией Coordinate и имеет тип GraphABCCoordinate:
functionCoordinate: GraphABCCoordinate;
Класс GraphABCCoordinate представляет тип системы координат для графического окна.
Свойства класса GraphABCCoordinate
propertyOriginX: integer;
X-координата начала координат относительно левого верхнего угла окна
|
propertyOriginY: integer;
Y-координата начала координат относительно левого верхнего угла окна
|
propertyOrigin: Point;
Координаты начала координат относительно левого верхнего угла окна
|
propertyAngle: real;
Угол поворота системы координат
|
propertyScaleX: real;
Масштаб системы координат по оси X
|
propertyScaleY: real;
Масштаб системы координат по оси Y
|
propertyScale: real;
Масштаб системы координат по обоим осям
|
propertyMatrix: System.Drawing.Drawing2D.Matrix;
Матрица 3x3 преобразований координат
|
Методы класса GraphABCCoordinate
procedureSetTransform(x0,y0,angle,sx,sy: real);
Устанавливает параметры системы координат
|
procedureSetOrigin(x0,y0: integer);
Устанавливает начало системы координат
|
procedureSetScale(sx,sy: real);
Устанавливает масштаб системы координат
|
procedureSetScale(scale: real);
Устанавливает масштаб системы координат
|
procedureSetMathematic;
Устанавливает правую систему координат (ось OY направлена вверх, ось OX - вправо)
|
procedureSetStandard;
Устанавливает левую систему координат (ось OY направлена вниз, ось OX - вправо)
|
Кроме того, можно изменять свойства системы координат, используя соответствующие процедуры и функции.
Подпрограммы блокировки рисования
procedureRedraw;
Перерисовывает содержимое графического окна. Вызывается в паре с LockDrawing
|
procedureLockDrawing;
Блокирует рисование на графическом окне. Перерисовка графического окна выполняется с помощью Redraw
|
procedureUnlockDrawing;
Снимает блокировку рисования на графическом окне и осуществляет его перерисовку
|
Блокировка вывода в графическое окно LockDrawing с последующим вызовом Redraw используется для простейшего создания анимации без мерцания.
Пример.Анимация без мерцания
Подпрограммы режимов рисования
procedureSetSmoothing(sm: boolean);
Устанавливает режим сглаживания
|
procedureSetSmoothingOn;
Включает режим сглаживания
|
procedureSetSmoothingOff;
Выключает режим сглаживания
|
functionSmoothingIsOn: boolean;
Возвращает True, если режим сглаживания установлен
|
Читать дальше