SpinEdit Fehler: Kein gültiger Integewert

[haentschman]

Delphi-Quellcode:

procedure TForm1.zeige_Statistik (wert: Byte);
var i:Integer;
begin
 i:= StrToInt(Gridstats.Cells[1,wert]); // hier kommt der "" ist kein Integer Wert Fehler
 inc(i);
 Gridstats.Cells[1,wert] := IntToStr(i);
end;

... ist auch logisch, da das Grid leer ist. Der Fehler hatte nix mit dem SpinEdit zu tun.

Anmerkungen:
- bei den SpinEdit für den Tipp Min und Max setzen. Oder gibts 6 aus 1200 ?
- Deine Ziehung hat 2 gleiche Zahlen gezogen.
- in Tippzahlen sind verkehrte Werte. 1. immer 0 dann die Tipps, der letzte fehlt. Liegt wahrscheinlich in den 2 Schleifen in Tipp_ok

alles in allem als Empfehlung:
- bringe das Funktionsdurcheinander in Ordnung nicht jeder Kram muß gleich, wenn nur einmal verwendet ausgelagert werden.
- male dir den Programmablauf mal auf Papier.