hab ich schon gemacht mein problem liegt jetzt bei der abfrage..
eigendlich sollte ich es ja mit case versuchen.
Delphi-Quellcode:
case RadioGroup1.ItemIndex of
0: text:= StringReplace(text, 'A', 'α', [rfReplaceAll]);
text:= StringReplace(text, 'B', 'в', [rfReplaceAll]);
1: text:= StringReplace(text, 'A', 'α', [rfReplaceAll]);
text:= StringReplace(text, 'B', 'β', [rfReplaceAll]);
// usw...
so funktionierts leider nicht
ich weiß nicht wie ichs erklähren soll ^^ aber ich hoffe ihr versteht es einwenig wie ich das da oben meine..
//edit:
so kann ichs nun kompilieren...
Delphi-Quellcode:
case RadioGroup1.ItemIndex of
0: begin
text:= StringReplace(text, 'A', 'α', [rfReplaceAll]);
text:= StringReplace(text, 'B', 'в', [rfReplaceAll]);
end;
1: begin
text:= StringReplace(text, 'A', 'α', [rfReplaceAll]);
text:= StringReplace(text, 'B', 'β', [rfReplaceAll]);
end;
// usw...
aber dass was es tuhn soll tut es trotzdem nicht..