进销存中遇到的问题

Question

在dbgrid中有个字段是库存量,
我想实现当焦点到库存量字段时候,程序自动将上一条记录的库存量+当前记录的入库量并赋予当前的库存量或者 -当前的出库量并赋予当前的库存量
我想直接对dbgrid操作
实在不行操作表也可以还有一问:如果我有一个表有一个字段很多条记录要打印,但是想在一业纸上打印多数列怎么办(可能有多页,可能最后一页没用完)请各位大师给予帮助

Answer 1

在oncloenter事件中在写不怎么明白你的意思

Answer 2

onColenter中写，该事件在输入焦点移动到某列时触发。
procedure TForm1.DBGrid1ColEnter(Sender: TObject);
begin
  if Dbgrid1.selectedfield.fieldname='***' then
    //此处做处理
end;

Answer 3

第二各问题可以通过在window中自定义打印纸实现。

Answer 4

第二问题：你说的是打印一列吗？而想在同一页里面打印多列？
    你可以对BAND进行分栏或者对页面进行分栏！