buenas noches
dale una revisadita a OnValidate en los campos de la tabla
ahi podrias crear una rutina que te verifique si el campo ingresdo existe o no
yo hago mas o menos asi
tengo un DataModulo donde tengo querys para verificar la existencia o no de determinados registros
entonces en el OnValidate hago mas o menos asi
Código Delphi
[-]
procedure TfrmCatalogoHorario.qryHorarioTIPOValidate(Sender: TField);
begin
dmComedor.qryVerificaKodHorario.Parameters.ParamByName('Kod').Value := Sender.Value;
dmComedor.qryVerificaKodHorario.Open;
if not dmComedor.qryVerificaKodHorario.IsEmpty then
begin
MessageDlg('Código ya creado', mtError, [mbAbort], 0);
dmComedor.qryVerificaKodHorario.Close;
Abort;
end;
dmComedor.qryVerificaKodHorario.Close;
end;
y en el datamodulo hay algo parecido a esto
Código Delphi
[-]
Select *
from TblHorario
where Tipo like :Kod
espero te sirva
saludos