delphi编写的小程序，用托盘的方式提醒到期工作。