Ver Mensaje Individual
  #2  
Antiguo 02-11-2010
rrf rrf is offline
Miembro
 
Registrado: ago 2003
Ubicación: S/C Tenerife, España
Posts: 454
Reputación: 21
rrf Va por buen camino
Wink

Hola Cmfab.

Puedes utilizar el evento OnExit. Como en este ejemplo:

Código Delphi [-]
procedure TForm1.Edit1Exit(Sender: TObject);
begin
      // Validación del contenido de Edit1
      /////////////////////////////////////

   if not {condicion que debe cumplir el contenido del edit }
   then
     begin
       ShowMessage( 'mensaje al usuario de que hay un error' );
       Edit1.SetFocus ;  // Regresa el foco al edit con el contenido incorrecto
     end ;

end;

Espero que te sirva.

Saludos.
Responder Con Cita