Delphi nochmal array - Delphi-PRAXiS

Thema durchsuchen

Ansicht

Themen-Optionen

nochmal array

Ein Thema von Privateer3000 · begonnen am 20. Dez 2002 · letzter Beitrag vom 20. Dez 2002

Vorheriger Beitrag

Nächster Beitrag

nailor

Registriert seit: 12. Dez 2002
Ort: Karlsruhe
1.989 Beiträge

20. Dez 2002, 15:18

mach 3 labels: label1, label2 und label3.
mach 1 timer: timer1

wähl den timer an, klick doppelt drauf.

dann gib ein:

markieren

Delphi-Quellcode:

			if label1.tag = 1 then label1.color := clred;

if label2.tag = 1 then label2.color := clblue;

if label3.tag = 1 then label3.color := clblack;

jetzt musst du nur bei den labels, die was machen sollen labelXY.tag := 1 vorher machen, bei allen anderen irgendwas <> 1. dann wechseln sie die farbe.

kannst auch eine case statt if-konstruktion nehmen!

Michael N.

http://nailor.devzero.de/code/sharpmath/testing/ --- Tests, Feedback, Anregungen, ... aller Art sehr willkommen!
::: don't try so hard - it'll happen for a reason :::