名前 題名 ▼ igyさん > 土曜日は青、日曜日や祝日は赤の文字で表示したい場合、 > > OnDrawDayItemイベントで、 > > procedure TForm1.CalendarView1DrawDayItem(Sender: TObject; > DrawParams: TDrawViewInfoParams; CalendarViewViewInfo: TCellItemViewInfo); > var > S: String; > begin > if DayOfWeek(CalendarViewViewInfo.Date) = 1 then > DrawParams.ForegroundColor := clRed; > if DayOfWeek(CalendarViewViewInfo.Date) = 7 then > DrawParams.ForegroundColor := clBlue; > > if IsSpecialHoliday(CalendarViewViewInfo.Date, S) then > DrawParams.ForegroundColor := clRed; > end; > > のような感じで、文字の色を変更します。 > > カレンダー ビューの利用 > http://docwiki.embarcadero.com/RADStudio/Rio/ja/%E3%82%AB%E3%83%AC%E3%83%B3%E3%83%80%E3%83%BC_%E3%83%93%E3%83%A5%E3%83%BC%E3%81%AE%E5%88%A9%E7%94%A8 > > # TCalendarView、TCalendarPickerは、Delphi 10.1 Update2で追加されました。 GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link