Strings Zerlegen zum 1000 mal^^

[Wuaegner]

oder so:

Delphi-Quellcode:

var str,strzwei: string;
begin
 str:= 'XXX test';
 strzwei:= copy(str,5,length(str)-4);
 Showmessage(strzwei);
end;