Bild in einem MySQL-Blob speichern

[samso]

Zurück zur ursprünglichen Diskusion

Zitat von xFrankx:

Zitat von DeddyH:

Er möchte eine Grafik in einem BLOB-Feld ablegen,

Genau das wollte ich machen, nur finde ich keine infos im Internet wie ich das am besten hinbekomme.


Wie ich texte an die MySql Datenbank sende ist mir klar.

query:= 'INSERT INTO `tbAdd` ( `id` , `tbName` , `tbVor` , `tbDatum` , `tbOrt` u.s.w

nur wie sende ich ein Bild an die Datenbank.?



Gruß Frank

Ich stelle mir das in etwa so vor:

Delphi-Quellcode:

var
  s: AnsiString;
  query: AnsiString;
  f: TFileStream;
begin
  f := TFileStream.Create('test.jpg', fmOpenRead + fmShareDenyWrite);
  try
    SetLength(s, f.Size);
    f.ReadBuffer(Pointer(s)^, Length(s));
  finally
    f.Free;
  end;
  query := 'insert test set b=' + QuoteString(s);
  mysql.mysql_real_query(conn, PAnsiChar(query), Length(query));
end;