Здравствуйте, подкинте плз примерчик вызова 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), что тоже самое
для учета нулевого терминатора

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