![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Почему процедура перестала выдавать имя компутера?
MegaVolt © (2003-07-21 15:56:00)
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;
Раньше она исправно выдавала имя компутера на котором запущена а теперь выдаёт имя рабочей группы где находится эта машина.
Как ещё можно узнать имя компутера?
MegaVolt (2003-07-21 16:24:00) [1]
Большущее спасибо :)
Digitman (2003-07-21 16:00:00) [2]
> Как ещё можно узнать имя компутера
GetComputerName()