Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c