Mit diesem Code hole ich mir ein Image (Bitmap) aus meiner DBisam-
DB in meine Form:
Delphi-Quellcode:
dbisamquery2.SQL.Text:='select image from artplan where artigo='+quotedstr(trim(artikel.Text));
dbisamquery2.ExecSQL;
Ich habe ein pdf-Tool zum Darstellen meiner Daten im pdf-Format, wende es schon erfolgreich an. Ich exporte in's pdf schon Barcode, Memo usw
Habe aber jetzt Probleme beim Image mit diesem Code:
printpdf1.draw(100,100, dbimage1.Picture.Bitmap);
es gibt diese Meldung:
[Fehler] AknUni.pas(269): Inkompatible Typen: 'TImage' und 'TBitmap'
Tim Young von Dbisam hat mir dies gemailt:
This is really an issue for the TPrintPDF vendor, but you should be able to
cast the TDBImage to a TImage to get the desired result (TDBImage descends
from TImage)
Habe auch schon das probiert:
Delphi-Quellcode:
Image:=TImage.Create(dbimage1);
Image.Picture.Bitmap.Create;
printpdf1.ImageOut(100,200,TImage(Image));
kompiliert zwar, aber beim Anwenden kommt dann ne Fehlermeldung über
Exception, siehe Bild
es wird dann auf die letzte Zeile meiner tnpdf-
Unit hingewiesen:
SetBitmap(ABitmap.Picture.Bitmap);
das feld "image" hat in meiner DBIsam-Tabelle den DataType "graphic", musste nach Angaben von Tim Young von DBisam als bmp abgespeichert werden.
Die Komponente in meiner Form ist DBImage.
Wer kann helfen?