delphi - cxDateEdit 設定時刻

Question

cxDateEdit に時刻を 00:00:00 に強制的にリセットするにはどうすればよいですか? 実際、私は時間を必要とせず、そのプロパティを日付のみに変更しましたが、どういうわけか時間が結果に含まれます。表示されませんが、クエリの結果が間違っているのに十分です。時間を00にリセットしなければなりません。

Answer 1

DateUtils.DateOf日時変数の日付部分のみを返します。

// QueryDate is a TDateTime variable
QueryDate := DateUtils.DateOf(cxDateEdit1.DateTime);
YourQuery.ParamByName('TheDate').AsDateTime := QueryDate;

ユニットを持たない古いバージョンの Delphi を使用する将来の読者のためにDateUtils、 を使用して同じことを達成できますTrunc。( がある場合はDateUtils、代わりに使用すると、何をしているのかがより明確になりますDateOf。)

QueryDate := Trunc(cxDateEdit1.DateTime);

Answer 2

プロパティには、False に設定できる SaveTime プロパティがあります。これは日付のみを保存します。