Hi egal,
es geht auch einfacher:
Delphi-Quellcode:
if Pos('''', cStr) > 0 then
ShowMessage('Gefunden!');
Die beiden äußeren ' umschließen den String, und laut String-Regeln erzeugen zwei ' genau eines in der Ausgabe anstatt den String abzuschließen.
Greetz
alcaeus