Ver Mensaje Individual
  #5  
Antiguo 28-10-2014
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola aguml.
Cita:
Empezado por aguml Ver Mensaje
Hola amigos, tengo esto:
Código PHP:
private:    // User declarations
   // Capturar mensajes al form
  
void __fastcall OnWMSysCommand(TWMSysCommand &Msg); //message WM_SYSCOMMAND;
  
TWndMethod OldWMSysCommand;
  
void __fastcall NewWMSysCommand(TMessageMessage);
protected:
   
BEGIN_MESSAGE_MAP
      MESSAGE_HANDLER
(WM_SYSCOMMANDTWMSysCommandOnWMSysCommand)
   
END_MESSAGE_MAP(TForm
...

y no me compila dando el error:

¿Me podeis ayudar?
Fuera de tópico, mas allá de la explicación sobre el componente que te ha dado escafandra, para cualquier otro caso ese código no va a funcionar.

Debería bastar con:
Código PHP:
...
class 
TForm1 : public TForm
{
private:
  
void __fastcall WMSysCommand(TWMSysCommand &Msg);

protected:
  
BEGIN_MESSAGE_MAP
  VCL_MESSAGE_HANDLER
(WM_SYSCOMMANDTWMSysCommandWMSysCommand)
  
END_MESSAGE_MAP(TForm)

__published:

public:
  
__fastcall TForm1(TComponentOwner);
};
extern PACKAGE TForm1 *Form1;
... 
Código PHP:
...
void __fastcall TForm1::WMSysCommand(TWMSysCommand &Msg)
{
  switch (
Msg.CmdType) {
    case 
SC_MINIMIZEShowMessage("Minimize");break;
    case 
SC_RESTORE ShowMessage("Restore"); break;
    case 
SC_MAXIMIZEShowMessage("Maximize");break;
  }
  
DefaultHandler(&Msg);
}
... 
Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 28-10-2014 a las 00:11:22.
Responder Con Cita