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.