Delphi: TIdUDPServer как настроить

TIdUDPServer используется следующим способом:

procedure TMainAppForm.FormCreate;
begin
    IdUDPServer1.Bindings.add.IP    := '127.0.0.1'; // как вариант адрес компьютера 
    IdUDPServer1.Bindings.add.Port  := 49152;
    IdUDPServer1.Active             := True;
    IdUDPServer1.OnUDPRead          := IdUDPServer1UDPRead;
end;

procedure TMainAppForm.IdUDPServer1UDPRead(AThread: TIdUDPListenerThread;
                                       const AData: TIdBytes;
                                       ABinding: TIdSocketHandle);
begin
    MessageBox(...);
end;

Почему-то не вызывается IdUDPServer1UDPRead, когда приходят UDP пакеты на данный порт.