在 dbgrid 中按向下箭头会插入一新行,如何得知这一事件?(50分)

  • 主题发起人 microwave
  • 开始时间
M

microwave

Unregistered / Unconfirmed
GUEST, unregistred user!
我的表中第一栏是ID,我想在插入新行时在这一栏先自动写入ID号(由生成器生成),如何实现?
 
KeyDown事件的判断
 
在数据库中设置成自动增长列不就可以了
 
keydown只能得到向下箭头这一事件,并不知是不是新行,
 
after insert 事件
DBGrid1.Fields[0].Text:='asdf';
 
有这个事件(AFTER INSERT)吗?怎么在 Object inspector 中看不到?
 
keydown以后判断一下是否已经有id了
 
向下箭的虚拟码是什么?
 
TO qianwt:
我用的是 interbase 没有自动增长列.
 
Vk_down.
 
在 DBGrid1.Fields[0].Text:= 此句中如何调用生成器呢?
 
ID字段是自动增1类型的吗？
如果是，你就不用理会这个字段了，数据库会帮你完成的；
如果不是可以这样写在数据集新增记录的事件里
ADOTable1NewRecord(DataSet: TDataSet);
 
我不是用ADO,我用的是IBX
 
为何我这样写(尚未使用生成器,只是个例子)后,新增的那一栏中并没有'1'而要等再增一行后那个
'1'才显示出来?由于可以继续增加证明'1'已经写入了,只是没有显示出来,如何让它立即显示出来?
if key=vk_down then
if vf.Fields[0].Text ='' then
vf.Fields[0].Text :='1'(这个值如何才能从生成器中得到?);
 
在 dbgrid.datasource中写如下事件

procedure TForm1.DataSource1StateChange(Sender: TObject);
begin
if datasource1.State=dsinsert then
showmessage('你插入了一个新的行！');
end;
 
DataSet.OnInsert
 
为何我这样写(尚未使用生成器,只是个例子)后,新增的那一栏中并没有'1'而要等再增一行后那个
'1'才显示出来?由于可以继续增加证明'1'已经写入了,只是没有显示出来,如何让它立即显示出来?
if key=vk_down then
if vf.Fields[0].Text ='' then
vf.Fields[0].Text :='1'(这个值如何才能从生成器中得到?);
 
上面的都在说什么啊？
有没有用过？别乱说哦
在table里的onNewRecord里给ID号赋值就行了
别在grid里搞什么key
实例：
procedure TDM1.tblDetailNewRecord(DataSet: TDataSet);
begin
DataSet.FieldByName('Code').value:=datetimeToStr(now);
DataSet.FieldByName('InputDate').value:=Now;
end;
 
搞定,放分,
 
您必须登录或注册才可回复。

Similar threads

Ray
[转]终于可以发布Delphi下收点OSGI精髓皮毛而设计的插件框架WisdomPluginFramework
回复
4
查看
4K
chlkuei
C
O
如何获得一个表中新插入的数值，而这个表的插入是由其他人做的。(50分)
回复
6
查看
56
人在昆明
人
S
如何禁止用户在DBGrid中插入新记录?(5分)
回复
7
查看
76
sfcheng
S
C
ID字段是自动编号，用ADOquery新插入一条记录，如何在插入前就能取得这条记录的ID? (50分)
回复
12
查看
101
weiiguo
W
W
如何在一个数据集中间插入一条记录?(50分)
回复
3
查看
73
WilliamGui
W
顶部