Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
конспект лекций_2 семестр.doc
Скачиваний:
0
Добавлен:
01.04.2025
Размер:
1.4 Mб
Скачать

Основные события tCanvas

OnChange Событие после изменения изображения

Обработчик события OnChange должен осуществить необходимые операции при изменении графического объекта и отразить его новые установки.

OnChanging Событие перед изменением изображения

Объект tPaintBox

На странице System Палитры Компонент есть объект TPaintBox, который можно использовать для построения приложений типа графического редактора или, например, в качестве места построения графиков. Никаких ключевых свойств, кроме Canvas, TPaintBox не имеет, собственно, этот объект является просто канвой для рисования. Важно, что координаты указателя мыши, передаваемые в обработчики соответствующих событий (OnMouseMove и др.), являются относительными, т.е. это смещение мыши относительно левого верхнего угла объекта TPaintBox, а не относительно левого верхнего угла формы.

Пример:

with PaintBox1 do

begin

Canvas.Brush.Сolor := clRed;

Canvas.Brush.Style := bsDiagCross;

Canvas.Ellipse(0, 0, PaintBox1.Width, PaintBox1.Height);

end;

рисует эллипс, вписанный в компонент PaintBox1 и заполненный красной штриховкой.

 

TImage - компонент

Компонент TImage отображает на форме графическое изображение. Свойство Picture типа TPicture содержит отображаемый графический объект типа битовой матрицы, пиктограммы, метафайла или определенного пользователем типа. Свойство Canvas позволяет создавать и редактировать изображения.

Чтобы создать на форме или модуле данных изображение, которым управляют другие элементы, надо использовать не TImage, а TImageList.

Пример:

with Image1 do

begin

Canvas.Brush.Сolor := clRed;

Canvas.Brush.Style := bsDiagCross;

Canvas.Ellipse(0, 0, Image1.Width, Image1.Height);

end;

рисует эллипс, вписанный в компонент Image1 и заполненный красной штриховкой.

TShape - компонент

TShape позволяет отображать на форме простые геометрические фигуры, соответствующим образом заштрихованные. Основное свойство этого компонента - Shape (форма), которое может принимать значения: stRectangle - прямоугольник, stRoundRect - прямоугольник со скругленными углами, stSquare - квадрат, stRoundSquare - квадрат со скругленными углами, stEllipse - эллипс, stCircle - круг.

Свойство компонента Brush (кисть) типа TBrush, определяет заполнение фигуры: цвет (Brush.Color) и стиль (Brush.Style). Свойство Pen (перо) типа TPen определяет стиль линий.

Пример:

With Shape1 do

Begin

Shape:=stRoundrect;

Brush.Сolor := clRed;

Pen.Сolor := clRed;

Pen.Width:=3;

Файлы и устройства ввода/вывода

Для использования файлов в приложении разработчику приходится решать множество задач. Главные из них — поиск необходимого файла и выполнение с ним операций ввода/вывода.

Среда Delphi дает вам возможность выбрать один из четырех вариантов работы:

  • использование традиционного набора функций работы с файлами, унаследованного от Turbo Pascal;

  • использование функций ввода/вывода из Windows API;

  • использование потоков (Tstream и его потомки);

  • использование отображаемых файлов.