Discussion :

[néo333]

Bonjour à tous !!! je n'arrive pas a affciher le nom de ma machine pourtant le code me seble correcte Merci !!!

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
program toto;
 
 
uses winsock,windows,sysutils;
 
Var name:array [0..200] of char;
 
 
var nom:PHostEnt;
 
 
begin
 
nom:=gethostbyname(name);
writeln(name);
readln;
end.

[M.Dlb]

C'est normal si ca marche pas, ce n'est pas la bonne fonction que tu as utilisé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
var HostName: array[0..255] of Char; 
begin
GetHostName(HostName, SizeOf(HostName)); 
writeln(HostName);  //pas sûr que cette ligne marche... 
end.

GetHostByName permet de récupérer des infos sur l'ordi à partir du nom de l'ordinateur, donc on ne peut pas s'en servir pour récupérer le nom !
a+

[Eric Sigoillot]

Tu te sers de morceaux de programmes sans en comprendre le fonctionnement ! Ca ne peut que ne pas fonctionner...

GetHostByName est une fonction WinSock : il est nécessaaire de l'avoir initialisé auparavant, ce qui n'est absolument pas fait ici...

Ca ne marchera donc jamais fait comme ça.

A+