关于variant..

liunini 2003-11-06 09:51:12
在执行完一个存储过程后将获得的结果集放入variant,在传到客户端!
请写出variant和结果集相互转换的过程。
解决另开分!决不食言!
...全文
26 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
juwuyi 2003-11-06
  • 打赏
  • 举报
回复
直接赋值就OK了

var

V1, V2, V3, V4, V5: Variant;
I: Integer;
D: Double;
S: string;
begin
V1 := 1; { integer value }
V2 := 1234.5678; { real value }
V3 := 'Hello world!'; { string value }
V4 := '1000'; { string value }
V5 := V1 + V2 + V4; { real value 2235.5678}
I := V1; { I = 1 (integer value) }
D := V2; { D = 1234.5678 (real value) }
S := V3; { S = 'Hello world!' (string value) }
I := V4; { I = 1000 (integer value) }
S := V5; { S = '2235.5678' (string value) }

end;
XXSingle 2003-11-06
  • 打赏
  • 举报
回复
如果是以open的形式来打开获取结果集,推见:

var myrecord:_Recordset

myrecord:=My_ASProc.RecordSet;

如果是以execproc的形式,获取结果集只是一些参数,
直接给variant的变量付值就行了

1,592

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 网络通信/分布式开发
社区管理员
  • 网络通信/分布式开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧