Вниз
Скачать: CL | DM;

Можно ли с помощью API узнать имя локального компьютера?   Найти похожие ветки 

 
Begemoth ©   (2001-11-12 16:08) [0]

Хочу в программе, при ее загрузке, узнавать имя локального компьютера. Можно ли это сделать с помощью какой-либо АПИ-функции?


 
paul_shmakov ©   (2001-11-12 16:15) [1]


function MyComputerName: string;
var
ComputerName: array [0..100] of Char;
Size: Cardinal;
begin
Size := SizeOf(ComputerName);
GetComputerName(ComputerName, Size);
Result := ComputerName;
end;


 
Begemoth ©   (2001-11-12 16:24) [2]

Спасибо!!!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
1-42411
Bar
2001-12-25 20:34
2002.01.14
GetVolumeInformation неодинаково ведет себя под 98/Me и NT


3-42385
NLO
2001-12-07 12:26
2002.01.14
start transaction commit в процедуре InterBase 6


4-42599
Abajun
2001-11-13 11:57
2002.01.14
Вызов функции по адресу


1-42473
vitaminchik
2001-12-25 12:54
2002.01.14
Хранение данных в файлы


1-42435
Phisio
2001-12-24 15:01
2002.01.14
Выбор нескольких объектов




   Наверх