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?