Einzelnen Beitrag anzeigen

zahor

Registriert seit: 27. Jun 2006
Ort: im hintersten Winkel des RAMs
182 Beiträge
 
Delphi 2007 Professional
 
#1

Fehlermeldung 'A' ist kein gültiger Integerwert?!?

  Alt 7. Sep 2007, 20:55
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
  Mit Zitat antworten Zitat