如何在控制台应用程序中使用TIdUDPServer？

uses IdUDPServer;

TIdUDPServer *UDPServer = new TIdUDPServer(NULL);
UDPServer->DefaultPort = 12345;
UDPServer->Bindings = "192.168.1.100";

void __fastcall TMyForm::UDPServerUDPRead(TIdUDPListenerThread *AThread,
  const TIdBytes &AData, TIdIPEndpointInfo *AEndpoint)
{
  // 在这里处理接收到的数据包
}

void __fastcall TMyForm::UDPServerUDPRead(TIdUDPListenerThread *AThread,
  const TIdBytes &AData, TIdIPEndpointInfo *AEndpoint)
{
  String sData = BytesToString(AData);
  WriteLn("Received data: " + sData);
}

UDPServer->Active = true;

UDPServer->Active = false;
delete UDPServer;