Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Bild in einem MySQL-Blob speichern (https://www.delphipraxis.net/142474-bild-einem-mysql-blob-speichern.html)

samso 28. Okt 2009 21:06

Datenbank: mysql • Zugriff über: mysql.pas/libmysql.dll

Bild in einem MySQL-Blob speichern
 
Zurück zur ursprünglichen Diskusion

Zitat:

Zitat von xFrankx
Zitat:

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;

jfheins 28. Okt 2009 23:23

Re: Bild in einem MySQL-Blob speichern
 
Kannst du prepared-Queries/Parameter verwenden?

Hier gibt's nämlich ein C# Beispiel dafür: http://dev.mysql.com/doc/refman/5.1/...sing-blob.html ;)

Willmar.Heinrich 29. Okt 2009 06:15

Re: Bild in einem MySQL-Blob speichern
 
Das hier funktioniert tadellos:
http://www.swissdelphicenter.ch/de/showcode.php?id=1271

DeddyH 29. Okt 2009 09:57

Re: Bild in einem MySQL-Blob speichern
 
IIRC gibt es in der verwendeten Bibliothek aber kein TDataset o.ä., das ist ja das Problem.

xFrankx 29. Okt 2009 16:49

Re: Bild in einem MySQL-Blob speichern
 
@samso

Danke funzt 100 % :cheers:

jetzt nur noch zurück in den Puter.



Gruß Frank


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:52 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz