TrimChars

[Klaus01]

Ich denke schon, daß Christian sich den Code angeschaut hat.
Er hat wahrscheinlich das gemeint:

Delphi-Quellcode:

 
  for i:= ....
      if not (Result[i] in CS) then 
      begin 
        Result := Copy(Result, 1, i); 
        BREAK; 
      end;

Grüße
Klaus