大家看看这个问题？(50分)

Y

yayiye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-29

• #1

全局变量
ExcelApp:Variant;
怎样防止重复创建excelApp?
ExcelApp:=CreateOleObject('Excel.Application');

 

T

tan_jian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-29

• #2

GetActiveOleObject判断先!

 

T

tan_jian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-29

• #3

如果不为nil就表示已经有运行的了!

 

C

CaoAizu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-29

• #4

判断 ExcelApp 是否等于 Nil (if ExcelApp=nil then begin)
是 创建
不是 不创建

另外，在程序中，每次把ExcelApp Free掉的时候，手工把ExcelApp设为nil,因为free不会
自动把对象设为nil

最好重载 Create，或干脆自己写一个Create过程

 

Y

yayiye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-29

• #5

tan_jian兄
GetActiveOleObject 怎么用？详细一点，一定给分谢谢

 

Y

yayiye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-29

• #6

CaoAizu兄
if ExcelApp=nil then begin
编译不通过，类型不匹配

 

N

Nizvoo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-29

• #7

Assigned??
试试这个函数

 

Y

yayiye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-29

• #8

Assigned也不行啊

 

Z

zzhdi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-29

• #9

使用VarIsEmpty函数

 

Y

yayiye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-29

• #10

接受答案了.