Delphi GCharts

Delphi-GCharts

A Delphi-Gcharts é uma biblioteca de componentes da Delphi para gerar gráficos na estrutura UniGUI usando a API do Google Gráficos.

Atualmente, ele suporta as seguintes classes do Google Chart:

• Anotação
• Área
• Bar
• Bolha
• Calendário
• Castiçal
• Coluna
• Combinação
• Dif
• Rosquinha
• Gantt
• Medidor
• Geo
• Histograma
• Intervalos
• Linha
• Organização
• Torta
• Diagrama de Sankey
• Dispersão
• Área de passo
• Mesa
• Linha do tempo
• Mapas de árvores
• Linhas de tendência
• Cachoeira
• Árvores de palavras

Componentes

A biblioteca tem dois componentes principais:

• TCFSGChartProduced (não visual): Este componente é responsável por gerar o código JavaScript de acordo com os dados e as opções do gráfico de classe a serem gerados.
• TunigChartsFrame : Este componente é usado para visualizar e interagir com o gráfico produzido pelo TCFSGCHARTProducer .

Instalar

A Delphi-GCharts foi codificada e testada no Delphi 10.4 Sydney com versão UniGUI: 1.90.0 build 1557 , mas certamente pode ser compilado em versões anteriores ou mais recentes.

Instale o componente visual cfs.charts.unigui.xxx.dpk que está na pasta de pacotes e também adicione ao caminho da pesquisa da biblioteca a pasta de fontes .

Exemplo de uso básico

Exemplo básico para gerar este gráfico de pizza:

 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 ;

Aplicação de demonstração

A biblioteca inclui na pasta Demos o projeto GChartsDemo com vários exemplos que mostram como criar os diferentes gráficos de classe.

Ao executar a demonstração, você pode:

• Exibir o código Delphi usado para gerar o gráfico
• Clique no botão Guia do Google para ver a documentação oficial dos gráficos do Google.
• Clique no gráfico para ver eventos demitidos
• Clique no botão Imprimir para imprimir o quadro atual com o gráfico/gráficos (novo)

---

Alterar log

• 1.2 : Adicionado à pasta do pacote *.dpk para Delphi 11.2 Alexandria
• 1.1 : Método de impressão adicionado para imprimir o quadro com o gráfico/gráficos (consulte demos)
• 1.0 : versão inicial

---

Estrela este projeto

Por favor, se você usar Delphi GCharts , " Star " este projeto no Github!

Não custou nada para você, mas ajuda outros desenvolvedores a fazer referência ao código.