socket delphi

Question

Bonjours, Je débute avec les sockets et j'ai déjà des problèmes :S

j'ai un bout de code qui me permet de me connecter en local host et ca marche très bien par contre ca ne marche absolument pas si je met une adresse du genre monsite.no-ip.org.

SockAddrIn.sin_addr.S_addr:=inet_addr('127.0.0.1');

Si quelqu'un avait une solution merci d'avance :D

cs_osvaldege · Answer

J'ai trouvé merci

function getip(iip:string):String;
var ip:phostent;
    ipc:cardinal;
    ipa:array[1..4]of byte absolute ipc;
begin
  ip:=winsock.gethostbyname(pchar(iip));
  if ip=nil then begin
    result:='127.0.0.1';
    exit;
  end else begin
    ipc:=cardinal(pointer(ip^.h_addr_list^)^);
    ipc:=winsock.ntohl(ipc);
  end;
  result:=inttostr(ipa[4])+'.'+inttostr(ipa[3])+'.'+inttostr(ipa[2])+'.'+inttostr(ipa[1]);
end;

addr.sin_addr.S_addr:=inet_addr(pchar(getip('mydomain.no-ip.info')));

Socket delphi

1 réponse

Votre réponse

Discussions similaires