TCalendarView - Mehrfarbiger Zellenhintergrund

[Tim-94]

Hallo zusammen,

Ich experimentiere gerade mit der Komponente "TCalendarView" und wollte den Hintergrund einer Zelle (eines Tages) jeweils zur Hälfte mit unterschiedlichen Farben füllen, jedoch stehe ich da gerade etwas auf dem Schlauch... Im Ereignis "OnDrawDayItem" ändere ich die Hintergrundfarbe bisher folgendermaßen (bspw. um einen bestimmten Zeitraum anders einzufärben):

Code:

  // Hintergrundfarbe des Zeitraums testweise ändern
  if (CalendarViewViewInfo.Date >= StrToDate('13.06.2019')) and (CalendarViewViewInfo.Date <= StrToDate('17.06.2019')) then
    DrawParams.BkColor := clRed;

Rein vom Verständnis her müsste man doch die Koordinaten des Rects (der Zelle) nehmen und dann mittels Canvas etwas draufzeichnen, oder?
Kann mir da jemand weiterhelfen?

Beste Grüße,
Tim :)

[Tim-94]

Kann mir hier wirklich niemand weiterhelfen?

*push*

[hoika]

Hallo,
was hast Du denn schon?

Ich denke, dass du zuerst inherited oder ähnlich aufrufen musst,
und erst dann zeichnen darfst.
Sonst überschreibt ja das gesetzte DrawParams-Zeugs deine gemaltes wieder.

[Tim-94]

Hallo Hoika,

Entschuldige die verspätete Rückmeldung. Ich war in den letzten Wochen sehr viel mit anderen Projekten beschäftigt und hatte deine Antwort schlichtweg verdrängt.
In den letzten Tagen habe ich noch etwas herumexperimentiert und ein kleines Testprojekt geschrieben, welches du im Anhang findest.

Zum Verständnis: Ich möchte eine Art Belegungskalender, in welchem einzelne Buchungen dargestellt werden, realisieren.

In meinem Testprojekt möchte ich nun bspw. die Zelle des Tages 13.07.2019 mit einer weißen Unterteilung in der Mitte rot färben (siehe Bild "rot_rot.png"). Wenn die zweite Buchung nun bspw. nur eine Reservierung wäre, möchte ich die linke Hälfte rot und die rechte Hälfte gelb darstellen (siehe Bild "rot_gelb.png").

[Tim-94]

Schade, dass mir niemand weiterhelfen kann...:(

*push*

[hoika]

Hallo,
tja, dein Wunsch ist einfach zu speziell.

Ich würde Umsteigen auf eine TDrawGrid. Dort kannst/musst du alles selber malen.

Ansonsten musst Du die Komponente erweitern um Deine Wünsche
minimalster Ausgangspunkt, um die Farben-Properties rauszubekommen.
http://docwiki.embarcadero.com/RADSt..._Calendar_View

Der Quellcode ist doch vorhanden?

[Tim-94]

Hallo hoika,

Danke, aber ein TDrawGrid setze ich schon in einer älteren Version meines Programms ein und wollte mal die Komponente wechseln bzw. etwas moderner werden.
Ich werde demnächst mal weiter herumexperimentieren und eine weitere Antwort verfassen, wenn ich eine Lösung herausgefunden habe.

Trotzdem danke :)