Analyse von einem Edit Feld

**Bassel**

Hallo

ich versuche ein Programm zuschreiben, das die im Edit Feld eingegebene Zeichenfolge analysiert, bzw
jede Stelle Edit1.Text[i] in eine Zahl umwandelt und sie in er Varibale speichert...

So soll, falls zB Edit1.Text[5] ein D ist die Variable t5 den Wert 4 haben usw.

Das Problem ist, dass Delphi erstmal schon bei A,a B,b usw rummeckert und ich weiß
auch nicht, ob das t[i] funktioniert. Hat einer eine Idee, wie dies Funktionieren kann?

Mein nicht funktionirender Ansatz

:

zusammenfalten · markieren

Delphi-Quellcode:

			
procedure TForm1.Button1Click(Sender: TObject);

begin

 for i:=1 to 20 do begin

  case Edit1.Text[i] of

   A,a:  t[i] := 1;

   B,b:  t[i] := 2;

   C,c:  t[i] := 3;

   D,d:  t[i] := 4;

   E,e:  t[i] := 5;

   F,f:  t[i] := 6;

   G,g:  t[i] := 7;

   H,h:  t[i] := 8;

   I,i:  t[i] := 9;

   J,j:  t[i] := 10;

   K,k:  t[i] := 11;

   L,l:  t[i] := 12;

   M,m:  t[i] := 13;

   N,n:  t[i] := 14;

   O,o:  t[i] := 15;

   P,p:  t[i] := 16;

   Q,q:  t[i] := 17;

   R,r:  t[i] := 18;

   S,s:  t[i] := 19;

   T,t:  t[i] := 20;

   U,u:  t[i] := 21;

   V,v:  t[i] := 22;

   W,w:  t[i] := 23;

   X,x:  t[i] := 24;

   Y,y:  t[i] := 25;

   Z,z:  t[i] := 26;

end;

end;

end;

Thx4Help

Bassel

Analyse von einem Edit Feld

Analyse von einem Edit Feld

Forumregeln