社区
Delphi
帖子详情
COM 高手请进:如何把一个数组参数传进组件?
neweb
2002-03-14 11:12:20
有一系列坐标点(个数>=3)如[(10,10),(10,70),(30,30),(30,70),(70,30)]要传进ASP组件,如何做?
我一点头绪都没有,希望能给点启发性的代码?
...全文
121
8
打赏
收藏
COM 高手请进:如何把一个数组参数传进组件?
有一系列坐标点(个数>=3)如[(10,10),(10,70),(30,30),(30,70),(70,30)]要传进ASP组件,如何做? 我一点头绪都没有,希望能给点启发性的代码?
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
8 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
CeleronII
2002-03-15
打赏
举报
回复
首先定义一个Variant类型的数组,用VarArrayCreate函数来创建。
在COM服务器端,接口也声明OLE VARIANT类型,这样一来就可以直接传了。
jjianxin2001
2002-03-15
打赏
举报
回复
因为COM/DCOM对象都不在Client程序运行的内存空间(内进程COM对象除外,即便如此,为了统一接口,内进程的COM也不得传递指针),而且在Win32中所有的程序都有自己独立的2GB的内存空间,程序与程序之间传递指针(内存地址)是毫无意义的,而数组、字符串等大量的数据在程序中都是分配一定的内存空间,然后用指针加内存偏移量来存取数据的,这时,如何在COM/DCOM对象中如何传递呢?
在Win32中引入了一新变量Variant,可以通过Variant传递数组。具体的实现方法,用Delphi实现为:
Server(COM/DCOM程序)端:
procedure TTestDCOM.Send4(Size: Integer; D1: OleVariant);
type
TData=array [0..999] of Byte;
Var
Data:TData;
i:Integer;
begin
for i:=0 to Size-1 do begin
Data[i]:=D1[i];
end;
end;
Cleint端:
Var
D1:OleVariant;
begin
D1:=VarArrayCreate([0,99],varByte);
{
D1[1]:=45;
.... //将值存入D1中
}
S.Send4(99,D1); //S是TestDCOM对象
end;
neweb
2002-03-15
打赏
举报
回复
看了你们微软式的帮助,我终于搞定了,谢谢各位!
chechy
2002-03-14
打赏
举报
回复
应该就是这样吧:
aa[0, 0];
aa[0, 1];
...
neweb
2002-03-14
打赏
举报
回复
我没有把意思说明白,是这样的,客户程序是ASP,
<%
'10 10 30 30 70
'10 70 30 70 30
dim aa(5,2)
aa(0,0) = 10
aa(0,1) = 10
aa(1,0) = 10
aa(1,1) = 70
.
.
.
aa(4,0) = 70
aa(4,1) = 30
someObj.function1 aa
%>
组件里怎么得到这个数组?要基本原样,比如:
point1(aa[0,0],aa[0,1])
chechy
2002-03-14
打赏
举报
回复
var
a: OleVariant;
a := VarArrayCreate([0, 4], varVariant);
a[0] := VarArrayOf([10, 10]);
a[1] := VarArrayOf([10, 70]);
...
a[4] := VarArrayOf([70, 30]);
strip
2002-03-14
打赏
举报
回复
字符串 BSTR就好了,最简单,
Bardo
2002-03-14
打赏
举报
回复
定义一个数组
然后赋值给变体
传出来
传进去都行!
java源码包---java 源码 大量 实例
Java波浪文字,
一个
利用Java处理字符的实例,可以设置运动方向
参数
,显示文本的字符
数组
,高速文本颜色,显示字体的 FontMetrics对象,得到Graphics实例,得到Image实例,填充颜色
数组
数据,初始化颜色
数组
。...
java源码包2
Java波浪文字,
一个
利用Java处理字符的实例,可以设置运动方向
参数
,显示文本的字符
数组
,高速文本颜色,显示字体的 FontMetrics对象,得到Graphics实例,得到Image实例,填充颜色
数组
数据,初始化颜色
数组
。...
java源码包3
Java波浪文字,
一个
利用Java处理字符的实例,可以设置运动方向
参数
,显示文本的字符
数组
,高速文本颜色,显示字体的 FontMetrics对象,得到Graphics实例,得到Image实例,填充颜色
数组
数据,初始化颜色
数组
。...
java源码包4
Java波浪文字,
一个
利用Java处理字符的实例,可以设置运动方向
参数
,显示文本的字符
数组
,高速文本颜色,显示字体的 FontMetrics对象,得到Graphics实例,得到Image实例,填充颜色
数组
数据,初始化颜色
数组
。...
成百上千个Java 源码DEMO 4(1-4是独立压缩包)
Java波浪文字制作方法及源代码 1个目标文件 摘要:Java源码,初学实例,波浪文字 Java波浪文字,
一个
利用Java处理字符的实例,可以设置运动方向
参数
,显示文本的字符
数组
,高速文本颜色,显示字体的 FontMetrics对象,...
Delphi
5,928
社区成员
262,931
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章