Problem mit copy

[egal]

hallo, ich bin's wieder. :-D
Ich habe ein folgendes Problem: ich muss prüfen, ob erster Element in String ' ist. Schreibe folgendes:

if copy(cStr, 0, 1) = ''' then...

bekomme aber Fehlermeldung: nicht abgeschlossener String. Das ist schon wieder ein Delphi-Bag, aber wie kann man das umgehen?

[ste_ett]

Das Problem ist, dass das 3. ' wieder einen String eröffnet.

Prüfe einfach mit if (copy() = #39) then ...

39 ist der ascii-Wert für ' :)

[alcaeus]

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

[egal]

alles klar, danke euch! :thumb: