添加到数组。。。Delphi

秋名山老豆腐 2011-05-18 06:18:52

resultDS :='select 库存金额,库存数量,JQJ FROM FromKuCunAllViewByID '+
'(' +IntToStr(stock_type_sid) + ',''+ refund_num +'',''+ sale_sun +'')';
ZKPCRODM.GetUniQry(vUniQry);
ZKPCRODM.OpenUniQueryBySQL(vUniQry,resultDS);

代码就是这样的。。我想把查询到的三个值分别取出来赋给三个变量不知道改怎么用？望会的人指点下

if (resultDS.FieldByName('库存数量').AsFloat = 0) then
begin
dChengBenDJ := (resultDS.FieldByName('JQJ').AsFloat);
end;
else then

我直接用FieldByName怎么不行呢》？？？希望能够有人帮我。。谢啦

...全文

47 3 打赏收藏转发到动态举报

写回复

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

秋名山老豆腐 2011-05-25

打赏
举报

回复

vUniQry.FieldByName 这样就可以了希望再有遇到和我一样傻成这样的仁兄可以借鉴。。

whf769 2011-05-20

打赏
举报

回复

你有这方向的资料吗？

通过输出九九乘法表，学习在Delphi中静态二维数组的使用方法。

冒泡排序算法，用random函数随机生成数值放入动态数组，然后再用算法排序后打印到edit控件

C#调用delphi写的OCX, 数组传递 Delphi 与 C# 之间变体数组传递

关于Delphi的数组和字符串的介绍，经过了总结

支持批量插入的Delphi数据输入程序，配合数据实现的数据批量输入程序，程序的原型是一个学生管理程序，用来输入学生的基本信息，本程序添加了批量插入数据的功能，可看作是一个批量插入数据的实例吧。相关的代码：　　try 　　with query1 do 　　 begin 　　 close; 　　 sql.Clear; 　　 sql.Add('insert into banji2 (姓名,年龄,性别) '); 　　 sql.Add('select 姓名,年龄,性别 from banji1'); 　　 execsql; 　　 end; 　　except 　　 query1.Close; 　　 table1.Close; 　　 end; 　　 Form1.showkucun; 　　 table1.Close; 　　 table1.Open; 　　end;

.NET技术其他语言

1,977

社区成员

12,447

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

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

+ 用AI写文章