Y
yangbo
Unregistered / Unconfirmed
GUEST, unregistred user!
在dbgrid中输入内容，当输入的内容长度大于表中定义的长度时系统会报错，
如果在更新之前主动报错最好了，以前看见过delphi大侠的类似回答：但我
没调试正确,以下是delphi大侠的代码:
---------------
1.可以在Field对应的OnSetText事件中处理.
procedure TForm1.Table1AAASetText(Sender: TField;
const Text: String);
begin
application.messagebox(PChar(Text),'111',mb_OK);
sender.asstring := Text;
end;
----------------
我试了但onsettext属性没设正确,该怎样设置?比如table1中有'B1'字段
长度为4，具体该怎样做?
如果在更新之前主动报错最好了，以前看见过delphi大侠的类似回答：但我
没调试正确,以下是delphi大侠的代码:
---------------
1.可以在Field对应的OnSetText事件中处理.
procedure TForm1.Table1AAASetText(Sender: TField;
const Text: String);
begin
application.messagebox(PChar(Text),'111',mb_OK);
sender.asstring := Text;
end;
----------------
我试了但onsettext属性没设正确,该怎样设置?比如table1中有'B1'字段
长度为4，具体该怎样做?
