Wie drucke ich Liste von Bildern mit QuickReport 5

[MrSpock]

Hallo,

wenn du keine Datenbank im Hintergrund hast, nutzt du das OnNeedData Event. Wenn der Report nicht mit einer Datenquelle verbunden ist, ruft er solange die mit dem OnNeedData Event verbundene Methode auf, bis MoreData false zurückliefert.

Delphi-Quellcode:

procedure TfrmReport1.QuickRep1NeedData(Sender: TObject; var MoreData: Boolean);
begin
    MoreDate := aktBildNo < anzBilder;
    
    if MoreData
    begin
       // Bild ausgeben;
       Inc(aktBildNo);
    end;
end;