Autor Beitrag
GR-Thunderstorm
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 206



BeitragVerfasst: Sa 16.02.08 16:17 
Ich habe in meinem Programm mehrere Panels und die sollen beim Anklicken ihre Farbe ändern. Jetzt wollte ich das aber so machen, dass ich nicht für jedes einzelne eine eigene OnClick Funktion schreibe, sondern eine für alle zusammen und dann anhand des Sender oder so das entsprechende Panel zum Einfärben ausgewählt wird.

Weiß jemand, wie sowas geht? Über den Sender kann ich irgendwie nur den ClassName herausfinden....


Moderiert von user profile iconGausi: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Sa 16.02.2008 um 15:22
Gausi
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8548
Erhaltene Danke: 477

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Sa 16.02.08 16:22 
Pack doch einfach ins OnClick sowas rein - du brauchst ja nicht den Namen, nur das Panel ;-)

ausblenden Delphi-Quelltext
1:
(Sender as TPanel).Color := clred;					

_________________
We are, we were and will not be.
GR-Thunderstorm Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 206



BeitragVerfasst: Sa 16.02.08 16:35 
user profile iconGausi hat folgendes geschrieben:
Pack doch einfach ins OnClick sowas rein - du brauchst ja nicht den Namen, nur das Panel ;-)

ausblenden Delphi-Quelltext
1:
(Sender as TPanel).Color := clred;					


Danke, genau das hab ich gebraucht. ^^ :zustimm:
Yogu
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2598
Erhaltene Danke: 156

Ubuntu 13.04, Win 7
C# (VS 2013)
BeitragVerfasst: Sa 16.02.08 20:04 
Falls du wirklich den Namen herausfinden willst (oder falls jemand über die Suche hierher gekommen ist), kannst du mit (Sender as TComponent).Name den Komponenten-Namen abfragen. Du mussts den Sender erst in eine Komponente umwandeln, reien Objekte haben noch keine Namen.