Mehrere Tage in TCalendar hervorheben

[jwdietrich]

Gibt es eine Möglichkeit in einer TCalendar-Komponente außer dem aktuellen Datum noch mehrere weitere Tage in bestimmten Farben zu markieren? Ich entwickle einen Kalender, in dem ich Feiertage hervorheben will. Das ist ja keine ungewöhnliche Aufgabe, so dass ich denke, dass es so etwas geben muss. Leider ist die Dokumentation sehr spärlich.

[wp_xyz]

http://www.swissdelphicenter.ch/de/showcode.php?id=1220

[jwdietrich]

Schön, aber in der LCL gibt es für TCalender die Eigenschaft BoldDays nicht. Brauche ich dafür noch eine Extra-Komponente?

[wp_xyz]

Nein. Schreibe einen Event-Handler für OnGetMonthInfo und rufe dort die Methode BoldDays auf, der du die fett darzustellenden Monate übergibst. Diese Methode codiert diese Monate in das Bit-Array MonthBoldInfo, das von dem Event-Handler benötigt wird. Der aktuelle Monat wird direkt als Parameter übergeben, das Jahr musst du dir aus dem aktuell eingestellten Datum (TMonthCalendar(Sender).Date) selbst ableiten, z.B. mit DecodeDate.

[wp_xyz]

Oh - ich merke gerade, bei Lazarus ist das ja anders als bei Delphi... Sorry.

[jwdietrich]

Oh - ich merke gerade, bei Lazarus ist das ja anders als bei Delphi... Sorry.

Naja, Lazarus ist ja auch kein Delphi-Klon. Trotzdem vielen Dank für die Bemühungen!

[Christian]

In Visual Planit gibts ne Kalendar Komponente die komplett selbstgezeichnet ist, da lässt sich das sicher unterbringen.

[jwdietrich]

In Visual Planit gibts ne Kalendar Komponente die komplett selbstgezeichnet ist, da lässt sich das sicher unterbringen.

Danke für den Tip, das sieht interessant, aber auch ein wenig unhandlich aus. Ich werde es mal ausprobieren, aber wenn die Komponente zu ressourcenintensiv ist, werde ich wohl eher selbst einen flexiblen Kalender schreiben.

[m.fuchs]

Wie muss denn die Hervorhebung aussehen? Ich habe da noch eine Komponente, mit der ein User eigentlich Tage in einem Jahr markieren kann. Aber man könnte sie durchaus auch nur für die Anzeige von markierten Tagen verwenden. Sieht dann so aus:

http://www.michael-fuchs.net/newsgroups ... ongrid.png

[wp_xyz]

Im Package RX (http://lazarus-ccr.svn.sourceforge.net/ ... onents/rx/) gibt es ein TRxCalendarGrid, das von TCustomDrawGrid abgeleitet ist. Hier hat man - wie bei allen Grids - über das Ereignis OnPrepareCanvas Zugriff auf den Canvas, bevor eine Grid-Zelle gezeichnet wird, und kann so die Textfarbe etc. ändern.

[creed steiger]

Beim Orpheus Port ist auch ein Kalender dabei

http://wiki.freepascal.org/OrphPort

damit könnte es evtl gehen
http://www.lazarus.freepascal.org/index ... ic=18007.0

[jwdietrich]

Danke für die vielen Tips. Ich werde in den nächsten Tagen mal ein wenig experimentieren, welche der Optionen die beste ist.