void __fastcall TForm1::WndProc(TMessage &Msg) { LPNMHDR p=(LPNMHDR)Msg.LParam; if(Msg.Msg==WM_NOTIFY) { if(p-> code==IPN_FIELDCHANGED) { //处理IP控件的IPN_FIELDCHANGED通知消息 } } TForm::WndProc(Msg); }