1,317
社区成员
发帖
与我相关
我的任务
分享
void __fastcall TForm2::Button2Click(TObject *Sender)
{ //C是TIdUDPClient的名字
C->Send(Edit1->Text,TEncoding::Default);
}
void __fastcall TForm2::SUDPRead(TIdUDPListenerThread *AThread, TBytes AData, TIdSocketHandle *ABinding)
{ //S是TIdUDPServer的名字
RichEdit1->Lines->Add("本机发来消息:"+BytesToString(AData,TEncoding::Default));
}