掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
DateTimePickerのDateを設定した時にイベントを発生させたい (ID:15255)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
関数を作ってみました。 TNMDateTimeChangeを使うのに、CommCtrlをuses節に追加する必要があります。 procedure SetDateTimePickerDateTime(dtp: TDateTimePicker; dt: TDateTime); var nmDtc: TNMDateTimeChange; st: TSystemTime; begin DateTimeToSystemTime(dt, st); nmDtc.nmhdr.hwndFrom := dtp.Handle; nmDtc.nmhdr.idFrom := 0; nmDtc.nmhdr.code := DTN_DATETIMECHANGE; nmDtc.dwFlags := GDT_VALID; nmDtc.st := st; dtp.Perform( WM_NOTIFY, 0, Integer(@nmDtc) ); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.