Question

Delphi中OleVariant是什么类型变量

下面的程式一运行，编译器就会报:
Undeclared identifier:'CreateOleObject'
怎么回事啊？

procedure Tdchu_Form.Button1Click(Sender: TObject);
var
sht,app:OleVariant;
j,i:integer;
// zsl,zje:double;
r:string;
begin
try
app:=CreateOleObject('Excel.Application');
except
Application.MessageBox('Excel 没有安装！','提示');
exit;
end;
app.Workbooks.Add;
sht:=app.Workbooks[1].WorkSheets[1];
sht.Cells[1,3]:='打印标题';
sht.RANGE['A1;G1'].MergeCells:=true;
sht.Cells[2,1]:='ID';
sht.Cells[2,2]:='NAME';
ADOTable1.First;
for i:=1 to ADOTable1.RecordCount do
begin
sht.Cells[i+2,1]:= ADOTable1.FieldByName('ID').AsString;
sht.Cells[i+2,2]:= ADOTable1.FieldByName('NAME').AsString;
ADOTable1.Next;
END;
app.Visible:=true;
end;

Answer 1

变体型,和VBS中的变体有点类似.

一般来说这个变量不常用到而且推荐不要用.

尽量用已知类型代替.这个是经验之谈,

因为有时候容易出现一些预料之外的问题,而且这个本身存在意义就不大.

Answer 2

要引用ComObj，它包含了一些Com对象的定义

Answer 3

在单元接口部分引用 ComObj
Uses ComObj;