AW: SpinEdit Fehler: Kein gültiger Integewert
Zitat:
|
AW: SpinEdit Fehler: Kein gültiger Integewert
danke :)
hm ich dachte man könnte eunfach auch den namen der funktion nehmen statt result. meinst du es dann so:
Delphi-Quellcode:
function neu (Gew: TLottofeld; bisher, wert: Byte): Boolean; var bool: boolean;j: Byte; begin bool:=false; for j:=bisher downto 1 do begin if Gew[j] <> wert then bool:=true; result:=bool; end; end; |
AW: SpinEdit Fehler: Kein gültiger Integewert
Man kann auch den Funktionsnamen nehmen oder
Delphi-Quellcode:
Result := True;
|
AW: SpinEdit Fehler: Kein gültiger Integewert
Delphi-Quellcode:
... ist auch logisch, da das Grid leer ist. Der Fehler hatte nix mit dem SpinEdit zu tun.
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; Anmerkungen: - bei den SpinEdit für den Tipp Min und Max setzen. Oder gibts 6 aus 1200 ? 8-) - 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. |
AW: SpinEdit Fehler: Kein gültiger Integewert
Oh ja, sorry :oops:
Das "neu" habe ich übersehen. Aber an der Stelle ging es bei mir nicht weiter. Offenbar wurde die Bedingung nicht erfüllt und die repeat-Schleife daher nicht verlassen. Vielleicht musst Du Dir die dortige Logik nochmal anschauen. Ein Problem mit dem SpinEdit habe ich übrigens nicht festgestellt. |
AW: SpinEdit Fehler: Kein gültiger Integewert
hm stimmt es knnte irgednwie an
Delphi-Quellcode:
aber wenn der fehler bei der Prozedur zeige_Statistik liegt, warum werden dann die Prozeduren davor auch nciht ausgeführt?
if Tipp_ok(Tippzahlen) = true then
Nein das lag am Sortieren, dass habe ich aber bereits behoben. |
AW: SpinEdit Fehler: Kein gültiger Integewert
Zitat:
Delphi-Quellcode:
Anmerkung: Debuggen mußt du üben, damit du dich selbst (dein Programm) an jeder Stelle prüfen kannst
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 |
AW: SpinEdit Fehler: Kein gültiger Integewert
Wie geschrieben, sollte es
Delphi-Quellcode:
lauten
if Tipp_ok(Tippzahlen) then
|
AW: SpinEdit Fehler: Kein gültiger Integewert
und dann wird gleich davon ausgegangen das Tipp_ok(Tippzahlen) true ist?
das ist ja gut, danke. ich üb mich ja schon, ich hab den debugger nur falsche gesetzt, aber du hast recht es liegt an der Statistik Prozedur, wenn ich sie ausklammer läuft das Programm. Weiß jemand was mit der Fehlermeldung dann genau gemeint ist? |
AW: SpinEdit Fehler: Kein gültiger Integewert
ein Leerzeichen bzw. kein Zeichen (weil dein Grid leer ist), was du aus der Zelle holst willst du mit StrToInt umwandeln. Boing... :stupid:
Zitat:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:28 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz