Главная страница
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.033 c
14-71876
_0$a_
2003-09-03 17:49
2003.09.22
Вот дожился или (основные функции МС дос)


1-71649
Thor
2003-09-08 23:25
2003.09.22
помогите с TMonthCalendar


6-71782
Nick
2003-07-21 08:03
2003.09.22
файл на сервере...


7-71962
evg12
2003-06-28 05:15
2003.09.22
Серийный номер HDD


14-71867
Layner
2003-09-01 09:29
2003.09.22
Помогите найти RX для