Hi,
ich habe jetzt follgendes geschrieben:
Delphi-Quellcode:
for i:=0 to 25 do
begin
tabelle:=tabelle + chr(i+97) + ' / ';
if (chr(i+97) <> 'a') and (chr(i+97) <> 'o') and (chr(i+97) <> 'u') then tabelle:=tabelle + inttostr(x)
else x:=x-1;
if chr(i+97) = 'a' then tabelle:=tabelle + 'ä';
if chr(i+97) = 'o' then tabelle:=tabelle + 'ö';
if chr(i+97) = 'u' then tabelle:=tabelle + 'ü';
tabelle:=tabelle + #10;
x:=x+1;
end;
Nur jetzt hab ich das Problemm mit den belibigen Zeichen, es soll bei jeder Zahl ein anderes Sein, bei den Beispiel das du mir geschrieben hast war es immer ein x.
Neben A soll z.B: eine ) neben B ein Z neben C ein h usw.
wie mache ich das möglichst einfach?