IP Editor IP控件

HWND hIpEdit;

void __fastcall TForm2::FormCreate(TObject *Sender)
{

    hIpEdit = CreateWindow(WC_IPADDRESS, NULL, WS_CHILD | WS_VISIBLE, , , , , Handle, , HInstance, NULL);
}
// ---------------------------------------------------------------------------

void __fastcall TForm2::Button2Click(TObject *Sender)
{
    SendMessage(this->hIpEdit, IPM_CLEARADDRESS, , );
}
// ---------------------------------------------------------------------------

void __fastcall TForm2::Button3Click(TObject *Sender)
{
    int nIP;
    nIP = MAKEIPADDRESS(, , , );
    SendMessage(hIpEdit, IPM_SETADDRESS, , nIP);
}

// ---------------------------------------------------------------------------
void __fastcall TForm2::Button4Click(TObject *Sender)
{
    int nIP;
    SendMessage(hIpEdit, IPM_GETADDRESS, , int(&nIP));
    nIP++;
    SendMessage(hIpEdit, IPM_SETADDRESS, , nIP);

}
// ---------------------------------------------------------------------------

void __fastcall TForm2::Button5Click(TObject *Sender)
{
    SendMessage(hIpEdit, IPM_SETFOCUS, , );
}