Einzelnen Beitrag anzeigen

Benutzerbild von EccoBravo
EccoBravo

Registriert seit: 19. Okt 2004
Ort: Neuruppin
524 Beiträge
 
Delphi 2007 Architect
 
#11

Re: wie aus Delphi Wert 'aaa' in ein Memo1 von Fastreport ?

  Alt 14. Feb 2008, 10:47
Hallo Alzaimar,

Danke danke!
TChart kenne ich schon zur Genüge, und nach LineSeries u.ä. habe ich schon gesucht, aber nichts gefunden.

Dann hatte ich aber auf Eure Empfehlung mal in den Frx-Demos umgedehen und den Array-Adapter oder den StringGrid-Adapter "TfrxCrossView" gefunden.
Dabei dachte ich mit, mit den Diagrammen müsse es genauso gehen, so verwendete ich "TfrxChartView"
Wie ich es probiert habe (leider ohne Erfolg, haber ich mal angehangen.

Vielleicht erkennst Du einen Fehler.

Delphi-Quellcode:
procedure TForm1.frxReport1BeforePrint(c: TfrxReportComponent);
var
  Cross: TfrxCrossView;
  Diag: TfrxChartview;
  i, j: Integer;
begin
  if c is TfrxCrossView then
  begin
    Cross := TfrxCrossView(c);
    for i := 1 to 16 do
      for j := 1 to 16 do
        Cross.AddValue([i], [j], [StringGrid1.Cells[i - 1, j - 1]]);
  end;
  if c is TfrxChartView then
  begin
    Diag := TfrxChartView(c);
    for i := 1 to 16 do

     //Diag.SeriesData.Add.XValues(IntToStr(i)); ???
     //Diag.SeriesData.Add.YValues(IntToStr(i)); ???
  end;
end;
Dann nochmals Danke und Grüße

E. B.
Wahre Aussage :=
Katzen, die bellen sind keine Kaninchen.

Der Kreisverkehr ist eine spezielle Form der Einbahnstraße
  Mit Zitat antworten Zitat