2. Пример программы построения диаграмм.

Посмотрим, как построить простейшее прило­жение, отображающее графики, например, графики синуса и косинуса (рис. 1). Разместите на форме компонент Chart, задайте в его свойстве Align значение alClient и сделайте двойной щелчок на этом компоненте. Перед вами откроется окно Редактора Диаграмм Chart (рис. 2). Оно имеет две основные страницы: Chart — задание общих настроек компонента, и Series — настройка свойств отдель­ных серий. Каждая из этих страниц в свою очередь имеет ряд закладов.

Кнопка Add позволяет добавить новую серию. Нажав ее, вы попадете в окно (рис. 2 б), в котором вы можете выбрать тип диаграммы или графика. В данном случае выберите Line — обычный кусочно-линейный график. В последующих раз­делах мы рассмотрим подробно все типы диаграмм. С помощью кнопки Title в окне рис. 2 а вы можете задать какое-то осмысленное имя серии (для примера рис. 1 эти имена — «синус» и «косинус»). Воспользовавшись закладкой Titles, вы можете задать заголовок и подпись диаграммы («Синус и косинус» и «Пример простого графика» для примера рис. 1), закладка Legend позволяет задать параметры отображения легенды диаграммы (списка обозначений) или вообще убрать ее с экрана, закладка Panel определяет вид панели, на которой отображается диаграмма, закладка 3D дает вам возмож­ность изменить внешний вид вашей диаграммы: наклон, сдвиг, толщину и т.д. По­скольку пока мы хотим строить нормальный деловой график, полезно открыть эту закладку и выключить на ней индикатор 3Dimentions.

Р ис. 1. Простейшее приложение с графиками.

Рис. 2.Окна задания серий (а) и выбора типа серии (б) Редактора Диаграмм

В процессе ввода всей этой несложной информации в компоненте Chart, раз­мещенном на вашей форме, отражается общий вид графиков с некоторыми случай­ными данными. Так что вы сразу можете видеть результаты проводимой вами на­стройки внешнего вида графиков.

Теперь осталось написать операторы, задающие точки графика. Это можно сделать в обработчике события формы OnCreate. Для нашего примера код этого об­работчика может иметь вид:

procedure TForml.FormCreate(Sender: TObject);

var i: integer;

begin

for i:=0 to 100 do

begin

Series1.AddXY(0.02*Pi*i,sin(0.02*Pi*i),'',clRed);

Series2.AddXY(0.02*Pi*i,cos(0.02*Pi*i),'',clBlue);

end;

end;

Значения, которые должны отображаться на графиках, заносятся в серии Series1 и Series2 методом AddXY. Первый параметр этого метода — значение ар­гумента, второй — значение функции в этой точке. Третий параметр, который в данном примере мы оставили в виде пустой строки — это обозначение (надпись) соответствующей точки. На графиках, естественно, оставлять этот параметр пус­тым. А для диаграмм, как мы увидим позднее, он имеет смысл. Последний пара­метр метода — цвет графика.

Выполните данное приложение и посмотрите его в работе. Вы увидите карти­ну, показанную на рис. 1. Масштаб по осям графиков компонент Chart выбрал автоматически. Вам не пришлось об этом заботиться. В компоненте заложено еще много возможностей, которые автоматически реализовались в вашем графике. На­жмите в пределах площади графика левую кнопку мыши и потяните курсор вниз и вправо, выделяя на графике некоторую прямоугольную область, начиная с ее верхнего левого угла. Когда вы отпустите кнопку мыши, выделенная вами область растянется на все поле графика, и вы сможете в деталях посмотреть выделенный фрагмент графика. Если теперь вы нажмете правую кнопку мыши и начнете пере­мещать курсор в поле графика, то увидите, что график будет смещаться. Таким способом вы сможете в крупном масштабе посмотреть его различные области. Если вы хотите вернуться к прежнему масштабу, позволяющему смотреть весь график, проведите курсором при нажатой левой кнопке мыши рамку вверх и влево. Мас­штаб восстановится.