estoy queriendo hacer una validacion de un campo en firedac
Código Delphi
[-]procedure TfrmCatalogoLineaProducto.qryLineaKODValidate(Sender: TField);
begin
qryVerificaKodLinea.Params.ParamByName('Empresa').AsString := dmGlobal.g_CodigoEmpresa;
qryVerificaKodLinea.Params.ParamByName('KOD').AsString := Sender.AsString;
qryVerificaKodLinea.Open;
if not qryVerificaKodLinea.IsEmpty then
begin
_Alert('Código de Linea ya creado', mtError, [mbAbort], ['Aceptar']);
qryVerificaKodLinea.Close;
Abort;
end;
qryVerificaKodLinea.Close;
end;
el campo KOD tiene este procedimiento
pero cuando salgo del campo no entra a la validacion, este problema no lo tenia cuando usaba ADO
alguien sabe que puede estar pasando?