Impedir salir de un DBEdit si el valor no es válido

[[gluglu]]

Gracias Roman,

Eso era precisamente lo que andaba buscando : donde validar el campo introducido.

Mi código utilizado es el siguiente :

Código Delphi [-]
procedure TMaster.IBQuery1CAMPO1Validate(Sender: TField);
begin
   IBQueryCheck.SQL.Clear;
   IBQueryCheck.SQL.Add('Select * from TABLA1');
   IBQueryCheck.SQL.Add('where CAMPO1 = ');
   If DBEdit1.Text = '' then
     IBQueryCheck.SQL.Add('-999999')
   else
     IBQueryCheck.SQL.Add(DBEdit1.Text);
   IBQueryCheck.SQL.Add('and CAMPO2 = ');
   If DBEdit2.Text = '' then
     IBQueryCheck.SQL.Add('-999999')
   else
     IBQueryCheck.SQL.Add(DBEDit2.Text);
   IBQueryCheck.Open;
   If IBQueryCheck.Eof then abort;
end;

Espero que esto sea lo correcto. Estoy por supuesto abierto a cualquier recomendación mejor.

Saludos