怎样向DBGrid的一个Cell中编程设置数据？(50分)

X

xiatianyun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-24

• #1

用户从ComboBox中选择数据后要向该Cell中填写，我用以下代码做但一些意想不到的后果，比如
如果DBGrid没有将当前记录post就用dataset.first就出错。请问正确的解法？
with dataset1 do
begin
edit;
fieldbyname('zd').value :=ComboBox1.items[combobox1.itemindex];//zd类型为string.
end;

 

J

jsxjd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-24

• #2

with dataset1 do
begin
edit;
fieldbyname('zd').value :=ComboBox1.items[combobox1.itemindex];//zd类型为string.
post;
end;

 

X

xiatianyun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-24

• #3

我想让DBGrid本身完成post的工作。这里要做的仅仅相当于用户直接在Cell中输入数据一样。

 

J

jsxjd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-24

• #4

在相应 Table 的 BeforeScroll 中处理：
procedure TForm1.Table1BeforeScroll(DataSet: TDataSet);
begin
if DataSet.State=dsEdit then DataSet.Post;
end;

 

X

xiatianyun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-25

• #5

从上面的讨论中可以看到，自己编写post是可以的，但如何实现我要的功能呢？也就是让DBGrid自身去完成post。
to jsxjd: 如果不发生BeforeScrooll event呢？例如编辑了当前记录又没有把焦点移到其它行而是点击了其它控件。

 

X

xiatianyun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-27

• #6

up

 

J

jsxjd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-27

• #7

在 OnExit 中 post 一下。