bilder (jpeg) aus access datenbank lesen

[eddy23]

hi



ich möchte gerne den pfad der bilder die ich speichern will in eine access db ablegen und wieder auslesne können, aber in einer anderen form. ein bild gehört immer zu ein bestimmten datensatz

das hab ich bisher

Delphi-Quellcode:

DBImage1.hint:=OpenPictureDialog1.Filename;
DBImage1.Picture.LoadfromFile(OpenPictureDialog1.FileName);
ADOTable1.FieldByName('bild').AsString := DBImage1.hint;
ADOTable1.Post;

könnt ihr mir weiterhelfen?


PS: Wenn ich das mit ner ado connection machen will, ghets ned, weil access wohl kein jpeg unterstützt, (Bitmap ungültig kommt beim lesen)

[UweR]

Hallo,

Was ist DBImage1? Ein TDBImage? Das brauchst du überhaupt nicht wenn du nur den Pfad speichern willst, dann reicht ein entsprechend langes Textfeld durchaus.Oder willst du beides speichern?

Zitat:

PS: Wenn ich das mit ner ado connection machen will, ghets ned, weil access wohl kein jpeg unterstützt, (Bitmap ungültig kommt beim lesen)

Ich denke das Problem liegt hier eher darin das TDBImage kein JPEG versteht.Um JPEG's darzustellen brauchst du TJPEGImage. Wenn du eh nur den Pfad in die Datenbank stopfen willst mußt du eh das Bild zu Fuß laden und brauchst gar keine TDBImage-komponente. Der Datenbank sollte das eigentlich schnurz sein was das für ein Bild ist selbst wenn du das Bild direkt in die Datenbank schreibst, für die ist das eh nur'n Haufen Bytes.

[eddy23]

naja wie gesagt, mir is das gleich welche lösung ich nehme, aber wenn ich ein bild speichern will will ich ned den pfad eingeben soll der halt automatisch machen, machen und das selbe beim auslesen, aber wo find ich bei delphi 7 ein tjpegimage ?


danke

[shmia]

Zitat von eddy23:

PS: Wenn ich das mit ner ado connection machen will, ghets ned, weil access wohl kein jpeg unterstützt, (Bitmap ungültig kommt beim lesen)

Du musst die Unit JPEG mit uses einbinden!!
Diese Unit installiert in der VCL die Unterstützung für das JPEG Bildformat.
Die Unit ist normalerweise nicht im Sourcecode, sondern nur als DCU-Datei verfügbar.

[eddy23]

hm, wie kann ich das einbinden ?

[alcaeus]

Hi eddy,

Zitat von eddy23:

hm, wie kann ich das einbinden ?

Meinst du die Unit jpeg?
Entweder bei der uses-Klausel nach interface oder implementation "Jpeg" in der Liste hinzufügen.

Greetz
alcaeus

[eddy23]

Delphi-Quellcode:

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, Buttons, ExtCtrls, JPEG, ExtDlgs, DBCtrls, Mask, DB, ADODB;

steht mit da, und es geht ned ;//