|
Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
Delphi 10.2 Tokyo Professional
|
AW: Replace
26. Jan 2016, 09:52
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;
Wirst du spätestens bei einem Aufruf wie myreplace('Hallo Welt', 'Welt', 'Phillip') merken
Michael "Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
Geändert von Neutral General (26. Jan 2016 um 09:55 Uhr)
|