一个简单的计算!100分

NetVan 2003-11-18 09:26:51
我在数据库中有二个字段。
一个是单价 货币型的

一个是单价 整型

取出来放在listview
SubItems.Add(format( '%8.2f',[Fields[3].asfloat])); //单价 货币型
SubItems.Add(inttostr(Fields[4].asinteger)); //数量 整型

我后面加了一个总价
那个subitms.add();如何写呀?
...全文
39 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
IORILI 2003-11-18
  • 打赏
  • 举报
回复
crystaltam 和fengsx合起来用
因为你要操作listview中的数据所以最好声明一个tlistview类,来对listview中的item进行操作
fengsx 2003-11-18
  • 打赏
  • 举报
回复
//请参考
var
iItem:TListItem;
begin
iItem:=Lv_Code.Items.Add;
iItem.Caption:=dm_xd.Cs_tmp1.fieldbyname('CD_CODE').AsString;
iItem.SubItems.Add(dm_xd.Cs_tmp1.fieldbyname('CD_CHINA').AsString);
iItem.SubItems.Add(dm_xd.Cs_tmp1.fieldbyname('CD_PY').AsString);
end;
myling 2003-11-18
  • 打赏
  • 举报
回复
没怎么看懂

是不是搂住写错了呀?

一个是单价 货币型的

一个是单价 整型//这个应该是数量吧?

那样的话就照 crystaltam(紫水晶) 的写就行了
crystaltam 2003-11-18
  • 打赏
  • 举报
回复
floattostr(Fields[3].asfloat*Fields[4].asfloat)
wenjianyao 2003-11-18
  • 打赏
  • 举报
回复
一样的,整数和整数加,小数和小数加就可以了

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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