您的位置:首页资讯编程开发 → 一个实际的OLE服务器的开发

一个实际的OLE服务器的开发

时间:2010/2/22 12:01:00来源:本站整理作者:我要评论(0)

一个实际的OLE服务器的开发:

文章导读:  先行知识:Delphi/COM/OLEAutomation/SQLServer  难度:★★☆☆☆  在前几篇文章中我们已经讨论过关于VCL和OLE的知识。在这篇文章中我们将完成一个比较有实际意义的OLEAutomation服务器程序,最后我们把他们封装为Delphi中使用的VCL组件。  首先我们来做一个实际的程序,在它没有变为服务器之前,这是个用来管理客户购买记录的程序(它自己与SQLSe

 
  先行知识:Delphi/COM/OLEAutomation/SQLServer   难度:★★☆☆☆   在前几篇文章中我们已经讨论过关于VCL和OLE的知识。在这篇文章中我们将完成一个比较有实际意义的OLEAutomation服务器程序,最后我们把他们封装为Delphi中使用的VCL组件。   首先我们来做一个实际的程序,在它没有变为服务器之前,这是个用来管理客户购买记录的程序(它自己与SQLServer连接),它可以录入和删除客户的购买记录并直观的显示出来,所有的数据都存放在SQLServer中。我们将它做为OLEAutomation出于这样一种考虑,假设我们是一家大型的供货公司,我们可能有很多系统需要使用这个客户购买记录程序并用它处理SQLServer中相应的数据,但我们不愿意每次都重复的编写同样的处理代码,我们更希望能把这个处理程序独立出来,并向其它程序提供服务。那么在下面的工作中我们完成了这个服务器程序,界面如下:(注意,这仅仅是一个例子,我们不评价其数据库设计的好坏J)    我们不过多的讨论这个程序的代码(因为这和开发一般的程序没有任何不同,你可以按照最后的地址给我来信索取这篇文章的全部代码)。然后我们来把它变为一个服务器。选择FileàNewàOthersàActiveXàAutomationObject。接下来delphi为我们定义了类型库和实现文件,我们要做的只是在类型库中添加相应的我们要用到的服务器属性和事件。我们简单的给出定义这个OLEAutomation功能的接口(来自类型库所产生的ObjectPascal代码):    ICustFormOLE=interface(IDispatch)     ['{D7AE75F9-F838-4702-A8EB-EAD0EED242DE}']     functionGet_CustName:WideString;safecall;     procedureSet_CustName(constValue:WideString);safecall;     functionGet_ProductName:WideString;safecall;     procedureSet_ProductName(constValue:WideString);safecall;     functionGet_ProductNum:Integer;safecall;     procedureSet_ProductNum(Value:Integer);safecall;     functionGet_Remark:WideString;safecall;     procedureSet_Remark(constValue:WideString);safecall;     //下面的方法和属性都对应着原程序中相应的方法和属性    procedureAddToData;safecall;     procedureDelData;safecall;     propertyCustName:WideStringreadGet_CustNamewriteSet_CustName;     propertyProductName:WideStringreadGet_ProductNamewriteSet_ProductName;     propertyProductNum:IntegerreadGet_ProductNumwriteSet_ProductNum;     propertyRemark:WideStringreadGet_RemarkwriteSet_Remark;     end;   

相关阅读 仙剑奇侠传四手游服务器注册已满怎么办 服务器注册已满解决方法介魔力宝贝手机版服务器超时怎么办 魔力宝贝手游服务器连接失败问题我的世界hypixel服务器怎么组队 hypixel服务器组队方法介绍我的世界中国版hypixel服务器介绍 关于Hypixel大厅小知识奶块怎么换服务器 奶块切换服务器方法详解杀手6连不上服务器怎么办?杀手6连不上服务器解决办法龙之谷手游黑龙正在攻击服务器 服务器版本号获取失败电脑注册表怎么清理 服务器安全狗清理注册表教程

文章评论
发表评论

热门文章 没有查询到任何记录。

最新文章 编程语言排行榜2020年android studio怎么删 eclipse怎么设置编码格式 eclipse设置编码格andriod studio如何使用真机测试 andriod sandroid studio怎么生成apk android studioandroid studio如何导入jar包 android stud

人气排行 安卓模拟器BlueStacks安装使用教程编程语言排行榜2020年9月 TIOBE编程语言排行eclipse字体大小怎么设置 eclipse字体大小plsql developer怎么连接数据库 plsql deveTomcat9.0安装教程 Tomcat9.0环境变量配置方plsql developer怎么使用 plsql developerVisual Studio 2015环境搭建教程Eclipse优化设置教程 Eclipse优化设置技巧