Построение графиков

Компонент TChart является контейнером объектов Series типа TChartSeries серий данных, характеризующихся различными стилями отображения. Каждый компонент может включать несколько серий. Каждая серия будет соответствовать одной кривой на графике. Для некоторых видов диаграмм можно наложить друг на друга несколько различных серий, делая в каждый момент времени активной одну из них, можно предоставить пользователю выбор типа диаграммы, отображающей интересующие его данные.

Свойства компонента Chart:

AllowPanning - определяет возможность пользователя прокручивать наблюдаемую часть графика во время выполнения, нажимая правую кнопку мыши.

Возможные значения:

pmNone – прокрутка запрещена,

pmHorizontal, pmVertical или pmBoth - разрешена соответственно прокрутка только в горизонтальном направлении, только в вертикальном или в обоих направлениях.

AllowZoom - позволяет пользователю изменять во время выполнения масштаб изображения, вырезая фрагменты диаграммы или графика курсором мыши.

Title - определяет заголовок диаграммы.

Foot - определяет подпись под диаграммой, по умолчанию отсутствует. Текст подписи определяется подсвойством Text.

Frame - определяет рамку вокруг диаграммы.

Legend - легенда диаграммы - список обозначений.

MarginLeft, MarginRight, MarginTop, MarginBottom - значения левого, правого, верхнего и нижнего полей.

BottomAxis, LeftAxis, RightAxis - эти свойства определяют характеристики соответственно нижней, левой и правой осей.

LeftWаll, BottomWаll, BackWаll – эти свойства определяют характеристики соответственно левой, нижней и задней граней области трехмерного отображения графика.

LeftWаll, BottomWаll, BackWаll – эти свойства определяют характеристики соответственно левой, нижней и задней граней области трехмерного отображения графика.

Редактор Диаграмм - многостраничное окно, позволяющие установить все свойства диаграмм. Вызов Редактора Диаграмм возможен двойным щелчком на компоненте Chart или щелчком на нем правой кнопкой мыши и выбором команды Edit Chaгt во всплывшем меню.

Страница Series - дает вам возможность выбрать дополнительные характеристики отображения серии.

Методы компонента tChart:

Clear - очищает серию от занесенных ранее данных.

Add - позволяет добавить в диаграмму новую точку.

Add(Const AValue: Double; Const ALabel: String; AColor:TColor);

АYValue - соответствует добавляемому значению.

ALabel - название, которое будет отображаться на диаграмме и в легенде.

AColor - цвет.

Параметр ALabel - не обязательный, его можно задать пустым.

AddXY - позволяет добавить новую точку в график функции.

AddXY(Const AXValue, AYValue: Double; Const ALabel: String; AColor: TColor);

AXValue и AYValue - соответствуют аргументу и функции.

ALabel и AColor - те же, что и в методе Add.

Выполнение задания:

1.Разместим на форме две кнопки типа TButton.

Установим следующие свойства:

Button1: Caption= «Вычислить значение функции»

Button2: Caption= «Построить график функции»

2. Разместим на форме компонент TStringGrid. Установим следующие свойства:

ColCount=2; RowCount=2;

3. Разместим на форме компонент TChart. Дважды щелкнув мышкой на компоненте, вызовем редактор диаграмм.

4. Создадим серию и выберем в ней график.

6. Создадим обработчик события формы OnCreate:

procedure TForm1.FormCreate(Sender: TObject);

var i:byte;

begin

Series1.Active:=false;

end;

7. Создадим обработчик кнопки Button1.

procedure TForm1.Button1Click(Sender: TObject);

var i:integer;

h,x,y:real;

begin

i:=0;h:=0.5;x:=0;

StringGrid1.Cells[0,0]:='x';

StringGrid1.Cells[0,1]:='y';

StringGrid1.Cells[1,0]:=floattostr(i*h);

StringGrid1.Cells[1,1]:=floattostr(sin(Pi/180*(i*h)));

repeat

inc(i);

StringGrid1.ColCount:=i+2;

x:=i*h;

y:=sin(x);

StringGrid1.Cells[i+1,0]:=floattostrf(x,ffFixed,3,2);

StringGrid1.Cells[i+1,1]:=floattostrf(y,ffFixed,3,2);

until i*h>3*pi;

end;

8. Создадим обработчик кнопки Button2.

procedure TForm1.Button2Click(Sender: TObject);

var i:integer;

begin

Series1.Active:=true;

Series1.Clear;

Series1.Title:='sin(x)';

for I := 1 to StringGrid1.ColCount-1 do

Series1.AddXY(strtofloat(StringGrid1.Cells[i,0]),strtofloat(StringGrid1.Cells[i,1]),'',clRed);

end;

В результате получим следующий результат изображенный на рисунке 2.

Рис. 2 Форма с построенным графиком функции

Задания и варианты

Вариант	Функция	Шаг	Отрезок
1		0,1	[-1;1]
2		0,2	[0;5]
3		0,1	[-5;5]
4		0,2	[-6;4]
5		0,2	[-1;1]
6		0,5	[2;10]
7		0,6	[0;3π]
8		0,4	[0;8]
9		0,2	[-5;0]
10		0,5	[0;3π]
11		0,1	[1;5]
12		0,2	[1;5]
13		0,6	[0;3π]
14		0,1	[-1;1]
15		0,2	[1;5]
16		0,1	[2;6]
17		0,3	[-3;5]
18		0,1	[0;5]
19		0,5	[-π;2π]
20		0,2	[1;5]
21		0,2	[-1;1]
22		0,4
23		0,2
24		0,1	[-1;1]
25		0,2	[-5;0]
26		0,3	[-2;3]
27		0,1	[0;π]
28		0,4	[1;8]
29		0,5	[-1;7]
30		0,2	[1;6]