Hi, bis jetzt hab ich mich immer mit dem Schreiben blöder Fuktionen durchgemogelt.
Beispiel:
Delphi-Quellcode:
function TForm1.filtered(message1:string):string;
var i,j,k,l:integer;
begin
j:=0;
for i:=1 to length(message1) do
begin
if message1[i] = '\' then
j:=j+1;
if j = 21 then
begin
filter1 := i+6;
break;
end;
end;
for k:=filter1+1 to length(message1) do
begin
if message1[k] = '\' then
filter2 := k-1;
end;
for l:=filter1 to filter2 do
result := result + message1[l];
end;
Kann mir bitte mal jemand häufig verwendete Stringoperationen zeigen? Wär echt nett, damit spar ich mir den Sch***
[edit=sakura] [code] durch [delphi] ersetzt 
Mfg, sakura[/edit]
THX, nächstes mal mach ich's besser 