Datenbank-Einsteiger-Tutorial für mySQL-Datenbanken

[teebee]

Du musst den String vor der Übergabe an die DB escapen:

Delphi-Quellcode:

// erzeugt einen esc-String mit den Bitmap-Daten, muss selbst freigegeben werden!
Function TMainFrm.CreateBitmapString(Bitmap: TBitmap):Pointer;
Var EscMem: Pointer;
Begin
 ImageStream.Clear; // Image Stream ist ein TMemoryStream
 Bitmap.SaveToStream(ImageStream);
 GetMem(EscMem,ImageStream.Size*2+1); //Puffer doppelt so groß wie das Bild
 mysql_real_escape_string(DB.ConHandle,EscMem,ImageStream.Memory,ImageStream.Size);
 Result := EscMem;
End;

So wird es benutzt:

Delphi-Quellcode:

Var EscString: PChar;

EscString := Nil;
If Not(Image.Empty) Then 
 EscString := CreateBitmapString(Image);
Try
 // in die DB schreiben
 ...
Finally
 If Assigned(EscString) Then
  FreeMem(EscString);
End;

Gruß, teebee

[Back2Code]

Die Domain "delphitutorials.michael-puff.de" ist nicht verfügbar.

[Luckie]

Richtig, es gibt die Subdomain nicht mehr. Den Rest gibt es aber noch.

[Daniel]

:roll:
Ich habe mir erlaubt, die Sache dann auch gleich rund zu machen und die derzeit gültige Adresse oben einzutragen.

[CarstenH]

Klappt mit dem ESC. Besten Dank!

Carsten