Moin,
Zitat von
Firewing:
... Wie bekomme ich es realisiert, dass er meine Zeichenkette löscht ..., bis der erste unbekannte Buchstabe auftritt? ...
bei einfachem Text könnte ich mir das so vorstellen:
Delphi-Quellcode:
function SkipChars(sz: PChar; chars: TSysCharSet): PChar;
begin
while Assigned(sz)
and (sz^ in chars) do
Inc(sz);
Result := sz;
end;
// ZeichenKette := SkipChars(ZeichenKette, [#10,#13,#32]);
Wobei speziell whitespace auch mit Trim() entfernt werden kann.
Grüße vom marabu