Delphi GCharts

Delphi-Gcharts

Delphi-Gcharts-это библиотека компонентов Delphi для генерации диаграмм в рамках Unigui с использованием API Google Charts.

В настоящее время он поддерживает следующие классы Google диаграммы:

• Аннотация
• Область
• Бар
• Пузырь
• Календарь
• Свеча
• Столбец
• Комбо
• Разница
• Пончик
• Гантт
• Измерять
• Гео
• Гистограмма
• Интервалы
• Линия
• Организация
• Пирог
• Диаграмма Санки
• Рассеянный
• Ступенчатая зона
• Стол
• Временная шкала
• Карты деревьев
• Тенденные линии
• Водопад
• Слово деревья

Компоненты

В библиотеке есть два основных компонента:

• TCFSGCHARTPRODUCER (не визуальный): этот компонент отвечает за генерацию кода JavaScript в соответствии с данными и опциями сгенерированной диаграммы класса.
• TunigchartsFrame : этот компонент используется для просмотра и взаимодействия с диаграммой, созданной TCFSGChartProducer .

Установить

Delphi-Gcharts был закодирован и протестирован в Delphi 10.4 Sydney с версией Unigui: 1.90.0 build 1557 , но, несомненно, можно собрать в более ранние или новые версии.

Установите визуальный компонент cfs.charts.unigui.xxx.dpk , который находится в папке пакета , а также добавьте в путь поиска библиотеки в папку источников .

Базовый пример использования

Основной пример для создания этой круговой диаграммы:

 unit Main;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics,
  Controls, Forms, uniGUITypes, uniGUIAbstractClasses,
  uniGUIClasses, uniGUIRegClasses, uniGUIForm, uniGUIBaseClasses,
  cfs.GCharts.uniGUI;

type
  TMainForm = class (TUniForm)
    uniGChartsFrame1: TuniGChartsFrame;
    procedure UniFormCreate (Sender: TObject);
  private
  public
  end ;

function MainForm : TMainForm;

implementation

{ $R *.dfm }

uses
  uniGUIVars, MainModule, cfs.GCharts; // <--- Add this unit

function MainForm : TMainForm;
begin
  Result := TMainForm(UniMainModule.GetFormInstance(TMainForm));
end ;

procedure TMainForm.UniFormCreate (Sender: TObject);
var
  Chart: IcfsGChartProducer; // Defined as TInterfacedObject. No need try..finally
begin
  Chart := TcfsGChartProducer.Create;
  Chart.ClassChartType := TcfsGChartProducer.CLASS_PIE_CHART;

  // Data
  Chart.Data.DefineColumns([
    TcfsGChartDataCol.Create(TcfsGChartDataType.gcdtString, ' Topping ' ),
    TcfsGChartDataCol.Create(TcfsGChartDataType.gcdtNumber, ' Slices ' )
  ]);
  Chart.Data.AddRow([ ' Mushrooms ' , 3 ]);
  Chart.Data.AddRow([ ' Onions ' , 1 ]);
  Chart.Data.AddRow([ ' Olives ' , 1 ]);
  Chart.Data.AddRow([ ' Zucchini ' , 1 ]);
  Chart.Data.AddRow([ ' Pepperoni ' , 2 ]);

  // Options
  Chart.Options.Title( ' How Much Pizza I Ate Last Night ' );

  // Generate
  uniGChartsFrame1.DocumentInit;
  uniGChartsFrame1.DocumentSetBody( ' <div id="Chart" style="width:100%;height:100%;"></div> ' );
  uniGChartsFrame1.DocumentGenerate( ' Chart ' , Chart);
  uniGChartsFrame1.DocumentPost;
end ;

Демо -применение

Библиотека включает в папку Demos проект GCHARTSDEMO с несколькими примерами, которые показывают, как создать различные классовые диаграммы.

При запуске демонстрации вы можете:

• Отображать код Delphi , используемый для генерации диаграммы
• Нажмите кнопку Google Guide , чтобы увидеть официальную документацию Google Charts.
• Нажмите на диаграмму , чтобы увидеть выпущенные события
• Нажмите кнопку «Печать» , чтобы распечатать текущий кадр с помощью диаграммы/диаграмм (новая)

---

Изменить журнал

• 1.2 : Добавлена в папку пакета *.dpk для Delphi 11.2 Alexandria
• 1.1 : Добавлен метод печати для печати кадра с помощью диаграммы/диаграмм (см. Demos)
• 1.0 : начальная версия

---

Светь этот проект

Пожалуйста, если вы используете Delphi Gcharts , « Star » этот проект в GitHub!

Это ничего не стоит для вас, но помогает другим разработчикам ссылаться на код.