Delphi Übersetzer - Ansatzprobleme

Thema durchsuchen

Ansicht

Themen-Optionen

Übersetzer - Ansatzprobleme

Ein Thema von naudoc · begonnen am 29. Apr 2007 · letzter Beitrag vom 22. Feb 2008

Vorheriger Beitrag

Nächster Beitrag

Meflin

Registriert seit: 21. Aug 2003
4.856 Beiträge

#22

Re: Übersetzer - Ansatzprobleme

30. Apr 2007, 16:18

Und viel schöner wird dein Code noch so

markieren

Delphi-Quellcode:

			var

  Chars: array[0..2] of string = ('E', 'M', 'T');

  Replacement: array[0..2] of string = ('3', '|\/|', '7');

for i := 0 to Length(Chars) - 1 do

  NewText := StringReplace(OldText, Chars[i], Replacement[i], [rfReplaceAll, rfIgnoreCase]);