Wie kann ich über den Quellcode ein Bild (Bitmap oder JPEG) in ein Datenbankfeld einfügen?
Eigentlich dachte ich, daß es so geht:

zusammenfalten · markieren

Delphi-Quellcode:

OpenPictureDlg.InitialDir := ExtractFilePath(Application.ExeName) + '\Pictures';
     If OpenPictureDlg.Execute then
     Begin
          With EinbautenTbl do
          Begin
               If not (State in ([dsInsert, dsEdit])) then
               Begin
                    Edit;
                    FieldByName('Bildname').Value := OpenPictureDlg.FileName;
                    EBImage.Picture.LoadFromFile(FieldByName('Bildname').AsString);
                    FieldByName('Bild').LoadFromFile(OpenPictureDlg.FileName);
                    Post;
               end;
          end;
     end;

Das Datenbankfeld 'Bild' ist ein TGraphic-Feld.
Vielleicht hat jemand einen Tip.

[edit=Sharky]Delphi-Tags gesetzt. Mfg, Sharky[/edit]

Moin.

herzlich willkommen und füge bitte Delphi-Tags ein. Der Hinweis kommt demnächst wohl automatisch.

EasyTable kenne ich jetzt nicht, aber gucke mal in Richtung "Blob-Felder".