Erstellen von Reihen in TCharts

[Michael Grosse]

Wie kann ich unter Delphi 5 Ent. Edition eigentlich zur Laufzeit eine neue Reihe erstellen ohne sie davor im TChart schon erstellt zu haben, bzw wie weiße ich einer Reihe zur Laufzeit ihren Typ zu (Balken, Torten)?

Freue mich schon auf die Antwort
Michael

[Jens Schumann]

Hallo Michael,<br> ich denke, der untenstehende Code sollte Dein Problem lösen.
<pre><font size="2" face="Verdana"><code>unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls, Series, TeeProcs, TeEngine, Chart;

type
TForm1 = class(TForm)
Chart1: TChart;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
var
aSeries : TBarSeries;
icnt : Integer;
begin
aSeries:=TBarSeries.Create(Self);
For iCnt:=0 to 9 do
aSeries.AddBar(Random(100)+50,IntToStr(iCnt+1),clY ellow);
Chart1.AddSeries(aSeries);
end;

end.</code></font></pre><br>:-) Jens Schuman

[Michael Grosse]

Vielen Dank,
hab deine Lösung mit der die ich inzwischen rausgefunden hatte kombinieren können -> es tut!

Danke nochmal

Michae