Forum: Object-Pascal / Delphi-Language
by haentschman,
1. Feb 2011
ein Leerzeichen bzw. kein Zeichen (weil dein Grid leer ist), was du aus der Zelle holst willst du mit StrToInt umwandeln. Boing... :stupid:
dann setzt man in jede Zeile, wo man denkt daß der Fehler da liegt, einen Breakpoint und steppt mit F9 durch. Da siehst du genau in welcher Procedure es kracht. Dann nimmt man sich die entsprechende Procedure nach selben Schema vor. Dann hast du die Zeile.
Forum: Object-Pascal / Delphi-Language
by haentschman,
1. Feb 2011
...die werden ausgeführt. Einmal, bis es in Zeige_Statistik kracht.
bestimme_Gewinnzahlen(Gew, zZahl); // wird ausgeführt
zeige_Gew(Gew, zZahl); // wird ausgeführt
zeige_Statistik(Rang(Tippzahlen, Gew, zZahl)); // kracht wegen leerem Grid + Tippzahlen falsch
Anmerkung: Debuggen mußt du üben, damit du dich selbst (dein Programm) an jeder Stelle prüfen kannst
Forum: Object-Pascal / Delphi-Language
by haentschman,
1. Feb 2011
procedure TForm1.zeige_Statistik (wert: Byte);
var i:Integer;
begin
i:= StrToInt(Gridstats.Cells); // hier kommt der "" ist kein Integer Wert Fehler
inc(i);
Gridstats.Cells := IntToStr(i);
end;
... ist auch logisch, da das Grid leer ist. Der Fehler hatte nix mit dem SpinEdit zu tun.
Anmerkungen:
Forum: Object-Pascal / Delphi-Language
by haentschman,
31. Jan 2011
... :gruebel: ein wenig genauer bitte.
- welche Werte haben MinValue und MaxValue ?
Nachtrag: ich kann jeden Wert in Value setzen.
welche Delphiversion benutzt du ?
Forum: Object-Pascal / Delphi-Language
by haentschman,
31. Jan 2011
Guten Abend...
probier mal:
var i:Integer;
begin
if Tipp_ok(Tippzahlen) then // = true entfernt
begin
sortiere_durch_Auswahl(Tippzahlen);
zeige_Tip(Tippzahlen);