Z
zla
Unregistered / Unconfirmed
GUEST, unregistred user!
今天要完成的任务:
工具栏,菜单栏的完善
标书制作
标书保存
var
FWordApp: OLEVariant;
begin
try
FWordApp:=CreateOleObject('Word.Application');
FWordApp.Visible:=True
except
Raise ENoWord2000.Create('需要安装Word2000程序');
end;
end;
我用如上的方法连接到了word,用这样的方法能做到使word在窗体
上显示吗,就象OLEContainer,但是我不想直接用OLEContainer创建
与word的连接(OLEContainer1.CreateobjectfromFile('c:/xx.doc')。
总之我想做的是用CreateOleObject('Word.Application')创建,用
OLEContaniner显示。
工具栏,菜单栏的完善
标书制作
标书保存
var
FWordApp: OLEVariant;
begin
try
FWordApp:=CreateOleObject('Word.Application');
FWordApp.Visible:=True
except
Raise ENoWord2000.Create('需要安装Word2000程序');
end;
end;
我用如上的方法连接到了word,用这样的方法能做到使word在窗体
上显示吗,就象OLEContainer,但是我不想直接用OLEContainer创建
与word的连接(OLEContainer1.CreateobjectfromFile('c:/xx.doc')。
总之我想做的是用CreateOleObject('Word.Application')创建,用
OLEContaniner显示。