我想实现的就是如果没有输入，就会提示我输入这个值，然后我现在遇到问题就是了 我那边不输入 他也不提示我要输入值。。 说白了我就是想用代码来实现字段的必须功能，因为刚学，不懂 求教啊 代码如下
procedure TmainForm.DataNavigator1BeforeAction(Sender: TObject; var Accept: Boolean);
begin
begin
if (DataDDXX1.DataSet.FieldByName ('CUSTOMERID').AsString='') then
begin
jsdialogs.ShowMsg('客户ID必须输入!!!','提示！！！');
sysutils.Abort;
end;
if (DataDDXX1.DataSet.FieldByName ('EMPLOYEEID').AsString='') then
begin
jsdialogs.ShowMsg('雇员ID必须输入!!!','提示！！！');
sysutils.Abort;
end;
if (DataDDXX1.DataSet.FieldByName ('REPORTID').AsString='') then
begin
jsdialogs.ShowMsg('申请人必须输入!!!','提示！！！');
sysutils.Abort;
end;
if (DataDDXX1.DataSet.FieldByName ('SQBM').AsString='') then
begin
jsdialogs.ShowMsg('申请部门必须输入!!!','提示！！！');
sysutils.Abort;
end;
if (DataDDMX1.DataSet.FieldByName ('UNITPRICE').AsString='') then
begin
jsdialogs.ShowMsg('单价必须输入!!!','提示！！！');
sysutils.Abort;
end;
if (DataDDMX1.DataSet.FieldByName ('QUANTITY').AsString='') then
begin
jsdialogs.ShowMsg('数量必须输入!!!','提示！！！');
sysutils.Abort;
end;
if (DataDDMX1.DataSet.FieldByName ('DISCOUNT').AsString='') then
begin
jsdialogs.ShowMsg('折扣必须输入!!!','提示！！！');
sysutils.Abort;
end;
if (DataDDMX1.DataSet.FieldByName ('SJJE').AsString='') then
begin
jsdialogs.ShowMsg('金额必须输入!!!','提示！！！');
sysutils.Abort;
end;
end
end;
end.
DataDDMX1是我数据代理的名字，我应该是哪里调用数据源没写完整吗？

自定啊

感觉我上面那样写是没调用出来的感觉