H
ham0391
Unregistered / Unconfirmed
GUEST, unregistred user!
数据库有两列:单价,生产厂家
在通过DBGRID编辑单价的同时,将生产厂家的数据也赋值,不知道怎么操作??
我本来想用DBGRID.onkeypress,判断如果是回车就对生产厂家赋值,
可是结果只对生产厂家进行了操作,单价没有变........
谢谢.
procedure TMainForm.DBGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (key=VK_RETURN) then
begin
DataModule1.ADODataSet1.FieldByName('生产厂家
').Value:=CompanyEdit.Text;
DataModule1.ADODataSet1.Next;
end;
end;
在通过DBGRID编辑单价的同时,将生产厂家的数据也赋值,不知道怎么操作??
我本来想用DBGRID.onkeypress,判断如果是回车就对生产厂家赋值,
可是结果只对生产厂家进行了操作,单价没有变........
谢谢.
procedure TMainForm.DBGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (key=VK_RETURN) then
begin
DataModule1.ADODataSet1.FieldByName('生产厂家
').Value:=CompanyEdit.Text;
DataModule1.ADODataSet1.Next;
end;
end;