Ver Mensaje Individual
  #4  
Antiguo 04-10-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 24
Caro Va por buen camino
Cita:
Empezado por FGarcia Ver Mensaje
ahora me gustaria saber como hacer que si la ventana principal se mueve entonces la ventana secundaria se mueva con ella
Hola FGarcia, para hacer que tu ventana secundaría se mueva cuando se mueve la principal puedes capturar el mensaje y preguntar si es SW_MOVE.

Código Delphi [-]
  procedure SYSCOMMAND(var Msg: TMessage); message WM_SYSCOMMAND;
................
................
procedure TForm1.SYSCOMMAND(var Msg: TMessage);
begin
 Inherited;
 if (Msg.WParam and $FFF0)= SC_MOVE then
  begin
   Form2.Left := Self.Left;
   Form2.Top := Self.Top + Self.Height;
  end
end;

Ahí mismo puedes preguntar si la secundaría estaría minimizada, si es así lo restauras

Saluditos
__________________
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