如何判断在DBGridEh中某格输入数据是否符合约束
展开全部
procedure TFormJhd.DBGridEh1ColExit(Sender: TObject);
var
f : Double;
begin
if ClientDataSet1.IsEmpty then
Exit;
if TryStrToVarIsfloat(DBGridEh1.DataSource.DataSet.Fields[5].value, f) then
//
else
begin
DBGridEh1.DataSource.DataSet.Fields[5].value:='';
ShowMessage('非法数据');
end;
end;
var
f : Double;
begin
if ClientDataSet1.IsEmpty then
Exit;
if TryStrToVarIsfloat(DBGridEh1.DataSource.DataSet.Fields[5].value, f) then
//
else
begin
DBGridEh1.DataSource.DataSet.Fields[5].value:='';
ShowMessage('非法数据');
end;
end;
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询