delphi - onChangeEventで日付を変更するには?

Question

日付変更時に TDateTimePicker.OnChangeEvent に対応する必要があります。「保存されていない変更は失われます」などのダイアログを表示し、[OK]、[キャンセル] ボタンを表示します。ユーザーがキャンセルボタンを押した場合、元の日付にリセットしたいと思います。

残念ながら、そのイベントから日付を変更することはできません。変更は無視されます。

より詳細な説明:

1. ユーザーが DateTimePicker で日付を変更する (キーボードで) または カレンダーを開いて日付を選択する
2. OnChange イベントが発生します (カレンダーがまだ開いている可能性があります)
3. MessageDialog を表示し、ユーザーが「キャンセル」を押すと、日付を復元します。例えば。カレンダーを閉じて日付を復元します。

Answer 1

これは、ユーザー LU RD によって部分的に解決されます。「OnCloseUp イベントで値を復元する」というコメントを参照してください。カレンダーから日付を選択するために機能します。

ユーザーがキーボードを使用して編集で直接日付を変更すると、onChangeEvent で直接変更できます。

したがって、 onCloseUpおよびonChangeイベントで元の日付 (またはその他の日付) を設定する組み合わせで十分です。