TimeEditを使用して通知を消す方法

Question

私はTimeEditを使用して特定の時間に通知を出そうとしています。 私が使用したコード.. Delphi10シアトルアップデート1を使用して

try 
MyNot.Name := Edit1.Text; 
MyNot.AlertBody := Edit2.Text; 
MyNot.FireDate := Now + TimeEdit1.Time; 
NotificationCenter1.ScheduleNotification(MyNot); 
Finally 
MyNot.DisposeOf; 

イム。

Answer 1

Now()は、現在の時計の日付/時刻を表すTDateTimeを返します。現在の日付/時刻を基準にユーザーの入力時刻を追加します。たとえば、ユーザーが00:05:00と入力すると、現在の日付/時刻に5分が追加されます。

あなたは通知が現在の日付の特定時に起動するようにしたい場合は、真夜中（00:00:00am）に対する入力された時間を追加しているように、代わりにNow()機能のDate()機能を使用します。

MyNot.FireDate := Date + TimeEdit1.Time; 

また、あなたが代わりにSysUtils.ReplaceTime()機能を使用することができます。

var 
    dt: TDateTime; 

dt := Date; 
ReplaceTime(dt, TimeEdit1.Time); 
MyNot.FireDate := dt; 

をこれは、あなたがcの付加的な利点を持っています

var 
    wYear, wMonth, wDay: Word; 
    dt: TDateTime; 

wYear := ...; 
wMonth := ...; 
wDay := ...; 
dt := EncodeDate(wYear, wMonth, wDay) + TimeEdit1.Time; 
MyNot.FireDate := dt; 

または：：

var 
    wYear, wMonth, wDay: Word; 
    dt: TDateTime; 

wYear := ...; 
wMonth := ...; 
wDay := ...; 
dt := EncodeDate(wYear, wMonth, wDay); 
ReplaceTime(dt, TimeEdit1.Time); 
MyNot.FireDate := dt;