mehre Klicks!!

[Smasch]

Hallo!!!
Also ich würde gern in Delphi!!
Einen Button anlegen und wenn man auf denn klickt soll sich die Caption auf "A" ändern und dann wenn man noch einmal klickt "B" dann "C" ... und immer s weiter. Kann mir vielleicht jemand sagen wie das Funktioniert??

Danke!!!

LG
Smasch

[Julia Kuhlmann]

Hi,

am besten per ASCII-Wert. Um Charachter in ASCII umzuwandeln, nimmst du integer(), um ASCII in Character umzuwandeln, nimmst du Chr().
Also so ungefähr:

var
Wert :integer
begin
Wert := integer(Caption);
Inc(Wert);
Caption := Chr(Wert);
end;

Ist allerdings ungetestet....

A-Z ist der Bereich von 65 - 90.

Grüße

Julia

[Smasch]

var chr: Char;
begin
if Button1.Caption = 'Klick mich! :-)' then Button1.Caption := 'Z';
chr := Button1.Caption[1];
if (Ord(chr) >= 65) and (Ord(chr) < 90) then
Button1.Caption := Char(Ord(chr) + 1)
else
Button1.Caption := 'A';

end;

du meinst so!! <--- Dat is schon getestet!!

[Julia Kuhlmann]

Genau. Den Ord - Befehl hatte ich doch glatt vergessen.
Das ist natürlich noch viel hübscher.