![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Имя компьютера [D5, Win95/98, WinME, NT4, Win2k, WinXP]
MakNik © (2004-09-23 17:59:00)Подскажите, плз., как узнать имя компьютера?
MakNik (2004-09-24 12:24:00) [1]
procedure TForm1.cmdGetComNameClick(Sender: TObject);
var
cEmptyBuffer: array [0..32] of char;
nSize:Integer;
begin
nSize:= 32;
cEmptyBuffer:='';
GetComputerName(cEmptyBuffer, nSize);
MessageBox(0,cEmptyBuffer,'Computer Name',MB_OK);
end;
Плохиш (2004-09-24 10:37:00) [2]
> MakNik (24.09.04 10:28) [5]
http://search.yahoo.com/search?p=GetComputerName&ei=UTF-8&fr=FP-tab-web-t-145&cop=mss&tab=
MakNik (2004-09-24 10:28:00) [3]
> Rem (23.09.04 18:29) [4]
...а можно пример использования этой ф-ции (включая объявления переменных)...
Rem (2004-09-23 18:29:00) [4]GetComputerName();
:)
Defunct (2004-09-23 18:20:00) [5]Мой компьютер -> свойства
А если серьезно, практически любой сетевой компонент e.g. TClientSocket, TTCPSocket и т.п. предоставляет поле HOST или LocalHost вот его и читайте.
MakNik (2004-09-23 18:14:00) [6]Сетевое имя ПК на котором запущено приложение
Квэнди (2004-09-23 18:01:00) [7]Какого компьютера?