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

Вниз

IP адрес удаленной машины?   Найти похожие ветки 

 
aleshap   (2005-05-12 11:38) [0]

Добрый день!

Такой специфический вопрос.

Каким образом программно определить IP или имя компьютера подключенного к удаленному "Рабочему столу", т.е. мое приложение запускается на сервере на удаленном рабочем столе, необходимо узнать, с какой машины (ip-адрес) произошло соединение с сервером?

Все стандартные функции определения  имя компьютера(ip-адреса) выдают информацию лишь только о сервере.
procedure TForm1.Button1Click(Sender: TObject);
Var szName : Array[0..100] of Char;
     Name : String;
     n:Cardinal;
begin
 n:=100;  
 GetComputerName(szName,n);
 name:=StrPas(szName);
 Label1.Caption:=Name;
 n:=100;
 GetUserName(szName,n);
 name:=StrPas(szName);
 Label2.Caption:=Name;
end;


 
aleshap   (2005-05-12 14:18) [1]

Что никто не сталкивался?????


 
VMcL ©   (2005-05-12 16:01) [2]

WTSQuerySessionInformation
?



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

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

Наверх




Память: 0.47 MB
Время: 0.024 c
1-1122930722
Asteroid
2005-08-02 01:12
2005.08.21
Крыша едет с динмаическими массивами...


4-1120035773
DarkSet
2005-06-29 13:02
2005.08.21
открытие файла приложением


3-1121055385
zvb
2005-07-11 08:16
2005.08.21
что за файлы вида _QSQ2.DB?


4-1119592168
NikNet
2005-06-24 09:49
2005.08.21
Как старшее и младшое слово сделать DWORD? на DELPHI.


1-1122555255
BFG9k
2005-07-28 16:54
2005.08.21
Одновременное скроллирование