如何比较Edit控件和数据库中的数字大小,并输出差额??

eyoexply 2003-06-05 12:58:20
数据库用的是SQL SERVER,模拟一个仓库管理系统,要输出库存和需要量的差,并输出缺货单,这样的SQL语句应怎么写?delphi如何实现??
...全文
29 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
tfxg 2003-06-05
  • 打赏
  • 举报
回复
没分抢了别人说完了。
bbs791109 2003-06-05
  • 打赏
  • 举报
回复
var
_younum:integer;
begin
_yournum := StrToIntDef(Edit1.Text,0);
with adoquery1 do
begin
close;
SQL.text := 'select kcsl,kcsl-'+IntToStr(_yournum)+' as diffnum from kctable where kcsl<' +IntToStr(_yournum)+'';
Open;
.....

end;
end;
zxf52 2003-06-05
  • 打赏
  • 举报
回复
var
_younum:integer;
begin
_yournum := StrToIntDef(Edit1.Text,0);
with adoquery1 do
begin
close;
SQL.text := 'select kcsl,kcsl-'+IntToStr(_yournum)+' as diffnum from kctable where kcsl<' +IntToStr(_yournum);
Open;
.....

end;
end;

2,495

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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