Как узнать имя компьютера? |
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