Hallo,
versuche ein QuickReportImage dynamisch zu erstellen. Auf ein Blatt sollen 27 davon drauf passen (Maße vorhanden). Es werden aber nicht immer alle 27 gebraucht. Es kann auch vorkommen, dass nur Images von 13 bis 27 gebraucht werden. Habe nun folgenden Code
Delphi-Quellcode:
procedure TForm1.FormClick(Sender: TObject);
var
bcf:TQRImage;
begin
bcf:=TQRImage.Create(Self);
bcf.Name:='BarCodeFieldX';
bcf.Top:=200;
bcf.Width:=QRImage1.Width;
bcf.Left:=QRImage1.Left;
bc.Text:='as';
bc.DrawBarcode(bcf.Canvas);
bcf.Show;
end;
Aber das Image erscheint nicht. Alle statisch vorhandenen Images werden angezeigt. Was mache ich falsch?