Doppelte Hochkommata

[tewes]

Delphi-Quellcode:

s := dmsDocObj.URL;
for p := 1 to s.length do
begin
  s2 := Copy(s, p, 2);
  if s2 = '''''' then 
    Delete(s, p, 1);  // Vorschlag himitsu
end;

s2 wird im interessanten Bereich (Dokar=''LDP'') nacheinander
'Do'
'ok'
'ka'
'ar'
'r='
'='''
'''L'
'LD'

if s2 = '''''' then wird nie wahr

Delphi-Quellcode:

s := dmsDocObj.URL;
for p := 1 to s.length do
begin
  s2 := Copy(s, p, 2);
  if s2 = '=''' then
    Delete(s, p+1, 1);
end;

löscht die beiden führenden Hochkommata (gekürzt):
'Dokar=LDP''......