我有一个DBGRID是统计当月入库记录的,大概结构如下
入库日期 五厂仓库 三厂仓库 备件一库 备件二库 ……
下面都有对应的Edit统计每个仓库这个月的总入库金额,我是用for循环做的
for i:=0 to ADOQ_cx.recordcount-1 do
begin
zcck:=zcck+ADOQ_cx.FieldByName('总厂仓库').AsFloat;
scck:=scck+ADOQ_cx.FieldByName('三厂仓库').AsFloat;
wcck:=wcck+ADOQ_cx.FieldByName('五厂仓库').AsFloat;
end
这样会有一个问题,打个比方,有可能我查询的时候总厂仓库没有入库记录,那么在查询的时候就不会有总厂仓库这个字段,在执行for循环的时候就会报错,有没有判断语句,判断一下总厂仓库这个字段是否存在,存在的话执行语句,不存在不执行。
入库日期 五厂仓库 三厂仓库 备件一库 备件二库 ……
下面都有对应的Edit统计每个仓库这个月的总入库金额,我是用for循环做的
for i:=0 to ADOQ_cx.recordcount-1 do
begin
zcck:=zcck+ADOQ_cx.FieldByName('总厂仓库').AsFloat;
scck:=scck+ADOQ_cx.FieldByName('三厂仓库').AsFloat;
wcck:=wcck+ADOQ_cx.FieldByName('五厂仓库').AsFloat;
end
这样会有一个问题,打个比方,有可能我查询的时候总厂仓库没有入库记录,那么在查询的时候就不会有总厂仓库这个字段,在执行for循环的时候就会报错,有没有判断语句,判断一下总厂仓库这个字段是否存在,存在的话执行语句,不存在不执行。
解决方案 »
- 累了,给大家发个图解闷.赤裸少女现身马路600多人围观(附图)
- 请问richview可以把背景设为透明吗?
- 求助关于delphi输出到excel的问题
- 鼠标托动效果如何实现?(在线等候)
- ScrollBar控件的初始化
- 多维数组类型定义问题!不明白!
- 知道一个另一个程序的窗口handle,怎么枚举起edit控件,改变edit的text
- 急!急!急! 怎样用ADO创建Access数据库文件,怎样用ADO获得数据库中所有表的名称和字段信息??
- 窗体的控制
- 最短的dvd解码程序(c),我实在是看不懂,高手请指教
- TStringList DelimitedText 默认的分隔符都有哪些?
- 如何枚举出所有USB设备中找到U盘,并取得其逻辑盘符?
i:=ADOQ_cx.FieldList.IndexOf('总厂仓库');
if i=-1 then
//字段不存在
else
//字段存在