Hilfe mit Anzeigetafel

[Nemix]

K ich bin jetzt weiter gekommen, kann man eine grenze für so was machen zB es soll nur zur MAX 100 gehen
und ich krieg den timer nicht
und ich krieg ein coutdown von 24 zu 0 nicht

[DeddyH]

Ein Countdown ist doch faktisch dasselbe, nur andersherum: statt hochzählen subtrahierst Du in jedem Timer-Event 1.

[Nemix]

also ich hab

//+1 Timeout für Gast
procedure TForm1.Button13Click(Sender: TObject);
begin
TGast := TGast + 1; //Addiert 1 Punkt für Timeout Gast
Label18.caption := IntToStr(TGast); //Addiert 1 Punkt beim Label
if label18.caption = '4' then label18.caption := '4';
end;

aber label18.caption stoppt bei 4 nicht sondern geht immer weiter, sollte es bei 4 nicht stoppen?

[Klaus01]

vielleicht klappt es so:

Delphi-Quellcode:

procedure TForm1.Button13Click(Sender: TObject);
begin
  if TGast < 4 then
   begin 
     TGast := TGast + 1; //Addiert 1 Punkt für Timeout Gast
     Label18.caption := IntToStr(TGast); //zeigt neuen Punktestand an
   end;
end;

Grüße
Klaus