Forum: Object-Pascal / Delphi-Language
Delphi
by Meflin,
30. Apr 2007
Und viel schöner wird dein Code noch so ;)
var
Chars: array of string = ('E', 'M', 'T');
Replacement: array of string = ('3', '|\/|', '7');
for i := 0 to Length(Chars) - 1 do
NewText := StringReplace(OldText, Chars, Replacement, );
Forum: Object-Pascal / Delphi-Language
Delphi
by Meflin,
30. Apr 2007
Ach wirklich? Und was möchte das bitteschön für einen Vorteil bringen :roll:
ist es so schwer, mit 8k+ Beiträgen halbwegs sinnvolle und informative Beiträge zu erstellen?
Forum: Object-Pascal / Delphi-Language
Delphi
by Meflin,
29. Apr 2007
Wie wärs mal mit nem simplen
NewText := StringReplace(OldText, 'E', '3', )
Das musst du eben für jeden buchstaben des Alphabets machen...