Herunterzählen auf Knopfdruck

[Jan.R]

Wie kann ich auf ButtonClick in einem label um einen bestimmten Wert herunterzählen???

Wenn in meinem label z. B. 1000 steht, dass auf Knopfdruck z. B. um 100 heruntergezählt wird, sodass in meinem label nur noch 900 steht!

Wie mache ich dass???

Mit freundlichen Grüßen

Jan

[Andi1985]

Delphi-Quellcode:

procedure TForm4.btn1Click(Sender: TObject);
begin
  lbl1.Caption := IntToStr(StrToInt(lbl1.Caption) - 100);
end;

*doof kuck*

[Jan.R]

Jetzt kommt aber eine Fehlermeldung: Startseite ist kein gültiger Integerwert!!!

[HenKst]

Ist doch eine eindeutige Fehlermeldung oder?^^

In deinem String steht "Startseite" und nicht "1000".

Wenn du etwas herunterzählen willst sollte das schon eine Zahl sein.

[jfheins]

Das allein bringt uns leider nichts an Infos, die wir benutzen können, um dir zu helfen.

Poste bitte den Codeabschnitt (Zeile bekommst du ja angezeigt wenn du auf die Meldung doppelt draufklickst) und markiere die Zeile, in der der Fehler auftritt. Den code dann mit [delphi][/delphi] umschließen und wir können dir helfen

[Jan.R]

Eben nicht!!!

Da steht 1000!!!

[HenKst]

Kein grund hier mit Satzzeichen um dich zu werfen...

Delphi meint aber offensichtlich es steht "Startseite" drin.

Entweder nimmst du also die falsche variable, oder sie wird irgendwo anders im Programm auf "Startseite" gesetzt.
Um das rauszukriegen müssten wir aber dann doch deinen code sehen.

[Klaus01]

Hallo,

nimm doch anstelle von StrToInt StrToIntDef.
Da bekommst Du dann keine Fehlermeldung um die Ohren gehauen -
aber Dein Programm arbeitet dann mit einem von Dir vorgegebenen Defaultwert.

Grüße
Klaus

[Lossy eX]

Klaus01: Also den Vorschlag finde ich nicht gut. Es hat ja schließlich einen Grund warum es da zu einem Fehler kommt. Und solch offensichtliche Fehler zu ignorieren kann keine ernst gemeinte Lösung sein.

Jan.R: Stell bitte sicher, dass das Label "lbl1" auch das Label ist was den Wert enthält, den du herunterzählen möchtest. Auch wenn du davon fest überzeugt bist stell es bitte noch mal sicher. Wenn du zum Beispiel 4 Labels auf deinem Formular hast, dann heißen die normal "Label1", "Label2", "Label3" und "Label4". Wenn du jetzt in einem Label den Wert verringern möchtest, dann musst du auch genau das passende angeben was du haben willst. Delphi macht nämlich nur genau das was du ihm sagst. Wenn du dort ein falsches Label angibst, dann ist es vollkommen berechtigt, dass es zu einem Fehler kommt.

In dem Label sollte auch wirklich nur der Wert 1000 stehen. Wenn dort "Startwert: 1000" drin steht, dann geht das natürlich auch nicht so ohne weiteres. Da würde ich dann lieber 2 Labels benutzen so das die 1000 alleine in einem Label steht.

PS: Andi1985 nicht jeder fängt gleich als Profi an...