Bild in Sql DB speichern

[franktron]

Sorry das muss

Delphi-Quellcode:

  Stream:=DB.CreateBlobStream(DB.FieldByName('name'),bmWrite); << hier änderung
  try
    Stream.LoadFromFile('bild.jpg');
  finally
    Stream.Free;
  End;

Heisen

Und du brauchst kein MemoryStream wenn du soch einen haben willst sieht das so aus

Delphi-Quellcode:

  Stream1:=TMemorStream.Create;
  Stream1.LoadFromFile('bild.jpg');
  try 
    Stream:=DB.CreateBlobStream(DB.FieldByName('name'),bmWrite); << hier änderung
    try
      Stream1.seek(0,0);
      Stream.CopyFrom(Stream1,Stream1.Size);
    finally
      Stream.Free;
    End;
  finally
   Stream1.Free;
  End;