Und ich rate dazu ein paar Dinge zu ändern.
QuotedStr ist
keine Funktion, um einen
SQL-String zu maskieren, denn das ist ausschließlich für Pascal-Strings und kennt z.B. keinen
\
.
Am Besten wird mit Parametern in der
SQL-Komponente gearbeitet, oder man sucht in den Units dieser Komponente nach der "richtigen" Escape-Funktion.
> Repeat-Until
Warum kein While-Do?
Kannst du sicherstellen, dass immer mindestens ein Datensatz überall drin ist, weil du nicht zu Beginn prüfst?
Die sinnlose Variable aus deinem Code zu entfernen.
> Form1
Sowie den
falschen ungünstigen Zeilenumbruch loszuwerden.
> #13
sLineBreak (#13#10 im Windows) oder maximal noch #10