Einzelnen Beitrag anzeigen

Aviator

Registriert seit: 3. Jun 2010
1.554 Beiträge
 
Delphi 10.3 Rio
 
#8

AW: ListBox - "OnChange" gesucht

  Alt 17. Jun 2020, 08:20
Lagere doch wie von mir vorgeschlagen die Procedure zum Hinzufügen der Items in eine neue Procedure aus. In dieser Procedure setzt du das Label.
In den Klick Events löschst du den Code der mit der neuen Procedure identisch ist und rufst diese stattdessen auf. Zukünftig brauchst du dann immer nur noch an einer Stelle etwas zu ändern.
Die Procedure braucht dann am Parameter eine Ziel-ListBox und den Text der zur Anzeige benutzt werden soll.

Erweiterungsmöglichkeit (wird noch nicht benötigt):
Später kannst du diese Procedure dann ganz leicht überladen damit du an das ListBox Item auch noch ein Objekt mit anhängen kannst.

Stichwort: DRY (Don't Repeat Yourself)
  Mit Zitat antworten Zitat