Как узнать имя компьютера?

Previous  Top  Next

    
 

 

Чтобы узнать имя, идентифицирующее компьютер в сети, на котором запущена Ваша программа, можно воспользоваться следующей функцией:

Code:

uses Windows;

 

function GetComputerNetName: string;

var

buffer: array[0..255] of char;

size: dword;

begin

size := 256;

if GetComputerName(buffer, size) then

  Result := buffer

else

  Result := ''

end;

 

 

©Drkb::03298

Взято из http://forum.sources.ru