Einzelnen Beitrag anzeigen

AlexII

Registriert seit: 28. Apr 2008
1.717 Beiträge
 
FreePascal / Lazarus
 
#1

Eigenschaften mehrerer Labels mittels Sender verändern?

  Alt 30. Jan 2015, 19:32
Hallo,

ich habe folgende Frage wo ich nicht mehr weiterkomme. Ich habe 10 Labels die man anklicken kann und jedem Label ist ein Panel zugeordnet. Je nach dem welches Label angeklickt wird muss das Label die Farbe Blau bekommen und entsprechendes Panel erscheinen, die anderen 9 Label bekommen die Farbe schwarz und ihre Panels bleiben ausgeblendet.

Klickt man auf Label7, wird es blau, alle anderen schwarz und das Panel7 erscheint.
Klickt man auf Label8, wird es blau, alle anderen schwarz und das Panel8 erscheint.

Wie mache ich das? Muss wohl irgendwie mit dem Sender gehen, aber irgendwie stehe ich auf dem Schlauch.

Habe folgendes überlegt:
Delphi-Quellcode:
if Label(Sender) = 7 then
  Label7.Color := Blue;
  Panel7.Visible := True;
else
begin
  //den Rest etwa mit einer Schleife schwarz setzen und die Panels ausblenden?
end;

Danke!
Bin Hobbyprogrammierer! Meine Fragen beziehen sich meistens auf Lazarus!
  Mit Zitat antworten Zitat