Ver Mensaje Individual
  #2  
Antiguo 16-05-2011
Avatar de oscarac
[oscarac] oscarac is offline
Miembro Premium
 
Registrado: sep 2006
Ubicación: Lima - Perú
Posts: 2.010
Reputación: 20
oscarac Va por buen camino
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
__________________
Dulce Regalo que Satanas manda para mi.....
Responder Con Cita