Bei mir siehts jetzt so aus:
Delphi-Quellcode:
var
Form1: TForm1;
a: array[1..26] of string;
Eingabe, Nr : Integer;
implementation
{$R *.DFM}
procedure TForm1.FormCreate(Sender: TObject);
begin
a[1] := 'A';
a[2] := 'B';
a[3] := 'C';
a[4] := 'D';
a[5] := 'E';
a[6] := 'F';
a[7] := 'G';
a[8] := 'H';
a[9] := 'I';
a[10] := 'J';
a[11] := 'K';
a[12] := 'L';
a[13] := 'M';
a[14] := 'N';
a[15] := 'O';
a[16] := 'P';
a[17] := 'Q';
a[18] := 'R';
a[19] := 'S';
a[20] := 'T';
a[21] := 'U';
a[22] := 'V';
a[23] := 'W';
a[24] := 'X';
a[25] := 'Y';
a[26] := 'Z';
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
For Nr := 1 to 26 do
Panel1.caption:= a[nr];
end;
Jetzt gibbet ein neues Problem: Egal was ich ins Editfeld eingebe das Panel zeigt immer ein Z an auch wenn ich 1 oder 2 eingebe. Selbst wenn ich a oder b eingebe kommt z raus!
Was muss ich den noch tun?