Ver Mensaje Individual
  #4  
Antiguo 28-12-2011
Avatar de Chris
[Chris] Chris is offline
Miembro Premium
 
Registrado: abr 2007
Ubicación: Jinotepe, Nicaragua
Posts: 1.678
Reputación: 21
Chris Va por buen camino
mmm creo entender lo que quieres Azid...

Según entiendo el problema, yo lo que haría sería implementar un mensaje de Windows a cómo sugieres y luego en el padre hacer la suma... por ejemplo así:

en las ventanas hijas, al seleccionar una celda o cerrar la ventana:
Código Delphi [-]
begin
    PostMessage(FormularioPadre.Handle, WM_SELECTEDCELLCHANGED, 0, 0);
end;

En el formulario padre:
Código Delphi [-]
...
protected
    procedure SumarCeldas(Message: TMessage); message WM_SELECTEDCELLCHANGED;
...
...

procedure TFormularioPadre.SumarCelda(Message: TMessage);
var
    I, B: Integer;
    selected_sum: Integer;
begin
    for I := to Screen.FormCount - 1 do
        if Screen.Forms[i].inheritsFrom(TAncestroVentanaHija) then
            with TAncestroVentanaHija(Screen.Forms[i]).Regilla do
                // sumar las celdas seleccionadas utilizando
                // la propiedad SelectedRows del grid.
end;

Saludos!
Espero que hallas entendido mi pseudo código y te ayude a resolver el problema.
__________________
Perfil Github - @chrramirez - Delphi Blog - Blog Web
Responder Con Cita