Forum: Lazarus (IDE)
by himitsu,
16. Apr 2014
oder
procedure TErgebnisse.FormClose(Sender: TObject; var CloseAction: TCloseAction);
begin
//n := StrToIntDef(Ergebnisse.Zahl.caption, 0);
n := 0;
Ergebnisse.Zahl.caption := IntToStr(n);
end;
Der Compiler hat aber bestimmt auch erwähnt, daß n nicht verwendet wurde. (der Wert der ersten Zuweisung)
Vorallem, wozu sollte der alte Wert erst ausgelesen werden, wenn dann sowieso ein...
Forum: Lazarus (IDE)
by himitsu,
16. Apr 2014
Dein Richtig1.Show; heißt in Wirklichkeit Self.Richtig1.Show;. (Delphi macht das Self innerhalb von Methoden automatisch implizit davor)
Also, du gehst da über die Instanz des Fensters auf die Komponenten, welche darin liegen, bzw. eigentlich auf die Felder (Variablen), welche publisched in der Klasse deklariert sind.
Will man auf eine andere Form, dann braucht man eine Variable, in welcher...
Forum: Lazarus (IDE)
by himitsu,
16. Apr 2014
Oder man geht davon dau, dass in dem Label immer eine "Zahl" steht und verwendet StrToInt.
Im Fehlerfall liefert das dann automatisch eine entsprechende Fehlermeldung und man sieht daß dort was nicht stimmt.
Bei StrToIntDef würde der Fehler ungehört einfach untergehen ... das ist dann wie ein try ... except {nix} end; :stupid: