Текущий архив: 2003.03.20;
Скачать: CL | DM;
Вниз
Как определить имя компьютера и описание компьютера ? Найти похожие ветки
← →
SeNtiMeL © (2003-03-07 00:09) [0]Как определить имя компьютера и описание компьютера ?
Я знаю, что вроде это
GetComputerName, но у меня нехватает знаний по WinApi, чтобы использовать ее, справка ничего не дает....
← →
Anatoly Podgoretsky © (2003-03-07 01:43) [1]Тогда не используй, если уж это сложно.
← →
Intell © (2003-03-07 06:07) [2]Если нужны вопросы по ресурсам компа, то свистни по мылу -
sergein@nojabrsk.ru
пришлю тебе хороший учебник - там есть и имя пользователя, и ресурсы, и т.п.
← →
крот © (2003-03-07 06:10) [3]
function GetLocalName(): string;
var
Buffer: Array[0..MAX_COMPUTERNAME_LENGTH];
size: cardinal;
begin
size = MAX_COMPUTERNAME_LENGTH + 1;
if GetComputerName(Buffer, size) then
SetString(Result, Buffer, size);
else
Result := "Local Host";
end;
← →
SeNtiMeL © (2003-03-07 18:30) [4]Спасибо....
← →
SeNtiMeL © (2003-03-07 18:41) [5]да, в коде маленькая ошибка:
Buffer: Array[0..MAX_COMPUTERNAME_LENGTH];
а нужно:
Buffer: Array[0..MAX_COMPUTERNAME_LENGTH] of Char;
Страницы: 1 вся ветка
Текущий архив: 2003.03.20;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.038 c
