Panels mit einer Integer Zahl ansprechen

**MarkL**

Ich arbeite gerade an einem Programm, bei dem nach Ausgabe einer Integer Zahl ein Panel hervorgehoben werden soll. Also wenn z.B. die Zahl 2 herauskommt soll das Panel2 grün leuchten.
Nur ich hab leider keine Ahnung wie man das machen könnte.

**Meflin**

Stichwort FindComponent
with TPanel(FindComponent("panel"+inttostr(variable))) do begin

**lkz633**

Also wenn deine Panels z.B Panel1.Panel2 etc heissen, kannst du es so machen:

markieren

Code:

(findcomponent('Panel'+inttostr(Ergebiss)) as TPanel).colour := clgreen;

Gruss lkz633

Edit: Mist, zu langsam

**MarkL**

Vielen Dank Leute!

Panels mit einer Integer Zahl ansprechen

Panels mit einer Integer Zahl ansprechen

Re: Panels mit einer Integer Zahl ansprechen

Re: Panels mit einer Integer Zahl ansprechen

Re: Panels mit einer Integer Zahl ansprechen

Forumregeln

MarkL Registriert seit: 1. Mär 2004 7 Beiträge Delphi 6 Enterprise	#1 Panels mit einer Integer Zahl ansprechen 12. Apr 2004, 13:27 Ich arbeite gerade an einem Programm, bei dem nach Ausgabe einer Integer Zahl ein Panel hervorgehoben werden soll. Also wenn z.B. die Zahl 2 herauskommt soll das Panel2 grün leuchten. Nur ich hab leider keine Ahnung wie man das machen könnte.
	Zitat

Meflin Registriert seit: 21. Aug 2003 4.856 Beiträge	#2 Re: Panels mit einer Integer Zahl ansprechen 12. Apr 2004, 13:33 Stichwort FindComponent with TPanel(FindComponent("panel"+inttostr(variable))) do begin Leo S. https://github.com/leoschweizer
	Zitat

lkz633 Registriert seit: 9. Jun 2002 Ort: Aachen 221 Beiträge	#3 Re: Panels mit einer Integer Zahl ansprechen 12. Apr 2004, 13:33 Also wenn deine Panels z.B Panel1.Panel2 etc heissen, kannst du es so machen: markieren Code: (findcomponent('Panel'+inttostr(Ergebiss)) as TPanel).colour := clgreen; Gruss lkz633 Edit: Mist, zu langsam
	Zitat

MarkL Registriert seit: 1. Mär 2004 7 Beiträge Delphi 6 Enterprise	#4 Re: Panels mit einer Integer Zahl ansprechen 12. Apr 2004, 15:07 Vielen Dank Leute!
	Zitat