Hi,
nach dem Update von
Indy 9 auf
Indy 10 wurden die Parameter des o.g. Event umgestellt.
Die alte Routine lautetet
Delphi-Quellcode:
procedure Tserver.UDPServer_Read(Sender: TObject; AData: TIdBytes; ABinding: TIdSocketHandle)
var
DataString : string[255];
SenderIP : String ;
begin
SetLength(SenderIP, AData.Size);
AData.Read(SenderIP[1], AData.Size);
DataString := 'Werte gelesen: '+SenderIP ;
With ABinding do
SendTo(SenderIP, PeerPort, DataString[1], Length(DataString));
End;
Die neue hat folgende Parameter:
procedure TServer.UDPServer_Read( AThread: TIdUDPListenerThread; AData: TIdBytes; ABinding: TIdSocketHandle) ;
Die Hilfe und die Demos hinken der aktuellen Version 10.2.3 leider hinterher.
Ich kann mit der Variable vom Type TIdUDPListenerThread nichts anfangen.
Ich benötige eine möglichst lauffähige Demo zum UDPServer und UDPClient.
Zum TCPServer und TCPClient kann schon fast die Demo liefern?
Gruß Ralf