创建程序的对象实例后，不能使用该程序的常量？(10分)

1

17楼唐

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-31

• #1

代码如下：
var
surfer,plot:variant;
begin
surfer:=createoleobject('surfer.application');
plot:=surferapp.documents.add(srfPlot);
编译提示：[Error] main.pas(332): Undeclared identifier: 'srfPlot'
怎么解决？

 

L

lngdtommy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-31

• #2

plot:=surferapp.documents.add(srfPlot);
那楼主这个srfPlot到底是在哪定义的呢？

 

W

wangergulei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-31

• #3

这个srfPlot是什么东西啊？把定义show出来看看。

 

1

17楼唐

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-31

• #4

解释一下：Surfer是个绘图程序，add是surfer程序的一个方法，即object.Add(DocType)。
DocType的值有strPlot等。例如：
Dim Doc As Object
Set Doc = Docs.Add(DocType:=srfPlot)

 

0

0桁骀

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-08-02

• #5

呵呵，常量都是自己定义的

delphi应该可以导入的，搜索一下ocx/server下面的office代码

 

X

xifengge

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-08-02

• #6

需要自己重新定义一下。