|
Registriert seit: 25. Jan 2016
Ort: NRW
24 Beiträge
Delphi XE3 Professional
|
AW: Replace
26. Jan 2016, 09:54
Wenn du Replace nicht benutzen kann, ist der Sinn der Aufgabe wohl etwas mit einer Schleife zu machen. Dann könnte es so aussehen:
Delphi-Quellcode:
Result:='';
for i:=1 to Length(text) do
begin
if text[i]=alt then
Result:=Result+neu
else
Result:=Result+text[i];
end;
Danke  Wird so nur leider nicht klappen für function myreplace(text:string;alt:string;neu:string): string;
 Was für eine Schleife muss man benutzen?
P.B.
|