Einzelnen Beitrag anzeigen

LingNeu

Registriert seit: 18. Dez 2006
164 Beiträge
 
Delphi 7 Enterprise
 
#1

Wie speichere ich ein Image in eine Datenbank

  Alt 31. Aug 2014, 14:41
Hi Delphifans,
verwende die Componenten von DevExpress. Habe da auf einem Formular eine Timage, welches angezeigt wird. Nun möchte ich gerne dieses Bild in die Komponente von DevExpress dbImage einspeichern.
Ich bekomme aber immer einen Error. Könnte mir da bitte jemand helfen. Danke für jede Hilfe
ciao LingNeu

Delphi-Quellcode:
// in Image1 befindet sich das zu übertragene Bild
// aBild ist ein Blobfeld in der Datenbank
Tab_A.Edit
if not VarIsNull(Image1.Picture.Bitmap) then begin
   Tab_A['aBild'] := Image1.Picture.Bitmap ;
end;
Tab_A.Post ;
// inkompatible Typen Variant und TPicture
Wenn man denkt, dann denkt man nur, das man denkt!
  Mit Zitat antworten Zitat