🚀 go-pugleaf

Hi all,
I coded a simple UDP Client/Server application.
The problem I have is that when I broadcast using the Client, the OnUDPRead of the Server is fired 2 times, so I receive every data doubled.
If I send datas to a target IP all works fine.
This is a snip of code:

Client--
---
Properties:
Active = true
BroadcastEnabled = true
BufferSize = 8192
Host = (empty string)
Port = 9999
ReceivedTimeout = -2
---
Send function used
UDPClient->Broadcast(Memo1->Lines->Text, 9999);

---
Server
---
Properties:
Active = true
Bindings = (empty)
BroadcastEnabled = true
BufferSize = 8192
DefaultPort = 9999
ThreadedEvent = false
---
Receive function used
void __fastcall TForm1::UDPServerUDPRead(TObject *Sender, TStream *AData,
	  TIdSocketHandle *ABinding)
{
	AnsiString Text="";

	if(AData->Size>0) {
	        int Len=AData->Size-AData->Position;
		Text.SetLength(Len);
		AData->Read(&Text[1], Len);
		Memo1->Lines->Add(Text);
	}
}
---
This function is called twice.

Can anybody help me?
Thanks in advance

Lapo