Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 21-06-2007
Avatar de gluglu
[gluglu] gluglu is offline
Miembro Premium
 
Registrado: sep 2004
Ubicación: Málaga - España
Posts: 1.455
Poder: 21
gluglu Va por buen camino
Devolver foco desde Form No Modal al control llamante

Hola Amigos !

Intento devolver el foco desde un Form No Modal en el momento de cerrarlo al control y form que lo llamaron, y a la vez liberarlo y cerrarlo correctamente.

Pero mi problema aparece que cuando intento hacer esto en el form no modal :
Código Delphi [-]
procedure TF_ClientSearch.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  if Focus_Form    <> nil then Focus_Form.SetFocus;
  if Focus_Control <> nil then Focus_Form.SetFocusedControl(Focus_Control);
end;
antes de la terminación del evento FormClose me devuelve de hecho el foco al control que lo llamó (utilizo dos variables auxiliares, Focus_Form y Focus_Control), pero prosigue la ejecución en el otro form y no puedo cerrar y liberar F_ClientSearch.

Gracias por vuestra ayuda.
__________________
Piensa siempre en positivo !
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Cambiar foco desde otro form Sandy656 Varios 3 25-08-2006 14:29:41
Form modal deja que el form llamante tome el foco tata Varios 6 17-05-2006 11:51:37
Acceder a form modal desde módulo de datos jcheco Varios 3 31-01-2006 17:18:22
Devolver el foco a aplicacion Coco_jac Varios 2 13-10-2005 16:38:33
Saber si una Form es modal Delfino Varios 3 18-09-2005 04:12:14


La franja horaria es GMT +2. Ahora son las 11:47:14.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi