Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.02;
Скачать: CL | DM;

Вниз

Как вывести локальное имя компьютера?   Найти похожие ветки 

 
IBSN   (2003-08-01 19:52) [0]

Здравствуйте!
Как вывести локальное имя компьютера?
Пробовал:
GetHostByName

подскажите кодик...


 
AlexRush ©   (2003-08-01 20:16) [1]

GetComputerName


 
IBSN   (2003-08-01 20:18) [2]

А как его применять в коде???


 
AlexRush ©   (2003-08-01 20:38) [3]

procedure TForm1.FormCreate(Sender: TObject);
var a:packed array[0..255] of char;
( @a[0],255) procedure TForm1.FormCreate(Sender: TObject);
var a:packed array[0..255] of char;
size:DWORD;
begin
ZeroMemory(@a[0],255);
size:=255;
GetComputerNameA(@a[0],size);
Edit1.Text:=string(Pchar(@a[0]));
end;



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

Текущий архив: 2003.10.02;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.025 c
4-4167
LOX
2003-07-30 10:11
2003.10.02
поверх всех окон.


1-3970
Alex
2003-09-20 02:06
2003.10.02
Мультмедия


1-3986
DBDev
2003-09-19 18:32
2003.10.02
как имея текущую дату вычислить порядковый номер недели


14-4112
iNew
2003-09-13 17:13
2003.10.02
Замыльте кто-нибудь или дайте ссылку.


7-4146
Fider58
2003-07-21 02:07
2003.10.02
TListView и поддержка тем XP(Visual Styles) - ошибка