Hi,
Charts mit anderen Farben in FastReport sind nicht so einfach.
1. wird programmatisch immer clTeeColor verwendet (wenn du dir mal frxChartHelpers.pas anschaust)
2. Funktioniert die Add Routine auch irgendwie nicht so richtig bzw. wir haben es auch nicht hinbekommen.
Ich habe den Kollegen bei FastReport folgendes als Vorschlag gegeben, da dies somit zumindest erlaubt in v4 die Farbe zu hinterlegen.
Delphi-Quellcode:
procedure TfrxStdSeriesHelper.AddValues(Series: TChartSeries; const v1, v2,
v3, v4, v5, v6: String; XType: TfrxSeriesXType);
var
d: Double;
s: String;
c: TColor;
begin
d := 0;
if Series.YValues.DateTime then
d := StrToDateTime(v2)
else if frxIsValidFloat(v2) then
d := frxStrToFloat(v2);
if v3 <> '' then
s := v3
else
s := v1;
//ab hier der neue Code...
c := clTeeColor;
if v4 <> '' then
try
c := StringToColor(v4);
except
end;
case XType of
xtText:
Series.Add(d, v1, c);
xtNumber:
Series.AddXY(frxStrToFloat(s), d, v1, c);
xtDate:
Series.AddXY(StrToDateTime(s), d, v1, c);
end;
end;
Per FastScript im Report geht das dann bspw. so:
Delphi-Quellcode:
myChart.SeriesData[0].Source1 := 'Bez1;Bez2;Bez3';
myChart.SeriesData[0].Source2 := '8;5;2';
myChart.SeriesData[0].Source3 := '1;2;4';
myChart.SeriesData[0].Source4 := 'clRed;clLime;clGreen';
Allerdings nur mit dem Typ "fixe Daten".
Für Farbe aus der Datenbank bräuchte man noch im frxChartEditor.pas eine neue Combobox (respektive für Source4)
Schreib doch auch denen im Online-Support-Form ein neues Ticket... dann kommts vielleicht schneller rein.....
Ich hab als Antwort bekommen:
>>Thanks.
>>We take into consideration your suggestion.
Wenn du übrigens im FastReport-Forum nach "Chart" suchst, findest du auch div. Varianten wie andere User weitere Features der TeeChart in FastScript & Co freigeschaltet haben.
Gruß
Shivan