|
我参照文档引入控件后调用出现没有类型信息‘TOleWord ’的错误
.pas的代码如下
unit OleAdv;
interface uses
OleCtnrs, Dialogs;
type
TOleWord = class
private
public
procedure AddPicture();
end;
implementation
uses Word2000,OleServer,ExtCtrls;
{ TOleWordExpand }
procedure TOleWord.AddPicture();
var
wod:TWordApplication;
begin
wod:=TWordApplication.Create(nil);
wod.Connect;
wod.Visible:=True;
end;
end. |
|