Hallo,
ich hab ein kleines Problem mit dem UDP Server von den Indys in einem Konsolenprogramm:
UDPRead wird nicht aufgerufen. Der Broadcast funktioniert und die Antwort kommt auch (mit Wireshark überprüft). udp.ReceiveString funktioniert auch.
Was mach ich falsch?
Delphi-Quellcode:
type
TUDPRead = class
procedure UDPRead(Sender: TObject; AData: TBytes;
ABinding: TIdSocketHandle);
end;
var
readUDP : TUDPRead;
udp : TIdUDPServer;
procedure TUDPRead.UDPRead(Sender: TObject; AData: TBytes; ABinding: TIdSocketHandle);
begin
Writeln('read');
end;
begin
udp := TIdUDPServer.Create(nil);
udp.OnUDPRead := readUDP.UDPRead;
udp.Broadcast(cast, 1900);
ReadLn;
end.