导出到Excel

代码说明：

Export To Excel {*** *** *** *** *** *** *** *** *****} { TExcel Component 3.3 for Delphi 1.0 .. 3.0 } { } { Copyright (c) 1996 ... 1998 Tibor F. Liska } { Tel/Fax: [phone] } { Office: [phone] } { E-mail: [e-mail] } {*****************************************************} { } { TExcel is provided free of charge as so long as } { it is not in commercial use. When it produces } { income for you, please send me some portion of } { your income (at least $50). Thank you. } { } {*****************************************************}-Export To Excel {*****************************************************} { TExcel Component 3.3 for Delphi 1.0 .. 3.0 } { } { Copyright (c) 1996 ... 1998 Tibor F. Liska } { Tel/Fax: [phone] } { Office: [phone] } { E-mail: [e-mail]