Minimizar al trayicon

[ecfisa]

Hola aguml.

Empezado por aguml

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(TMessage& Message);
protected:
   BEGIN_MESSAGE_MAP
      MESSAGE_HANDLER(WM_SYSCOMMAND, TWMSysCommand, OnWMSysCommand)
   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_SYSCOMMAND, TWMSysCommand, WMSysCommand)
  END_MESSAGE_MAP(TForm)

__published:

public:
  __fastcall TForm1(TComponent* Owner);
};
extern PACKAGE TForm1 *Form1;
... 


Código PHP:

...
void __fastcall TForm1::WMSysCommand(TWMSysCommand &Msg)
{
  switch (Msg.CmdType) {
    case SC_MINIMIZE: ShowMessage("Minimize");break;
    case SC_RESTORE : ShowMessage("Restore"); break;
    case SC_MAXIMIZE: ShowMessage("Maximize");break;
  }
  DefaultHandler(&Msg);
}
... 


Saludos