delphi实现右下角弹出消息框

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        434  2008-12-10 13:07  Tip\Project1.cfg

     文件       2014  2008-12-10 13:07  Tip\Project1.dof

     文件        265  2008-12-09 17:31  Tip\Project1.dpr

     文件     401920  2009-02-06 13:44  Tip\Project1.exe

     文件        876  2008-11-26 21:12  Tip\Project1.res

     文件       4680  2008-12-10 14:09  Tip\Unit1.dcu

     文件         51  2009-02-06 13:44  Tip\Unit1.ddp

     文件        948  2009-02-06 13:44  Tip\Unit1.dfm

     文件       1254  2008-12-10 14:08  Tip\Unit1.pas

     文件         51  2008-12-10 14:09  Tip\Unit1.~ddp

     文件        918  2008-12-10 14:09  Tip\Unit1.~dfm

     文件       1254  2008-12-10 14:08  Tip\Unit1.~pas

     文件       6313  2008-12-10 14:09  Tip\Unit2.dcu

     文件         51  2008-12-09 17:35  Tip\Unit2.ddp

     文件        928  2008-12-09 17:18  Tip\Unit2.dfm

     文件       3196  2008-12-09 17:35  Tip\Unit2.pas

     目录          0  2015-06-29 13:12  Tip

----------- ---------  ---------- -----  ----

               425153                    17