Deine Eintragstypen sind ja soetwas wie Templates. Tolle Sache!
Dafür gibt es eine Klasse, die diese Templates verwaltet (TemplateManager). Die Klasse hat eine Methode
Delphi-Quellcode:
//
Function Template(aTemplateType : TTemplateType) : TLayoutTemplate;
//
Der Urlaubsplan instantiiert einen TemplateManager. Im
OI kannst Du die Farben für die einzelnen Eintragstypen (TTemplateType) dann konfigurieren.
Nun erstellst Du einen Eintrag im Urlaubsplan. Dem Eintrag gibst Du den TemplateManager mit. Nun kannst Du im Eintrag einen Eintragstyp (TTemplateType) auswählen (Urlaub, Krankheit, Blaumachen etc.). Der Eintrag holt sich dann zum Zeichnen (also in seinem Paint z.B.) vom Templatemanager jeweils das entsprechende TLayoutTemplate ab und zeichnet sich entsprechend.
So kannst Du das Layout ändern oder den Eintragstyp und hast immer sofort alles richtig dargestellt.