Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=214813&view=findpost&p=1798561 Tue, 11 Dec 2007 05:49:38 +0000 Chart https://forum.sources.ru/index.php?showtopic=214813&view=findpost&p=1798561
После двойного щелчка мыши по этой заготовке, будет произведен переход в редактор графика. В среде этого редактора можно установить свойства графика и его серий. Содержимое редактора графика представляет собой табулированный блокнот. Для нового графика первой всегда показывается закладка Chart и для страницы Chart - закладка Series (рис.1).

user posted image
Рис.1. Редактор графика

Каждая из закладок на странице Chart предназначена для установки параметров того или иного компонента графика:

Series - содержит серии графика. Серией называется набор точек графика. На графике серии соответствует отдельная линия или ряд столбцов. Если в графике несколько серий, то будет визуализировано несколько линий или рядов столбцов.

General - устанавливает общие параметры графика, такие как объемность графика, отступы от краев, возможность увеличения (Zoom) и др.

Axis - устанавливает свойства осей (рис.2.).

user posted image
Рис.2. Редактор графика - окно установки свойств осей

В области ShowAxis определяется, для какой оси устанавливаются параметры - левой, правой, верхней или нижней. На странице, определяемой закладкой Scales, устанавливаются свойства масштаба значений по оси. Automatic устанавливает автоматическое масштабирование данных по оси - минимум и максимум вычисляются динамически, исходя из текущих значений серии. При отмене автоматического масштабирования можно установить автоматическое масштабирование минимального (Minimum) или максимального (Maximum) значения (отметка Auto). Для установки значения максимума и (или) минимума вручную следует нажать соответствующую кнопку Change. Шаг масштаба по оси выбирается автоматически, если в Desired Increment установлено значение 0. Установить фиксированное значение шага можно, нажав кнопку Change. Закладка Title позволяет установить текст заголовка по оси, угол расположения заготовки и шрифт, которым заголовок выводится. Закладка Labels задает параметры меток для оси. Закладка Tiks устанавливает параметры самой линии оси.

Titles - определяет заголовок графика, шрифт, выравнивание и др.

Legend - задает параметры легенды. Легенда - это область графика, где приводится информация о графике. Легенда служит для пояснения графика.

Panel - определяет параметры панели, на которой располагается график.

Paging - устанавливает параметры многостраничного графика.

Walls - задает "стенку" графика.

3D - дает возможность изменить внешний вид диаграммы: наклон, сдвиг, толщину и т.д.

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

Чтобы добавить в график серию, следует на странице Chart, (закладка Series) нажать кнопку Add. После этого появится окно выбора типа серии (рис.3.).

user posted image
Рис.3.Редактор графика - окно выбора типа серии

После выбора типа серии в график добавляется компонент, дочерний от базового типа TChartSeries - TLineSeries, TBarSeries, TPieSeries и т.д. Для примера выберем серию типа Line и нажмем Ok. В окне страницы Chart (закладка Series ) будет показана серия (рис.4.).

user posted image

Рис.4.Редактор графика - список серии графика

Кнопка Add может использоваться для добавления других серий, кнопка Delete - для удаления текущей серии. После нажатия кнопки Title можно определить заголовок серии, кнопки Clone -создать новый экземпляр такой же серии в этом же графике, кнопки Change - изменить тип текущей серии.

Перейдем с закладки Chart на закладку Series. На этой странице представлен блокнот с закладками Format, General, Marks, Data Source. Рассмотрим свойства серии, которые можно установить на страницах, соответствующих этим закладкам.

Главные свойства серии можно определить на странице Data Source. На ней определяется источник данных для серии. Выпадающий список ниже закладки позволяет определить тип источника данных для серии:

No Data - серии не назначается источник данных. Заготовленный шаблон серии может в разное время использоваться для показа данных из разных источников.

Random Values - набор случайных чисел, может быть полезен при формировании заготовки серии.

Function - функция (Copy, Average, Low, High, Divide, Multiply, Subtract, Add) - служит для построения графиков на основании данных в двух или более сериях.

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

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

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

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

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

Property BackWall : TChartWall;
PropertyBottomWall : TChartWall;
Property LeftWall : TChartWall; - Определяют характеристики соответственно задней, нижней и левой граней области трехмерного отображения графика.

PropertyBottomAxis : TChartAxis;
Property LeftAxis : TChartAxis;
Property RightAxis : TChartAxis; - Определяют характеристики соответственно нижней, левой и правой осей.

Property Chart3dPercent : Integer; - Масштаб трехмерного отображения диаграммы.

Property Foot : TChartTitle; - Определяет подпись под диаграммой. По умолчанию отсутствует. Текст подписи определяется под свойством Text.

Property Frame : TChartPen; - Определяет рамку вокруг диаграммы.

Property Legend : TChartLegend; - Легенда диаграммы - список обозначений.

Property MarginLeft : Integer;
Property MarginRight : Integer;
Property MarginTop : Integer;
Property MarginBottom : Integer; - Значения левого, правого, верхнего и нижнего полей.

Property SeriesList : TChartSeriesList; - Список серий данных, отображаемых в компоненте.

Property Title : TChartTitle; - Определяет заголовок диаграммы.

Property View3d : Boolean; - Разрешает или запрещает трехмерное отображение диаграммы.


Для задания отображаемых значений используются методы серии Series. Основные:

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

Метод Add:

Add(const AValue: Double; const ALabel: String; AColor: TColor)
позволяет добавить в диаграмму новую точку. Параметр AValue соответствует добавляемому значению, параметр ALabel - название, которое будет отображаться на диаграмме и в легенде, AColor - цвет. Заметим, что параметр ALabel - не обязательный, его можно задать пустым: ' '.

Метод AddXY:

AddXY(const AXValue, AYValue: Double; const ALabel: String; AColor: TColor)
позволяет добавить в график функции новую точку. Параметр AXValue и AYValue соответствуют аргументу и функции. Параметр ALabel и AColor те же, что и в методе Add.

Так же компонент TChart имеет метод Print, обеспечивающий печать. Предварительно может быть выполнен метод PrintPortrait, задающий книжную (вертикальную) ориентацию бумаги, или метод PrintLandscape, задающий альбомную (горизонтальную) ориентацию. Масштабировать размер печатаемого графика можно, вызвав предварительно метод PrintRect:

    procedure PrintRect(const R: TRect);

в котором параметр R определяет размер области принтера, в которой осуществляется печать.

Приведем пример: обработчик события OnActivate формы создает график, показанный на рис.6.:

    procedure TForm1.FormActivate(Sender: TObject);
     var k: integer;
      begin
       for k:=0 to 20 do
        Chart1.SeriesList[0].AddXY(k, cos(k*pi/5),' ', clRed);
      end;

Текст этого примера можно взять здесь.

user posted image

Рис.5.Пример использования компонента TChart

Таким образом компонент TChart предназначен для графического представления числовых данных. Компонент содержит большое количество специфичных свойств, событий и методов.

У компонента chart много важных свойств, которые нужны для построения графиков. Я попытаюсь описать самые основные свойства.

Установка точек

         For i:=1 to 10 do
          Begin
           X:=значение(i);
            with series1 do  // точки с координатами по осям X график 1
             begin
                 add(X,'string',clblack);
             end;
        
            with series2 do  // точки с координатами по осям X и Y график 2
             begin
              Y:=наше значение;
               if Y<>'' then
               if Y<>'0' then
                addxy(i,Y,'string',clred);
             end;
          end;


Установка более конкретных координат на графике реализуется свойством addxy(X,Y,'string',clred)

Время по оси X с файла. Самое главное чтобы series был первым, если этого не сделать, то значения не отобразиться. Количество значений может быть любым, лишние скроются, а при увеличении будут отображаться.

     AssignFile(file,'С:/параметры.txt');
       reset(file);
        for i:=0 to 2000 do
         begin
          readln(file,string);
          if string<>'' then
           begin
            i:=i+1;
            with series1 do
             addxy(i,0,string,clblack);
           end;
         end;
      CloseFile(file);


Печать графика. Подгонял параметры Rect под стандартный лист формата А4.

    procedure TForm1.ButtonClick(Sender: TObject);
    var Rect:TRect;
    begin
     if PrintDialog.Execute then //пользователь выбрал печать
      begin
       Rect.Left:=0;
       Rect.Top:=0;
       Rect.Right:=6800;
       Rect.Bottom:=4850;
       Chart1.PrintRect(rect);
      end;
    end;



Бывает что 2 графика разные по длине, у одного 1500 значений, а у другого 1300. Но надо чтобы они были визуально равны. Для этого используется банальная математика. Х:=1500/1300;

X=1.1538461538461538461538461538462 то что значение такое длинное не имеет значение сам компонент будет рисовать и по таким значениям. Использовать только со свойством addxy(X,Y,'string',clred)

Заголовок диаграммы

Рассмотрим основные свойства объекта ChartTitle. Заголовок и текст заголовка выводится при условии, что в поле HasTitle объекта Chart записано значение True, а поле Text объекта ChartTitle записан сам текст. Смотрите пример:

    E.Charts.Item[name].HasTitle:=True;
    E.Charts.Item[name].ChartTitle.Text:='Заголовок диаграммы';


Координаты заголовка содержатся в полях Left и Top объекта ChartTitle. Для перемещения заголовка запишите в эти поля новые значения координат. Для определения координат считайте значения из этих полей.

    E.Charts.Item[name].ChartTitle.Left:=Left;
    E.Charts.Item[name].ChartTitle.Top:=Top;


Чтобы изменить визуальные параметры рамки, используйте объект Border и его поля Color (цвет), Weight (толщина) и LineStyle (стиль линии)

    E.Charts.Item[name].ChartTitle.Border.Color:=Color;
    E.Charts.Item[name].ChartTitle.Border.Weight:=Weight;
    E.Charts.Item[name].ChartTitle.Border.LineStyle:=LineStyle;


Для заполнения цветом и узором области заголовка используйте объект Interior и его поля Color (цвет), Pattern (узор) и PatternColor (цвет узора).

    E.Charts.Item[name].ChartTitle.Interior.Color:=Color;
    E.Charts.Item[name].ChartTitle.Interior.Pattern:=Pattern;
    E.Charts.Item[name].ChartTitle.Interior.PatternColor:=PatternColor;


Чтобы заполнить область заголовка рисунком из графического файла, используйте метод UserPicture объекта Fill. Чтобы этот рисунок стал видимым, запишите в поле Visible объекта Fill значение True.

    E.Charts.Item[name].ChartTitle.Fill.UserPicture(PictureFile:= File_);
    E.Charts.Item[name].ChartTitle.Fill.Visible:=True;


Прорисовка только точек (или убирать линии соединяющие точки графика и назад отображать)

1.Для этого создаем новый график Point, смотрим рисунок 4 (series1) и изменяем, свойство series1.Pointer.Style:=psSmallDot (график с помощью точек рисуется точно также как и с помощью линий).

2.Потом добавляем график смотрим рисунок 4 (series2) меняем свойство Editing Chart –> Series –> Series2 –> Data Source –> Function и выбираем series1. (если все сделано правильно, то точки и линия будут совпадать на компоненте).

3.Убираем линию Series2.Active:=true and false

Добавлено
    замечания и предложения будут рассматриваться в первую очередь
]]> ob-lom Общие вопросы