u_initcall.~cpp

wimax bs simulator对应的GUI程序

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "U_initcall.h"
#include "common.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFormInitCall *FormInitCall;
extern AnsiString gSourceIp;
extern BS_ACTION_S bsAction;
//---------------------------------------------------------------------------
__fastcall TFormInitCall::TFormInitCall(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TFormInitCall::FormClose(TObject *Sender,
      TCloseAction &Action)
{
        MainForm->Enabled = true;        
}
//---------------------------------------------------------------------------
void __fastcall TFormInitCall::ButtonInitCallClick(TObject *Sender)
{
        if(EditMsNum->Text != "")
        {
                memset(&bsAction,0,sizeof(BS_ACTION_S));

                bsAction.purpose = BS_CALL_INIT;
                bsAction.u.msNum = htonl(StrToInt(EditMsNum->Text.c_str()));

                MainForm->NMUDPAction->RemoteHost = gSourceIp;
                MainForm->NMUDPAction->RemotePort = ACTION_UDP_PORT;
                MainForm->NMUDPAction->ReportLevel = Nmudp::Status_Basic;
                MainForm->NMUDPAction->SendBuffer((char *)&bsAction,sizeof(bsAction),sizeof(bsAction));

                FormInitCall->Visible = false;
                MainForm->Enabled = true;
        }
        else
        {
                ShowMessage("MsNum is empty!");
                FormInitCall->Visible = false;
                MainForm->Enabled = true;
        }
}
//---------------------------------------------------------------------------