Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 30-05-2014
jilc1111 jilc1111 is offline
Registrado
 
Registrado: jul 2013
Posts: 3
Poder: 0
jilc1111 Va por buen camino
Botones de Accion Formulario MDI

Buenas tardes.

Estoy desarrollando una aplicacion MDI en Delphi 2010, en cada formulario MDIChild he creado procedimientos con el mismo nombre. Ejemplo:
Código Delphi [-]
Procedure Isertar;
Procedure Editar;
Procedure Borrar;

Quiero que desde el Formulario MDI(Padre) al presionar un botón se ejecute en el MDIChild la acción correspondiente haciendo uso del comando ActiveMDIDhild sin importar cual de los Formularios MDIChild sea el que se encuentra activo. Ejemplo:
Código Delphi [-]
procedure FrmPadre.btnInsertarClick;
begin
   ActiveMDIChild.Insertar;
end;

Espero haber sido lo suficientemente claro y me puedan ayudar. De ante mano muchas gracias.
Responder Con Cita
  #2  
Antiguo 30-05-2014
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.206
Poder: 10
roman Tiene un aura espectacularroman Tiene un aura espectacular
Lo que yo haría es establecer un formulario MDI base con los métodos que mencionas y del cual hereden los demás. Entonces, en tu código del formulario principal pondrías algo como esto:

Código Delphi [-]
procedure FrmPadre.btnInsertarClick;
begin
   (ActiveMDIChild as TBaseChild).Insertar;
end;

// Saludos
Responder Con Cita
  #3  
Antiguo 31-05-2014
jilc1111 jilc1111 is offline
Registrado
 
Registrado: jul 2013
Posts: 3
Poder: 0
jilc1111 Va por buen camino
Hola Roman

Muchas gracias por tu respuesta.

Lo resolví creando los botones en el MDI Padre sin código en el evento OnClick y en el evento FormActivate de cada Formulario MDIChild asigno al evento OnClick de cada botón del Padre el evento del Child que quiero que ejecute.

Ejemplo MDI Child:

Código Delphi [-]
procedure TFormChild1.Mensaje;
begin
  ShowMessage(Self.Caption);
end;

procedure TFormChild1.FormActivate(Sender: TObject);
begin
  MainForm.btn1.OnClick := Self.Mensaje;
end;

Espero que sirva de guía para alguien mas con el mismo dilema.


Saludos.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
Crear formulario,botones y edit con apis de windows sin vcl force1758 Varios 11 12-08-2013 22:46:19
Accion con botones del teclado krewer Varios 3 06-03-2012 23:54:38
Linkar varios botones sobre un mismo formulario mieltxo HTML, Javascript y otros 5 25-01-2008 22:59:40
3 botones para acceder a un mismo formulario. VRO Varios 9 05-09-2007 03:08:32
Desea continuar? SI NO CANCELAR (3 Botones en el formulario) dmassive PHP 3 26-08-2005 20:22:08


La franja horaria es GMT +2. Ahora son las 21:46:02.


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