Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  AW: Hilfe mit Anzeigetafel

   
    by Klaus01, 12. Dez 2012
  vielleicht klappt es so:
  
  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;