Weiß von euch jemand, was hier faul ist?
in das Array 's' werden vorher Chars im Bereich von 'A'...'F' eingelesen.
Kompilieren lässt sich das ganze problemlos, zur Laufzeit krieg ich dann aber immer eine Fehlermeldung '<Buchstabe>' ist kein gültiger Integer-Wert. Der Buchstabe ist s[i].
Delphi-Quellcode:
var v: array[0..2] of string;
s: array[0..2] of char;
i: integer;
.
.
.
for i := 0 to 2 do
case ord(s[i]) of
65: v[i] := (stringgrid1.Cells[strtoint(s[i]),0]); // 65: 'A' etc.
66: v[i] := (stringgrid1.Cells[strtoint(s[i]),1]);
67: v[i] := (stringgrid1.Cells[strtoint(s[i]),2]);
68: v[i] := (stringgrid1.Cells[strtoint(s[i]),3]);
69: v[i] := (stringgrid1.Cells[strtoint(s[i]),4]);
70: v[i] := (stringgrid1.Cells[strtoint(s[i]),5]);
71: v[i] := (stringgrid1.Cells[strtoint(s[i]),6]);
72: v[i] := (stringgrid1.Cells[strtoint(s[i]),7]);
end;
Real Programmers always confuse Christmas and Halloween because Oct31 = Dec25. - Andrew Rutherford