Forum: Lazarus (IDE)
by Fractal,
16. Apr 2014
Damit hats funktioniert, danke :).
(Um den Counter wieder auf 0 zu setzen):
procedure TErgebnisse.FormClose(Sender: TObject; var CloseAction: TCloseAction);
begin
n := StrToIntDef(Ergebnisse.Zahl.caption, 0);
n := 0;
Ergebnisse.Zahl.caption := IntToStr(n);
end;
Forum: Lazarus (IDE)
by Fractal,
16. Apr 2014
Danke erstmal für eure Antworten!
Habs mal soweit abgeändert, jedoch häng ich immer noch am selben Problem wie vorhin, siehe hier. :cry:
(Und ja, ihr seht schon, dass ich >9000 Units hab, aber wills für den Anfang erstmal so probieren.)