高手请进,dbgrid单元格的问题 如何控制dbgrid单元格的数据的合法性说白了,就是当数据不合法的时候,怎样让焦点定位到表格里的不合法数据那一格,而让其他任何单元格都不能得到输入焦点,其他控件也不能得到输入焦点,除非格子里的数据合法了 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 for i:=0 TO DBGRID1.FIELDScount-1if dbgrid1.fields[i].asstring 不合法 thenfields[i].setfocus;dbgrid1.datasource.dataset.next; 数据集的静态字段的settext事件procedure TForm1.ADOQuery1slSetText(Sender: TField;const Text: String);begintrystrtofloat(text);sender.Value:=text;exceptshowmessage('error');sender.value:=sender.value;Abort;end;end; 这个也根所连接的DataSet中字段的类型有关;另外,也可以有Inforpower的WWDBGrid,然后再以MskEdit来指定它的输入格式; shockwaveflash 透明毛刺问题救解决 怎么不能用快捷键? 不管是D7自带的QuickRep3.09还是从网上下的QuickRep3.62 FOR D7安装后都出现有话多属性没有的错误,哪位能解决? 如何用QuickReport把StringGrid的内容打印出来? 救命。。。。 VCL安装问题 TADOBlobStream一问。 如何在dblistbox 框中显示某一字段中的全部内容? 闲来无聊!突然想到数字水印这个东西! 今年IT业找工作太难了!!!! 如何拦截在更改直连数据库的dbgrid里值时的错误 一键统计.........100分 ado access,
if dbgrid1.fields[i].asstring 不合法 then
fields[i].setfocus;
dbgrid1.datasource.dataset.next;
procedure TForm1.ADOQuery1slSetText(Sender: TField;
const Text: String);
begin
try
strtofloat(text);
sender.Value:=text;
except
showmessage('error');
sender.value:=sender.value;
Abort;
end;
end;
另外,也可以有Inforpower的WWDBGrid,然后再以MskEdit来指定它的输入格式;