高分求救！怎么样往表中添加记录？？在线等候......

Question

在输入条形码的文本框中处理onChange事件,通过对扫描枪扫描进来的条形码在数据库中检索查询就是了。

Answer 1

商品信息表Info
销售表Sale在输入条形码完毕后，用一个query1：SQL.Text:='select * from Info where ID3D输入的条形妈'；
query1.Open;
if Not query1.IsEmpty then //该商品信息存在
  //显示该商品信息
  //在Sale表中插入新记录，所需信息可以在query1中以及依靠操作员在界面输入(比如价格临时变化等)得到。
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
—————————————————————————————————
　　　　　　　

Answer 2

我用的就2个表啊，商品信息表INFO和销售表SALE

Answer 3

to:xiaoxiangtianzi(潇湘天子)
怎么在数据库中检索时就读取和保存在变量中？还有怎么样合并记录？能给出代码吗？我很菜

Answer 4

你的数据库应该有至少3个表的。
商品表：ItemID,ItemCode,ItemName,Price...
销售主表:SaleMID,SaleDate,Oper,Amount,state...
销售子表:SaleDID,SaleMID,ItemID,Number,Amount...
这样根本不需要什么临时变量。
在新的销售时销售主表首先增加一条记录，得到SaleMID,对SaleDate,Oper,state赋值。
然后录入商品，输入ItemCode返回ItemID和Itemprice,输入数量，计算金额，提交后计算合计金额。

Answer 5

补充，销售子表的OnNewRecorder事件中对SaleMID=主表的SaleMID

Answer 6

如果你的商品数据很多的话，在销售子表中再补充ItemName.ItemSize字段，在销售子表的itemID字段的Onchange事件中使用一个查询，把这个ID的商品信息查询到，并对销售子表的相应字段赋值。