Zitat von
himitsu:
Ein Hallöle von
http://www.FrankNStein.de/Smiley-Wolke.gif,
Zitat von
citybreaker:
@ixtreme Klappt nicht. "Label1 ist kein gültiger Wert" wird immer angezeigt.
Ist auch richtig So. Vorher muß natürlich in Caption eine Zahlt drin stehen ('123').
Sonst kommt dieser Fehler, da die Zahl dort ausgelesen wird.
Delphi-Quellcode:
Label1.Caption := IntToStr(StrToInt(Label1.Caption) + 1);
{=}
I := StrToInt(Label1.Caption); {auslesen}
I := I + 1; {erhöhen}
Label1.Caption := IntToStr(I);
Es besteht noch die Möglichkeit
Tag zu mißbrauchen:
Delphi-Quellcode:
Label1.Tag := 122;
Label1.Tag := Label1.Tag + 1;
Label1.Caption := IntToStr(Label1.Tag);
{Anzeigetext = "123"}
Was auch Vorteile hat, denn wenn noch etwas anderes außer einder Zahl angezeigen will:
Delphi-Quellcode:
Label1.Tag := 122;
Label1.Tag := Label1.Tag + 1;
Label1.Caption := IntToStr(Label1.Tag) + 'irgendwas';
{Anzeigetext = "123 irgendwas"}
http://www.FrankNStein.de/Smiley-Kuss.gif * *
http://www.FrankNStein.de/Smiley-Spinne.gif * * *
http://www.FrankNStein.de/Smiley-Winken.gif Hier wird die zahl aber nureinmal erhöht. Wie würde das ganze gehen wenn bei
jedem Button klick die Zahl erhöht werden soll?