führende null entfernen

[Hobbycoder]

Und noch einen:

Delphi-Quellcode:

function RemoveLeftZero(input: string): string;
var
  i: integer;
begin
  result:=input;
  for i:=1 to length(input) do
    if input[i]='0' then
      delete(result, 1, 1) else
      Break;
end;

Schleife muss halt bei '0805668' nur zweimal durchlaufen.