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

Здравствуйте, подкинте плз примерчик вызова GetHostName...   Найти похожие ветки 

← →
-=[SDA]=- ©   (2004-02-27 07:31) [0]

Пытаюсь узнать имя машины...

var
HName : string;
begin
len := 30;
err := GetHostName(PChar(HName), len);
ShowMessage(HName);

....но получаю пустую строку. Не могу понять в чем ошибка!!! :(
Помогите, рлз....

---

← →
Anatoly Podgoretsky ©   (2004-02-27 07:45) [1]

А размер HName Пушкин будет делать

---

← →
Silver Alex ©   (2004-02-27 09:13) [2]

..
var
aname: array[0..255] of char;
begin
gethostname(name, sizeof(aname)) ;
Label1.Caption := aname;
end;

---

← →
Гаврила   (2004-02-27 10:44) [3]

>>Silver Alex © (27.02.04 09:13) [2]
все таки наверно sizeof(aname) - 1
или же High(aname), что тоже самое
для учета нулевого терминатора

---

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

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



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