社区
网络通信/分布式开发
帖子详情
关于variant..
liunini
2003-11-06 09:51:12
在执行完一个存储过程后将获得的结果集放入variant,在传到客户端!
请写出variant和结果集相互转换的过程。
解决另开分!决不食言!
...全文
26
2
打赏
收藏
关于variant..
在执行完一个存储过程后将获得的结果集放入variant,在传到客户端! 请写出variant和结果集相互转换的过程。 解决另开分!决不食言!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用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的变量付值就行了
Excel按列合并相同相邻单元格和拆分单元格
1.使用vba的方式 1.1合并相同相邻单元格 代码如下: Sub RngMergeCondition() '批量合并单元格 Dim rngUser As Range Dim rngMerge As Range Dim rngSelect As Range Dim i As Long, j As Long Dim lngRowFirst As Long Dim lngClnFirst As Long Dim arr As
Variant
..
城轨列车,全球市场总体规模,前14大厂商排名及市场份额
城轨列车,全球市场总体规模,前14大厂商排名及市场份额
科云光盘摆渡系统故障排查手册.docx
科云光盘摆渡系统故障排查手册.docx
html5网页版中国象棋小游戏代码.zip
有兴趣刚需的可以自己下载,非常实用的特效代码,可以完美运行,有能力的还可以二次修改!
MapGIS和ArcGIS数据转换.doc
MapGIS和ArcGIS数据转换
网络通信/分布式开发
1,592
社区成员
32,990
社区内容
发帖
与我相关
我的任务
网络通信/分布式开发
Delphi 网络通信/分布式开发
复制链接
扫一扫
分享
社区描述
Delphi 网络通信/分布式开发
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章