摘要: 1.VarArrayCreate procedure TForm1.Button1Click(Sender: TObject); var   V, W : Variant;   i : Integer; begin   V := VarArrayCreate([1,4], varVariant);   V[1] := 1;   V[2] := '... 阅读全文
posted @ 2010-11-26 14:42 覆雨翻云 阅读(10778) 评论(0) 推荐(0) 编辑
摘要: webwx (2006-07-06 17:41:00)  比如: var tempVr: OleVariant; begin tempVr := VarArrayCreate([1..2], varOleStr); tempVr[1] := VarArrayOf([1, 2, 3, 4, 5]); tempVr[2] := VarArrayOf([6, 7, 8, 9, 10]); en... 阅读全文
posted @ 2010-11-26 14:09 覆雨翻云 阅读(1699) 评论(0) 推荐(0) 编辑
摘要: 在进程内自动化服务器中定义一个函数方法,需要在函数返回时,返回多个值,这就需要采 用数组的类型,比如,我定义了一个方法: function Calculate(inputtime: Integer): PSafeArray; safecall; 需要返回一个数组,如何实现呢?是否采用safearray类型呢? 在定义参数时采用的是safearray类型,怎么实现呢? 参考D5开发人员指南 23章,... 阅读全文
posted @ 2010-11-26 12:50 覆雨翻云 阅读(618) 评论(0) 推荐(0) 编辑
摘要: 在服务器端建立一个remoteDataModule,MyTest,定义一个方法Testing,客户端可以通过 DcomConnection1.Appserver.Testing调用此远程方法!在服务器端的type library里手工建立一个接口,ITest1,然后,建立一数据模块,   TDataModule3 = class(TDataModule,ITest1) 进行业务... 阅读全文
posted @ 2010-11-26 09:35 覆雨翻云 阅读(1119) 评论(0) 推荐(0) 编辑
摘要: 在COM+中,如何传递一个Record,或一个Record数组? (可以传递ADO的记录集吗?好像VB可以,但VB传递的记录集,Delphi可以用吗?)   当然可以 看看一下代码 1。定义一个结构   ///////////////////自定义的欠费统计结构   towe=record     name:shortstring; ... 阅读全文
posted @ 2010-11-26 00:36 覆雨翻云 阅读(699) 评论(0) 推荐(0) 编辑
摘要: ADO+SQL Server 2K+Delphi 5+miads做的三层结构. 中间层RDM自定了一个接口,有一个参数为olevariant类型,把数据库中的image类型的数据 传给Client,想通TMemoryStream把数据读到olevariant中,失败. 问题1:如何把一个TMemoryStream中的数据读到一个olevariant型变量中? 问题2:如上面描述,有否其他方法实现?... 阅读全文
posted @ 2010-11-26 00:34 覆雨翻云 阅读(536) 评论(0) 推荐(0) 编辑
摘要: http://www.delphibbs.com/delphibbs/dispq.asp?LID=3331412 来自:lich, 时间:2006-1-17 12:59:27, ID:3331615 | 编辑 Midas 中有相关的代码   来自:lich, 时间:2006-1-17 13:08:26, ID:3331624 | 编辑 使用  SConnect.pas... 阅读全文
posted @ 2010-11-26 00:25 覆雨翻云 阅读(542) 评论(0) 推荐(0) 编辑
摘要: 由于COM+是执行在COM+的执行环境中,因此Delphi 的程序员无法像Delphi的分布式多层应用系统一样可以直接在 Delphi 的IDE 中设定应用程序服务器的断点来调试。 事实上, Delphi 仍然可以在 Delphi 的集成开发环境中调试 COM+组件,也可以让程序员在集成开发环境中在COM+组件的程序单元中设定断点,然后执行客户端应用程序调用 COM+组件。此时 Delphi 便会... 阅读全文
posted @ 2010-11-26 00:25 覆雨翻云 阅读(1091) 评论(0) 推荐(0) 编辑
摘要: 有一系统用ado+socket三层方式 服务器端:Ado--sqlserver 客户端:socket连接方式 问: 1.当客户端需要查询或更新数据时,在客户端的clientdataset的commandtext 里写入语句,让服务器端去执行,是否合理? 2.当需要查询一个数据量较大的数据库时,采用select top 10000(为查询最大数,用户设置)  * from table 然后... 阅读全文
posted @ 2010-11-26 00:22 覆雨翻云 阅读(2979) 评论(0) 推荐(0) 编辑
摘要: 好久没来这里,我来尝试着为初学者做一个入门讲座。 业务:客户的需求描述稍作整理,就可以认为是业务 业务逻辑:业务的计算机具体实现,对于数据库应用来说,往往可以具体为一个SQL语句 你现在正跟客户进行关于工资模块需求的交谈: 客户说,我想要查某个部门的工资表,有时需要查某个人的工资表,这个工资表是按月查询的 你现在可以根据这个需求建立这样的工资服务模型(基于Com+): mtsSalary.dll ... 阅读全文
posted @ 2010-11-26 00:02 覆雨翻云 阅读(794) 评论(0) 推荐(0) 编辑