Ver Mensaje Individual
  #1  
Antiguo 03-02-2006
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 22
Caro Va por buen camino
Evento OnExit de un Edit

Hola a todos

Como puedo saber que en el momento que se ejecute el evento onexit de un edit, hacer una verificación si el nuevo componente al que esta ingresando es otro edit, si la verificación sale que no es correcto no dejarle salir del edit hasta que ponga algo correcto, pero si el siguiente componente al que quiere ingresar no es otro edit y es un treview no hacer la verificación y dejar que tenga el foco el treview, cualquier idea o sugerencia sera bienbenida.

Estaba intentando con lo siguiente:

Código Delphi [-]
procedure TForm1.edit1Exit(Sender: TObject);
var
    verificar,componente_activo:STring;
begin
     componente_activo:=Form1.ActiveControl.Name;
     
     IF componente_activo<>nombre_treeview THEN
     begin
            //Aqui hago la verificación
           verificar:=verificarCod;
           IF verificar=0 THEN
               edit.SetFocus;
     end;
end;

Pero me sale error Access Violation cuando intento obtener el nombre del control activo

Muchas Gracias por adelantado y que tengan un bonito dia
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita