delphi 操作 excel 进行随机点名抽签的

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

     文件    4191836  2007-12-25 08:24  excelappmifufont.ttf

     文件        434  2012-03-13 18:25  excelappProject1.cfg

     文件      17068  2012-03-16 09:59  excelappProject1.dof

     文件        188  2012-03-13 18:25  excelappProject1.dpr

     文件     724992  2012-03-16 09:22  excelappProject1.exe

     文件      17068  2012-03-13 20:39  excelappProject1.res

     文件      11264  2012-12-15 15:29  excelappstu.xls

     文件       7817  2012-03-16 09:10  excelappUnit1.dcu

     文件         51  2012-03-16 08:32  excelappUnit1.ddp

     文件     181481  2012-03-16 09:22  excelappUnit1.dfm

     文件       2636  2012-03-16 09:08  excelappUnit1.pas

     文件         51  2012-03-16 08:31  excelappUnit1.~ddp

     文件      58647  2012-03-16 09:19  excelappUnit1.~dfm

     文件       2636  2012-03-16 09:08  excelappUnit1.~pas

     目录          0  2012-12-15 15:29  excelapp

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

              5216169                    15