喫茶XRAYトップページ

[スレッド全体]
[12237] 指定した日が祝日かどうかを調べる返信　削除
2018/9/7 (金) 20:16:44 igy
以前、
[8163] Re5:TDateTimePicker で元号表示
http://mrxray.on.coocan.jp/bbs/DelphiBBS/mrxray_delphifan_coffe.cgi?tree=s8156#8163

で紹介した、DEKOさんのところの

指定した日が祝日かどうかを調べる
https://ht-deko.com/tech004.html#tech026

が、更新されてました！

> 2018/07/03: 五輪祝日移動法および皇室典範特例法に対応。

とのことです。

また、Qiita にも、

[Qiita] Delphi で "指定した日が祝日かどうか" を調べる
https://qiita.com/ht_deko/items/a0cbbbd899c1c016ae67

の記事が公開されています。

[12912] TCalendarView、TCalendarPickerでの使用例返信　削除
2019/6/15 (土) 20:39:06 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で追加されました。

[12914] Re:TCalendarView、TCalendarPickerでの使用例返信　削除
2019/6/15 (土) 20:58:16 Mr.XRAY
▼ igyさん

> のような感じで、文字の色を変更します。

へぇ〜，なるほど．
ありがとうございます．
さてと，どこに書いておこうかな (笑)
 
> カレンダー ビューの利用
> 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で追加されました。

進化しているんですね．

[12915] Re2:TCalendarView、TCalendarPickerでの使用例返信　削除
2019/6/15 (土) 21:31:39 igy
▼ Mr.XRAYさん
> > カレンダー ビューの利用
> > 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で追加されました。
>
> 進化しているんですね．

進化していますが、IDERA Communityでも、

How to add/show "Today button" on TCalendarPicker?
https://community.idera.com/developer-tools/programming-languages/f/c-language/69185/how-to-add-show-today-button-on-tcalendarpicker

挙げられているように、[今日]ボタン がないのが、（少しだけ）難点ですね。

で、↓の TRzDateTimeEdit、TRzCalendar は、なかなか良いかも・・です。


[▼次のスレッド]
INCM/CMT
Cyclamen v3.82