请教COM技术(200分)

  • 主题发起人 主题发起人 cnnczy
  • 开始时间 开始时间
C

cnnczy

Unregistered / Unconfirmed
GUEST, unregistred user!
对方给出了一大堆COM的接口,可是兄弟从没用过COM,请教该怎么用这些COM呢?
请教,谢谢!
最好,有实例.
 
看<Delphi 5开发人员指南>这本书,上面有实例
 
多看书,李维的还行。光盘上带实例。
 
看一看关于COM的书,对方提供的COM肯定有说明,不然怎么用?
看李维的分布式开发
 
1注册com
2createobject
3调用接口
 
aaab,123具体怎么做?
 
首先你必须认认真真地学会COM,这样才能去写COM程序!如果你只是想看看例子以为就可以
写程序的话,这样做程序员也太容易的了吧!
 
我想先有个例子再看书容易点,谢谢
 
procedure TForm1.Button1Click(Sender: TObject);
var
Test: OleVariant;
ggg:integer;
begin
Test := CreateOleObject('SomeCom.SomData');//com注册名
ggg := Test.SaveUser(s_Comp,s,s,s,
'1990-12-22',s,s,s,s,s,s,s,s,s,'5','0','0','111111111');//com的参数
end;
 
把那些COM组件注册后,点Project菜单->Import Type Library,其中就会列出所有注册过
的接口,选中某一个你要的,点Create Unit按钮,Delphi就会帮你建立调用该接口的文件,
并存放在$(Delphi)/Imports目录下,在你的程序单元中uses这个文件后,你就调用该COM
组件了。
例:
procedure TForm1.Button1Click(Sender: TObject);
var
Obj1 : ISC_SimpleComObj;
s : WideString;
begin
Obj1 := CoSC_SimpleComObj.Create;
Obj1.GetDateTime(s);
MessageBox(Handle,PChar(AnsiString(s)),'Date',MB_OK);
end;
IXXX接口和CoXXX接口都是在导入Type Library时就已经声明在XXX_TLB.pas文件里的了。
楼上的方法是以Ole Automation的方法调用接口,这种方式多用于VB等不支持VTable的语言。
 
看《delphi com深入编程》
 
后退
顶部