掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
MonthCalendarで日付が選択されたかどうかを知るには？ (ID：46860)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
通知メッセージを利用する方法 usesにComCtrls, CommCtrlを追加 MonthCalendarを使ってるformの定義の前に以下の定義を追加 TMonthCalendar = class(ComCtrls.TMonthCalendar) private FOnDaySelect: TNotifyEvent; procedure SetOnDaySelect(const Value: TNotifyEvent); protected procedure CNNotify(var Message: TWMNotifyMC); message CN_NOTIFY; public property OnDaySelect: TNotifyEvent read FOnDaySelect write SetOnDaySelect; end; implementationの下に以下を追加 procedure TMonthCalendar.CNNotify(var Message: TWMNotifyMC); begin inherited; with Message, NMHdr{$IFNDEF CLR}^{$ENDIF} do begin case code of MCN_SELECT: if Assigned(FOnDaySelect) then FOnDaySelect(Self); end; end; end; 使う場合はFormのOnCreateででも以下の感じでイベントをセットしたら良いかと。 MonthCalendar1.OnDaySelect := OnDaySelect; これでユーザーが日付を選択した場合のみイベントが走ります。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.