Diagramm in Report Builder übertragen

[Panschi]

Hallo Forum,
Ich erstelle momentan ein Programm in dem man viele Daten eingeben kann und diese Rechnen dann mit ziemlich vielen Gleichungen verschiedenste Ergebnisse aus. Zuletzt habe ich noch ein Diagramm erstellt, welches manche Daten grafisch darstellt.
Als Zusatz soll man das ganze noch Drucken können. SChön und gut... Habe mit Report Builder einen Report angefertigt und ein Diagramm im Format wie mein "altes" Diagramm im Programm angelegt.
Wenn man nun auf "Drucken" drückt wird folgende Prozedur ausgelöst:

Delphi-Quellcode:

procedure TfrmHolzfeuchteGefaelle.tbDruckenClick(Sender: TObject);
var
  i:Integer;
begin
  ppLblProduktionsAnlage.Caption := tbAnlage.Caption;
  ppLblBreite.Caption := EdtBreite.Text + ' mm';
  .
  .//Ein Haufen an Daten, welche an den Report übergeben werden
  .
  .
  //Diagramm
  ppDiagrammDruck.Chart.LeftAxis.Maximum := Diagramm.LeftAxis.Maximum;
  ppDiagrammDruck.Chart.LeftAxis.Minimum := Diagramm.LeftAxis.Minimum;

  for i := 0 to 3 do
  begin
    ppDiagrammDruck.Chart.Series[i].DataSource := Diagramm.Series[i].DataSource;
  end;
  ppAusdruck.Print;
end;

Und jetzt mein Problem:
Es folgt ein externes Fenster in dem mein fertiger Report auftaucht, jedoch ist das Diagramm leer?! Alle anderen Daten sind richtig eingefügt worden, auch die Skalierung des Diagrammes ist richtig!
Hat jemand eine Antwort?

[soulies]

hoi,

ist der Report ein RAVE Report ?

cya

[Panschi]

ne, ich sollte ihn mit Report Builder erstellen.

[Panschi]

Habs endlich geschafft. Falls jemand in Zukunft das gleiche Problem hat so gings:

Delphi-Quellcode:

begin
  .
  .
  .
ppDiagrammDruck.Chart.Series[0].Clear;
 for i := 0 to 4 do
  begin
    ppDiagrammDruck.Chart.Series[0].AddNullXY(i+1, Diagramm.Series[0].YValue[i], '');
  end;
  ppDiagrammDruck.Chart.Repaint;
  ppAusdruck.Print;
end;