Button soll Wert einer Variable +1 erhöhen - ohne globale V.

theevilworm · Beiträge: 61

Guten Tag Community,

ich habe eine kleine Frage. Ich habe einen Button, der pro Klick die Variable "zaehler" um eins erhöhen soll, ausgehend von 0.

Das habe ich gemacht, indem ich zaehler als eine globale Variable deklariert habe und sie mit 0 initialisiert habe.
In Button1.Click steht nur noch

markieren

Delphi-Quelltext

1:	zaehler:=zaehler+1;

Jetzt frage ich mich: Ist das auch möglich, ohne globale Variablen zu nutzen?

Xion · Verfasst: Do 25.02.10 14:08

Naja, du kannst die Variable in die Klasse packen...dann ist es nicht mehr ganz so global

Alternativ könntest du auch mit Button.Tag arbeiten, die Variable ist nur in der Klasse vom Button verfügbar, wäre also noch etwas lokaler als in Form ^^ (nicht zu verwechseln mit der property Tag, verfügbar in ganz TForm

)

_________________
a broken heart is like a broken window - it'll never heal
In einem gut regierten Land ist Armut eine Schande, in einem schlecht regierten Reichtum. (Konfuzius)

Narses · Verfasst: Do 25.02.10 14:27

Moin!

Xion hat folgendes geschrieben :

Alternativ könntest du auch mit Button.Tag arbeiten, die Variable ist nur in der Klasse vom Button verfügbar, wäre also noch etwas lokaler als in Form ^^ (nicht zu verwechseln mit der property Tag, verfügbar in ganz TForm

)

Hä?

Du redest hier in beiden Fällen von der Eigenschaft .Tag, aber einmal die des Objekts Form1 und einmal die von Button1 (mal sie Standard-Namen unterstellt). Beide sind im gleichen Namespace, also gibt´s da keinen Sichtbarkeitsunterschied. Oder ich habe dich nicht richtig verstanden. :nixweiss:

theevilworm hat folgendes geschrieben :

Das habe ich gemacht, indem ich zaehler als eine globale Variable deklariert habe und sie mit 0 initialisiert habe.
In Button1.Click steht nur noch

markieren

Delphi-Quelltext

1:	zaehler:=zaehler+1;

Jetzt frage ich mich: Ist das auch möglich, ohne globale Variablen zu nutzen?

Klar ist das möglich, aber macht keinen Sinn:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

procedure TForm1.Button1Click(Sender: TObject);
  var
    Zaehler: Integer;
begin
  Inc(Zaehler); // Zaehler := Zaehler +1;
end;

Bei dieser Version steht dir aber die Variable Zahler nur innerhalb der Methode zur Verfügung, du kannst auf den Wert nicht ausserhalb davon zugriefen. :!:

Da das wohl nicht das sein wird, was du willst, musst du dir überlegen, wo in deinem Programm die Variable sichtbar sein soll:

im ganzen Programm: im var-Abschnitt des Projektdatei deklarieren
in einer Unit: im var-Abschnitt der unit deklarieren
in einer Klasse:
- in der ganzen Klasse: im public/published-Abschnitt deklarieren
- nur innerhalb der Klasse: im private-Abschnitt deklarieren

Mal so als grober Überblick. Generell gilt: so lokal wie möglich, so global wie nötig. :idea:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

Xion · Verfasst: Do 25.02.10 16:39

Narses hat folgendes geschrieben :

Moin!

Xion hat folgendes geschrieben :

Alternativ könntest du auch mit Button.Tag arbeiten, die Variable ist nur in der Klasse vom Button verfügbar, wäre also noch etwas lokaler als in Form ^^ (nicht zu verwechseln mit der property Tag, verfügbar in ganz TForm

)

Hä?

Du redest hier in beiden Fällen von der Eigenschaft .Tag, aber einmal die des Objekts Form1 und einmal die von Button1 (mal sie Standard-Namen unterstellt).

Ne, Button.Tag hat ja ne Variable, die ist nur im Button sichtbar. Das property macht die zwar sichtbar nach außen, aber eigentlich ist sie ja private. Also die Variable selbst ist nur im Button sichtbar, Button.Tag aber in ganz TForm (bzw wo der Button halt ist) :mrgreen:

Narses hat folgendes geschrieben :

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

procedure TForm1.Button1Click(Sender: TObject);
  var
    Zaehler: Integer;
begin
  Inc(Zaehler); // Zaehler := Zaehler +1;
end;

Bei dieser Version steht dir aber die Variable Zahler nur innerhalb der Methode zur Verfügung, du kannst auf den Wert nicht ausserhalb davon zugriefen. :!:

ist nicht vielmehr das Problem, dass der Wert beim nächsten Aufruf weg ist?

_________________
a broken heart is like a broken window - it'll never heal
In einem gut regierten Land ist Armut eine Schande, in einem schlecht regierten Reichtum. (Konfuzius)

Narses · Verfasst: Do 25.02.10 17:18

Moin!

Xion hat folgendes geschrieben :

Ne, Button.Tag hat ja ne Variable, die ist nur im Button sichtbar. Das property macht die zwar sichtbar nach außen, aber eigentlich ist sie ja private. Also die Variable selbst ist nur im Button sichtbar, Button.Tag aber in ganz TForm (bzw wo der Button halt ist) :mrgreen:

Und was ist dann der von dir beschriebene Unterschied zu Form1.Tag? :nut:

Wer nimmt hier wen auf den Arm? :lol:

Xion hat folgendes geschrieben :

Narses hat folgendes geschrieben :

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

procedure TForm1.Button1Click(Sender: TObject);
  var
    Zaehler: Integer;
begin
  Inc(Zaehler); // Zaehler := Zaehler +1;
end;

Bei dieser Version steht dir aber die Variable Zahler nur innerhalb der Methode zur Verfügung, du kannst auf den Wert nicht ausserhalb davon zugriefen. :!:

ist nicht vielmehr das Problem, dass der Wert beim nächsten Aufruf weg ist?

Und der nächste Aufruf erfolgt nicht vielleicht zufällig auch "ausserhalb der Methode"? :zwinker:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

Gammatester · Beiträge: 328 Erhaltene Danke: 101

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

procedure TForm1.Button1Click(Sender: TObject);
{$j+}
const
  zaehler: integer = 0;
begin
  inc(zaehler);
  Button1.Caption := IntToStr(Zaehler);
end;

Tilman · Verfasst: Do 25.02.10 17:58

theevilworm hat folgendes geschrieben :

Ich habe einen Button, der pro Klick die Variable "zaehler" um eins erhöhen soll [..] Ist das auch möglich, ohne globale Variablen zu nutzen?

Eher nicht. Wenn man eine globale Variable um eins erhöhen will, braucht man eine globale Variable. Wenn man einen Teller Suppe essen will, wird das ohne einen Teller Suppe zu haben schwierig.

Wenn es dir aber weniger um die Variable, als das registrieren des Button-Klicks geht, dann kannst du wie bereits von anderen angesprochen die Property Tag verwenden. Von der Idee mit der Konstante würde ich abraten, auch wenn sie funktioniert.

_________________
Bringe einen Menschen zum grübeln, dann kannst du heimlich seinen Reis essen.
(Koreanisches Sprichwort)

theevilworm · Beiträge: 61

Hallo,
danke für die zahlreichen Antworten!
Ich brauch nicht unbedingt eine globale Variable. Ich benutze die Variable nur in dem Button. Mein Problem war, dass ich ja genau das nicht machen kann:

markieren

Delphi-Quelltext

1:
2:

procedure TForm1.Button1Click(Sender: TObject);
var zaehler: integer = 0;

mit einer lokalen Variable. Und nn wusste ich nicht, wie ich die Variable in der gleichen Prozedur zaehler auf 0 setzen konnte, in der ich zaehler auch immer um eins erhöhen will. Wie mache ich das?

markieren

Delphi-Quelltext

1:
2:

const
  zaehler: integer = 0;

Hm, was ist const - ich schätze mal Konstante? Was ist der Unterschied zu einer Variable?

ffgorcky · Beiträge: 573 WIN XP/2000 & 7Prof (Familie:Win95,Win98)

Du könntest auch -wie von user profile icon

Tilman angesprochen- die Eigenschaft Tag des Buttons nehmen und dort Deine Zahl reinschreiben,
wie es z.B. auch in Thread 593378 vorgeschlagen wird.

theevilworm hat folgendes geschrieben :

Hm, was ist const - ich schätze mal Konstante? Was ist der Unterschied zu einer Variable?

Naja, wie es der Name doch schon sagt, bekommt diese "Variable" ja schon von vornherein einen festen - nicht zu ändernden - Wert zugewiesen. Sie bleibt eben konstant bei diesem Wert.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme