Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.09.22;
Скачать: CL | DM;

Вниз

Почему процедура перестала выдавать имя компутера?   Найти похожие ветки 

 
MegaVolt ©   (2003-07-21 15:56) [0]

procedure TForm1.FormCreate(Sender: TObject);
var
WSAData : TWSAData;
Namebuf : Array[0..255] of char;
begin
WSAStartup($101, WSAData);
GetHostname(namebuf, sizeof(namebuf));
WSACleanup;
Host:=namebuf;
end;

Раньше она исправно выдавала имя компутера на котором запущена а теперь выдаёт имя рабочей группы где находится эта машина.
Как ещё можно узнать имя компутера?


 
Digitman ©   (2003-07-21 16:00) [1]


> Как ещё можно узнать имя компутера


GetComputerName()


 
MegaVolt ©   (2003-07-21 16:24) [2]

Большущее спасибо :)



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

Текущий архив: 2003.09.22;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.032 c
1-71644
scorpi
2003-09-09 06:50
2003.09.22
Создание объекта


1-71716
Kremen
2003-09-10 16:40
2003.09.22
Есть ли функция или оператор для сложения по модулю 2? Подскажите


14-71935
Basja
2003-09-02 15:16
2003.09.22
Тест кончился. про FTP клиенты


6-71807
Arhangel
2003-07-21 11:48
2003.09.22
indy компонент - IdMappedPortTCP


1-71583
Alek Aaz
2003-09-09 13:33
2003.09.22
Печать на принтер