|
| 盒子资源分类 |
![]() |
|
|
|
|
| 利用Variant变量用DELPHI操作EXCEL |
![]() |
| 关键字：Variant变量 操作 EXCEL OLE |
| 来 自：原创 |
| 平 台：Win9x,Win2k/NT |
下载所需：0 火柴 |
| 深浅度：中级 |
完成时间：2002/2/22 |
| 发布者：mantousoft |
发布时间：2003/8/30 |
| 编辑器：DELPHI6 |
语 种：简体中文 |
| 分 类：应用软件 |
下载浏览：3797/27001 |
|
|
|
|
|
利用Variant变量用DELPHI操作EXCEL，代码摘要：
var
v:Variant;
procedure TForm1.Button1Click(Sender: TObject);
begin //打开EXCEL新建文件
try
v:= CreateOleObject('Excel.Application');
v.Visible := CheckBox1.Checked;//是否显示
v.Workbooks.Add;//新建EXCEL文件
v.Workbooks[1].WorkSheets[1].Name := 'DELPHI演示';
// Sheet:= v.Workbooks[1].WorkSheets['DELPHI演示'];//等效下面的语句
Sheet:= v.Workbooks[1].WorkSheets[1];
Sheet.Cells[1,1] :='DELPHI盒子';
Sheet.Cells[2,1] :='http://www.delphibox.com';
except
Showmessage('初始化Excel失败，可能没装Excel，或者其他错误；请重起再试。');
v.DisplayAlerts := false;//是否提示存盘
v.Quit;//如果出错则退出
exit;
end;
Application.Restore;
Application.BringToFront;
end; |
| 本站原创作品，未经作者许可，严禁任何方式转载；转载作品，如果侵犯了您的权益，请联系我们！ |
| 相关文章 |
|
![]() |
|
|
| 相关评论 |
![]() |
|
|
|
|
盒子资源分类大树
