void __fastcall TfrmSend::send()
{
switch(RadioGroup1->ItemIndex)
{
case 0:
sendpdu();
break;
case 1:
sendchinese();
break;
case 2:
sendbinary();
break;
case 3:
sendhex();
break;
case 4:
sendhex();
break;
default:
;

}
};

void __fastcall TfrmMain::RunTellWho1(AnsiString context)
{
AnsiString str_phone;
char *Parmater,phone[50],CenterNo[50];
WideString source;
wchar_t* ss=new wchar_t[140];
source=WideString(context);

wcscpy(ss,source.c_bstr());//机关就在这里,将汉字串由ascii串转换成unicode串，函数的使用，是由经验决定
Parmater=new char [100];
strcpy(Parmater,"DCS=00");
StrCopy(phone,frmSend->Edit8->Text.c_str());

if(frmSend->CheckBox1->Checked ==false)
StrCopy(CenterNo,"8613800459500");
else
StrCopy(CenterNo,"8613010980500");

CenterPhoneTrans(CenterNo,phone);
TimBatterya();
strcpy(Parmater,"DCS=08");
PcSendMessage(ss, Parmater,CenterNo,phone);

delete []ss;
delete []Parmater;

}