Zitat von
alcaeus:
Ganz einfach:
If Pos('''', Str) > 0 then ShowMessage('Found');
Ein ' wird durch ein zweites ' escaped, das wurde hier schon beschrieben.
Oder:
If Pos(#39, Str) > 0 then ShowMessage('Found');
Ein ' ist
ASCII 39. Ein Zeichen kann in Delphi auch mit # und seinem
ASCII-Wert geschrieben werden.