Текущий архив: 2004.10.31;
Скачать: CL | DM;
Вниз
Имя компьютера Найти похожие ветки
← →
MakNik (2004-09-23 17:59) [0]Подскажите, плз., как узнать имя компьютера?
← →
Квэнди © (2004-09-23 18:01) [1]Какого компьютера?
← →
MakNik (2004-09-23 18:14) [2]Сетевое имя ПК на котором запущено приложение
← →
Defunct © (2004-09-23 18:20) [3]Мой компьютер -> свойства
А если серьезно, практически любой сетевой компонент e.g. TClientSocket, TTCPSocket и т.п. предоставляет поле HOST или LocalHost вот его и читайте.
← →
Rem (2004-09-23 18:29) [4]GetComputerName();
:)
← →
MakNik (2004-09-24 10:28) [5]
> Rem (23.09.04 18:29) [4]
...а можно пример использования этой ф-ции (включая объявления переменных)...
← →
Плохиш © (2004-09-24 10:37) [6]
> 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 12:24) [7]
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;
Страницы: 1 вся ветка
Текущий архив: 2004.10.31;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.051 c
