Move := Tag = 1; Was hat dieser Ausdruck zu bedeuten?

[Gunter Kissel]

Hallo,

ich habe einen Programmteil gesehen, wo die ersten zwei Zeilen so aussahen (dabei ist Move vom Typ Boolean):

with Sender as TBitBtn do
Move := Tag = 1;

Wie wird die unterste Zeile gelesen? Was bewirkt dieses = 1 hinter dem Tag?

Gunter

[Alex]

Hallo,<br>
<code>with (Sender as TBitBtn) do Move := (Tag = 1); </code><br>in diesem Fall ist <code>(Tag = 1)</code> ein logoischer Ausdruck,d.h., falls die Variable Tag den Wert 1 besitzt, dann ergibt der Ausdruck <code>(Tag = 1)</code> true und weist dieses Ergebnis der Variable Move zu. Anderenfalls (Tag hat einen wert <>1) wird Move der Wert false zugewiesen

[Jürgen Bukoitz]

Hallo

Im Objektinspector von Delphi siehst bei fasst jeder
Komponente den Eintrag Tag. Dieser Eintrag ist zur
freien Verwendung und hat keinerlei feste Funktion.
Er lässt sich also für eigene Auswertungen und Zuordnungen
auf 0 oder 1 setzen

Beispiel:

if Edit1.Text = 'test' then Panel5.Tag:= '1'

if Panel5.Tag = '1' then Edit.2.Text:= 'geht'
else
Edit2.Text:= 'geht auch'

Im weiteren Quellcode deines Beispiels wird sicherlich das Tag
noch verwendet werden. Dein Beispiel ist etwas aus dem zusammenhang gerissen aber onMove wird meistens für Mausereignisse eingestzt,
um zu Beispiel den Text oder die Farbe eines Buttons zu ändern
wenn die Mouse darüber ist.

m.f.G

jürge

[Christian Seehase]

Hallo Zusammen,<br><br>
wie Jürgen schon gesagt hat, ist TAG gemäß Definition ein Wert, der<br>
der Applikation zur freien Verfügung steht.<br>
Bleibt eigentlich nur noch zu ergänzen, dass es sich um einen 32 Bit Wert handelt.<br>
Dadurch lässt sich TAG, meiner Meinung nach, besonders schön für Pointer<br>
verwenden, um Komponenten mit zugehörigen Datenstrukturen zu verbinden,<br>
so dass man nicht auf unmittelbare 32 Bit Werte beschränkt ist.<br>
<br>
Ciao<br>
Chri

[Uli Becker]

Hallo Christian,

gut erwähnt, aber in einem Bereich für Neulinge wäre hier ein Beispiel hilfreich

Gruß UL

[Hagen Reddmann]

<pre>

if Tag = 1 then Move := True
else Move := False;

// "weggekürzt" siehts dann so aus

Move := Tag = 1;

</pre>

Hage