copy(text,x,y) durch while... do - schleife ersetzen?

[mkinzler]

Wenn du aber in dieser Schleife mehr als 1 zu i hinzuzählst kopierst machst du was anderes als Copy()

Delphi-Quellcode:

text := 'Hallo Welt!';
x := 2; 
y := 8;
n := 2;

s := Copy( text, x, y); // s: 'allo Wel';

i:=1;
while i<=length(text) do
begin
  textneu:=textneu+text[i];
  i:=i+n;
end;
/7Textneu: 'HloWl!'