focos de un edit

[jhcaboverde]

mi problema es el siguiente, tengo un dbedit que al entrar en el adiciona un registro, para poner un numero de 6 caracteres, al salir de el hago una revision en una tabla para saber si el numero es correcto. tengo dos dudas;

1. necesito que cuando llegue al 6to caracter haga la comprobacion no se en que evento ponerlo.

2. Para salir del control presiono la tecla Tab y hago la comprobacion en el evento onExit si no existe el numero en la tabla quiero vaciar el control y quedarme en el para que ponga nuevamente el numero.

[Bicho]

Hola, vayamos por partes:

1- Puedes usar el evento OnKeyPress o el OnKeyDown
2- Prueba con ésto:


procedure TForm1.Edit1Exit(Sender: TObject);
begin
if not ExisteValorEnTabla(Edit1.Text) then begin //sino existe en la tabla ejecuta lo de abajo
Edit1.Text := ''; //vacias el contenido del edit
Edit1.SetFocus; //le das el foco nuevamente a tu edit
end;
end;


Saludos