Hab' noch mal nachgeschaut, es sollten 2*x+1 Zeichen Puffer ausreichen (ich dachte zuerst, dass die Funktion die benötigte Länge zurückliefert, wenn man den Parameter auf nil setzt).
So sollte es gehen:
Delphi-Quellcode:
function Tform1.escapestring(const str: String): String;
begin
SetLength(Result, 2 * Length(str) + 1);
SetLength(Result, mysql_escape_string(@Result[1], @str[1], Length(str)));
end;
Wo kommt denn der Fehler? in escapestring?
[Edit] Mist, zu spät
