13,825
社区成员
发帖
与我相关
我的任务
分享
void __fastcall TForm1::FormCreate(TObject *Sender)
{
OldWindowProc = Button1->WindowProc;
Button1->WindowProc = NewWindowProc;
}
class TForm1 : public TForm
{
__published: // IDE-managed Components
TButton *Button1;
void __fastcall FormCreate(TObject *Sender);
private: // User declarations
void __fastcall NewWindowProc(Messages::TMessage &Message);
TWndMethod OldWindowProc ;
public: // User declarations
__fastcall TForm1(TComponent* Owner);
};
void __fastcall TForm1::FormCreate(TObject *Sender)
{
OldWindowProc = Button1->WindowProc;
}
//---------------------------------------------------------------------------
void __fastcall TForm1:: NewWindowProc(Messages::TMessage &Message)
{
//————————你的消息处理
OldWindowProc(Message);
}