Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.14;
Скачать: [xml.tar.bz2];




Вниз

Подскажите или укажите место, где прочитать о определении IP или Имени компьютера 


Kouzmine   (2001-12-06 12:08) [0]

Запускается программа и должна заполнить или свой IP адрес или имя пользователя



Igorok   (2001-12-06 17:31) [1]

если правильно понял, необходимо узнать IP адресс или хост компа на котором запускается программа, если так то все это берется в реестре винды, почитай про работу с реестром.
Удачи!



SergVlad   (2001-12-06 23:05) [2]

GetUserName(..);



Oleg Gashev   (2001-12-08 22:21) [3]

function GetIP:string;
var WSAData : TWSAData;
p:PHostEnt;
Name:array [0..$FF] of Char;
err:integer;
begin
try
err:=WSAStartup($0101, WSAData);
if (err=0) then begin
GetHostName(name, $FF);
p := GetHostByName(Name);
result:=inet_ntoa(PInAddr(p.h_addr_list^)^)+" ["+strpas(name)+"]";
WSACleanup;
end else result:="No Networking";
except
result:="No IP?!";
WSACleanup;
end;
end;



(C) MrBeer




Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.036 c
7-43209           Новичек123            2001-12-03 22:51  2002.03.14  
Приветствую! Необходимо создать небольшой этулятор клавиатуры, нашимаем на кнопку со знаком 5 и в лебел появляется 5, нашимаем на 6 и в лебел 56


14-43152          Diana                 2002-01-29 21:42  2002.03.14  
Подскажите, что я не так делаю...


7-43205           a                     2001-12-09 09:03  2002.03.14  
можно ли освободить com порт от мышки на ходу, т.е.


3-42940           Konung                2002-02-12 15:55  2002.03.14  
Подстановочные (lookup) поля. Создание из программы.


1-43087           ProfiUglq             2002-02-27 12:02  2002.03.14  
Вопрос по поводу кодов ошибок