mira ...
Publicado por Ricardo López (18 intervenciones) el 10/08/2002 23:51:49
En un formulario con dbedits normalmente para validarlos se hace ya sea con el evento OnValidate o también en el evento OnExit del dbedit.
Pero si se trata de componentes EDIT, yo personalmente me gusta hacerlo asi:
Tengo mi formulario con varios controles edit, los cuales llevan u orden segun el TabOrder de cada uno.
Comienzo mi captura y cuando dejo de ingresar algún valor o ingreso uno que no sea el correcto, no me deja pasar a capturar el siguiente de la siguiente manera:
El evento OnExit del Edit;
if(Edit.Text = '')or(Edit.text = 'dato incorrecto')then
begin
showmessage('Dato incorrecto');
activecontrol := Edit;
end;
de esa manera no me permite avanzar al siguiente edit, sino hasta que capture el dato correcto.
Espero esto te sirva.
Pero si se trata de componentes EDIT, yo personalmente me gusta hacerlo asi:
Tengo mi formulario con varios controles edit, los cuales llevan u orden segun el TabOrder de cada uno.
Comienzo mi captura y cuando dejo de ingresar algún valor o ingreso uno que no sea el correcto, no me deja pasar a capturar el siguiente de la siguiente manera:
El evento OnExit del Edit;
if(Edit.Text = '')or(Edit.text = 'dato incorrecto')then
begin
showmessage('Dato incorrecto');
activecontrol := Edit;
end;
de esa manera no me permite avanzar al siguiente edit, sino hasta que capture el dato correcto.
Espero esto te sirva.
Valora esta pregunta
0