Bonjour amis développeurs,

Voici mon problème depuis un certains temps je n'arrive plus à faire fonctionner correctement la fonction GetLocalIP() issue de la FAQ. Le problème vient du dernier if que je n'arrive pas à passer :

Le code source complet :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
 
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------
AnsiString TForm1::getLocalIP()
{
	WORD wVersionRequested;
	WSADATA wsaData;
	char name[255];
	AnsiString ip = "Aucune ip trouvée.";
	PHOSTENT hostinfo;
	wVersionRequested = MAKEWORD( 2, 0 );
	if ( WSAStartup( wVersionRequested, &wsaData ) == 0 )
	{
		if ( gethostname ( name, sizeof(name)) == 0) // nom de l'ordinateur
		{
			if((hostinfo = gethostbyname(name)) != NULL)
			{
				// récupération de l'ip
				ip = inet_ntoa (*(in_addr *)*hostinfo->h_addr_list);
			}
		}
		WSACleanup( );
	  }
	return ip;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  AnsiString ip1 = getLocalIP();
  ShowMessage(ip1);
}
//---------------------------------------------------------------------------
La partie qui me pose problème :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
if((hostinfo = gethostbyname(name)) != NULL)
{
     // récupération de l'ip
     ip = inet_ntoa (*(in_addr *)*hostinfo->h_addr_list);
}
Dans mon Unit.h :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <winsock2.h>
Merci d'avance.


[EDIT :] Testé sur un OS virtuel, l'application marche correctement... Quelqu'un aurait-il une idée maintenant que je sais que mon programme n'est pas fautif ?