Einzelnen Beitrag anzeigen

neo4a

Registriert seit: 22. Jan 2007
Ort: Ingolstadt
362 Beiträge
 
Delphi XE2 Architect
 
#18

Re: Folge von Diagrammen in FastReport ?

  Alt 18. Feb 2010, 19:17
Mit Dateien:
1. Erzeugst Du Deine 108 Diagramme und speicherst sie in einem Verzeichnis Deines Vertrauens.
2. im OnBeforePrint des Databands (FR-IDE) schreibst Du

Delphi-Quellcode:
  
  if FINALPASS then begin
    fn:=[DIAGRAMM];
    if fn>'then Picture.Loadfromfile(fn);
  end;
3. im onGetValue Deines Reports (Delphi-IDE) schreibst Du
Delphi-Quellcode:
  if uppercase(ParName)='DIAGRAMMthen begin
    ParValue:='';
    c:=Format(MainForm.AppDataDir+'Diagramm%d.bmp',[nr]);
    if FileExists(c) then
      ParValue:=c;
  end;
Mit DB:
1. Erzeuge Deine 108 Diagramme und speichere Sie in einem Blob-Feld der passenden Tabelle
2. Verknüpfe die Tabelle mittels Master-Detail-Beziehungen
3. Referenziere Tabelle und Feld im tfrxPictureview

Mit Code:
1. Erstelle alle Seiten aus Delphi heraus ohne visuelles Design.


--
Andreas
Andreas
  Mit Zitat antworten Zitat