Thema: Delphi Blobs speichern

Einzelnen Beitrag anzeigen

Benutzerbild von TheMiller
TheMiller

Registriert seit: 19. Mai 2003
Ort: Gründau
2.480 Beiträge
 
Delphi XE7 Architect
 
#1

Blobs speichern

  Alt 22. Aug 2005, 14:57
Datenbank: MySQL • Version: 4 • Zugriff über: ZEOSLib
Hallo,

nochmal zum Blob:

Habe folgenden Code:

Delphi-Quellcode:
procedure TForm6.LbSpeedButton1Click(Sender: TObject);
var
  FileStream:TFileStream;
  BlobStream:TBlobStream;
begin
  if OpenDialog1.Execute then
    Edit3.Text:=OpenDialog1.FileName;
    FileStream:=TFileStream.Create(Edit3.Text,fmOpenRead);
    BloBStream:=TBlobStream.Create(TEdit(Form1.ZQuery1.FieldByName('anlage')), bmread);
    //weiter bin ich noch nicht...
end;
Mein Fehler liegt bei der Initialisierung des Blob-Streams. Ich bekomme immer die Meldung "inkompatible Typen String und TBlobField"

Mein zu speichernder Anhang befindet sich in der Edit1 Komponente. Wie kann ich die Datei jetzt in die DB speichern bzw. das Feld "kompatibel" machen?

EDIT: ICH HABE KEINE DATASET-KOMPONENTE!
Bisheriger Nutzername "DJ-SPM"
  Mit Zitat antworten Zitat