Вниз
Скачать: 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.013 c
3-42378
well
2001-12-10 15:02
2002.01.14
SQL & paradox


14-42560
VEG
2001-11-18 22:34
2002.01.14
Крупный шрифт


1-42449
Mitrofan
2001-12-24 19:28
2002.01.14
Быстрое преобразование Фурье


7-42584
Leon
2001-08-23 22:17
2002.01.14
Серийный номер материнской платы


4-42594
foks
2001-11-11 09:28
2002.01.14
function AppendMenu(Menu: HMenu; Flags, IDNewItem: PChar): Bool;




   Наверх