Задачи курса: 1) Приобретение навыков работы в среде системы визуального программирования Delphi (версия не ниже 0). Создание простейших Приложений
Вид материала | Документы |
- Учебная программа курса «основы программирования в среде «Delphi» ( 9 класс, 86.93kb.
- Знакомство со средой программирования Delphi, 1286.99kb.
- Программы, кол-во часов, 46.73kb.
- Пояснительная записка, 185.11kb.
- Тема урока: vba как язык объектно-ориентированного программирования (ооп), 43.71kb.
- Vba относительно легкий язык программирования, 140.81kb.
- Программа и материалы элективного курса для учащихся 10 11 классов «Delphi в примерах., 227.84kb.
- Курс Методы визуального программирования при разработке системного программного обеспечения., 30.14kb.
- Данное методическое пособие расчитано как на читателей, не имеющих опыта работы в среде, 208.26kb.
- Отчет по курсовой работе должен содержать, 46.07kb.
Предусмотрено два события для пользовательской реакции на изменение канвы: OnChange и OnСhanging. Эти события возникают при изменениях свойств и вызовах методов TCanvas, меняющих вид канвы (то есть, при любом рисовании; в методе MoveTo, например, они не возникают). Отличие их в том, что событие onChanging вызывается до начала изменений, а событие OnChange — после их завершения.
- Примеры использования свойств и методов класса TCanvas
Заполнение формы разноцветными точками.
p
![](images/187563-nomer-m56e38140.png)
var i,j: integer;
begin
for i:=0 to Width-1 do
f
Рисунок 6 Заполнение формы разноцветными точками
or j:=0 to Height-1 do
Canvas.Pixels[i,j]:=i*j;
end;
Р
![](images/187563-nomer-ab43825.png)
begin
C
Рисунок 7 Рисование отрезка
anvas.Pen.Color:=clRed;
Canvas.Pen.Width:=10;
Canvas.MoveTo(10,10);
Canvas.LineTo(20,20);
end;
Рисование прямоугольника с координатами (20,30) и (80,100) синей пунктирной линией с заливкой красного цвета.
begin
Canvas.Pen.Color:=clBlue;
![](images/187563-nomer-m5fec590c.png)
Canvas.Pen.Width:=1;
Canvas.Pen.Style:=psDash;
Canvas.Brush.Color:=clRed;
C
Рисунок 8 Рисование прямоугольника
anvas.Rectangle( 20,30,80,100);
end;
Рисование окружности с центром в (100, 100) и радиусом 50 белой точечной линией со штрихованной заливкой синего цвета.
![](images/187563-nomer-m506d0e6d.png)
with Canvas do begin
pen.Color:=clWhite;
Pen.Width:=1;
Pen.Style:=psDot;
Brush.Color:=clBlue;
Brush.Style:=bsCross;
Ellipse(100-50,100-50,100+50,100+50);
e
Рисунок 9 Рисование окружности
nd;
Р
![](images/187563-nomer-12874a9b.png)
Canvas.Pen.Color := clWhite;
Canvas.Polyline([Point(40, 10), Point(20, 60), Point(70, 30),
Point(10, 30), Point(60, 60), Point(40, 10)]);
Рисование верхней четверти окружности (эллипса)
![](images/187563-nomer-m1bde2d84.png)
Canvas.Arc(10, 10, 100, 100, 100, 10, 10, 10);
- Использование визуальных компонентов
Визуальные компоненты представляют собой элементы, из которых конструируется интерфейс работающего приложения. Однако существует значительное количество компонентов, которые не создают видимого изображения, но тем не менее играют важную роль в программной реализации приложения. Правильнее думать о компонентах как о заранее приготовленных фрагментах программы, которые можно вставлять, если в этом есть необходимость, в разрабатываемую программу. В этом разделе приводится начальный обзор компонентов, который дает самое общее представление о богатстве возможностей Delphi. Библиотеки компонентов для разных версий Delphi строятся по принципу расширения: в первой версии было около 70 компонентов, в то время как в состав Delphi 6 входит более 300 компонентов. Ниже компоненты группируются по функциональному признаку, приводятся их краткие описания.
- Метки
М
![](images/187563-nomer-4e65e11a.png)
Таблица 12 свойства TLabel и TStaticText
-
Transparent
Логическое свойство, определяющее прозрачность фона метки. Если False, фон закрашивается собственным цветом Color, в противном случае используется фон родительского компонента
Wordwrap
Логическое свойство, разрешающее (запрещающее) разрыв строки на границе слова.
FocusControl
Содержит имя оконного компонента, который связан с меткой-акселератором
ShowAccelChar
Если содержит True, то символ & в тексте метки предшествует символу-акселератору
Layout
Определяет выравнивание текста по вертикали относительно границ метки: tlTop – текст располагается вверху; tlCenter – текст центрируется по вертикали; tlBottom – текст располагается внизу