Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Button click event (2 mal)


Zuckerrübe - Fr 27.03.09 20:58
Titel: Button click event (2 mal)
Hallo

ich würde gern wissen, wie ich meinem Button sagen kann, dass er beim "ersten" klick z.b. eine Variable 10 setzt und beim 2ten klick einer anderen Variable den Wert 5 setzt.

Ich würde mich sehr über hilfreiche Antworten freuen ;-)


Xentar - Fr 27.03.09 21:03

Delphi-Quelltext 
1:
2:
 
If wert = 0 then Wert := 10
  else Wert := 5;

wäre eine einfache Variante. Setzt voraus, dass du Wert mit 0 initialisierst.


GTA-Place - Fr 27.03.09 21:06
Schöne Variante (siehe B, "ein Button mit unterschiedlichen Funktionen"):
http://www.delphi-library.de/topic_67969.html


JayEff - Fr 27.03.09 21:08

Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
 
var b : Boolean;
{Form1Create:}
b := True;

{Buttonklick:}
if b then
  var1 := 10
else
  var2 := 5;

b := not b;
Hier ist zu beachten: Erster klickt führt zeile 7 aus, zweiter klick zeile 9, dritter wieder 7 etc.


Zuckerrübe - Fr 27.03.09 21:09
genau so danke :)


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!