gleicher button - mehrere prozeduren

[Christine Upadek]

wie kann man mit dem gleichen button nacheinander verschiedene (onclick) prozeduren auslösen? beispiel: wenn man den button drückt, ändert sich der text im label. wenn man ein zweites mal drückt, ändert sich der text wieder usw.
danke für eure hilfe

[Torsten Grundke]

Hallo Christine,

eine Möglichkeit besteht darin, einfach die einzelnen Klickereignisse hochzuzählen und entsprechend die jeweilige Procedure aufzurufen. Also z.B.
<pre>
begin
Btn1KlickAnzahl := inc(Btn1KlickAnzahl) mod 5;
case Btn1KlickAnzahl of
0: procedure0;
1: procedure1;
2: ...
3: ...
4: ...
end;
end;
</pre>

Tschüß

Torste

[Christian Seehase]

Moin Christine,<br>
<br>
und ich hab' das mal so gelöst, dass ich in Abhängigkeit des Buttonlabels eine entsprechende Routine aufgerufen habe. In der wurde dann wiederum der Buttontext geändert.<br>
<br>
Ciao<br>
Chri

[Klaus-Peter Fitzner]

Hallo,
und ich verwende am liebsten die Eigenschaft "Tag" des Buttons. Dort habe ich die Möglichkeit, je nach Bedarf Integerwerte einutragen und auszulesen:
case button1.tag of
1: ...
2: ...
3: ...
end;

Damit habe ich auch die Grundlage für eine gewisse Standardisierung, denn ich kann die Tags ja auch wie beim Setzen von Bits verwenden und dadurch abprüfen, ob mehrere Bedingungen zutreffen.
Bspw. bei Tag = 7 ist 2 und 5 gesetzt, bei Tag = 3 ist 1 und 2 gesetzt.

mfg Klaus-Pete