Bonjour,
Sur mon Raspberry PI, j'ai un petit serveur très simple:
procedure TForm1.FormCreate(Sender: TObject);
begin
IdTcpServer.DefaultPort:= 5678;
IdTcpServer.Active:= True;
end;
procedure TForm1.IdTCPServerConnect(AContext: TIdContext);
begin
AContext.Connection.IoHandler.WriteLn('Hello. Connecté au PI');
end;
procedure TForm1.IdTCPServerExecute(AContext: TIdContext);
begin
IdTcpServer.Active:= True;
end;
Quand je lance le programme j'ai une erreur:
Socket Error # 98
Address already in use.
Si je change le port 5678, pour autre chose, c'est toujours pareil!
Je patine là.
Merci