Button click event (2 mal)

Zuckerrübe · Hält's aus hier Beiträge: 8

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 · Verfasst: Fr 27.03.09 21:03

markieren

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.

_________________
PROGRAMMER: A device for converting coffee into software.

GTA-Place · Verfasst: Fr 27.03.09 21:06

Schöne Variante (siehe B, "ein Button mit unterschiedlichen Funktionen"):
www.delphi-library.de/topic_67969.html

_________________
"Wer Ego-Shooter Killerspiele nennt, muss konsequenterweise jeden Horrorstreifen als Killerfilm bezeichnen." (Zeit.de)

JayEff · Beiträge: 2971 Windows Vista Ultimate D7 Enterprise

markieren

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 · Hält's aus hier Beiträge: 8

genau so danke

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme