Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как узнать ip-адрес? [D7, WinXP]

Rembo2010 © (2010-10-31 23:55:00)
Доброго всем времени суток!) Скажите пожалуйста как узнать ip-адрес на компьютере НО НЕ ЛОКАЛЬНЫЙ?
Т.е. я написал прогу, которая должна будет на компе друга определить его ip и прислать его мне...

Очень злой (2011-06-23 11:51:00) [1]

> Как это нет? А 127.0.0.1 уже отменили?

Ну если это тоже считать, то кроме 127.0.0.1 там еще офигенный диапазон 127.0.0.0/8

Юрий Зотов (2011-06-11 20:46:00) [2]
Из чата:

xxx: Дайте мне IP какого-нить лоха, я его щас забаню
yyy: 127.0.0.1
System: xxx покинул чат

Dimka Maslov (2011-06-11 15:19:00) [3]

>
> Вот например у моего компа 2 IP-адреса:
> 192.168.12.237 и 192.168.2.10, других нет

Как это нет? А 127.0.0.1 уже отменили?

Очень злой (2011-06-11 14:59:00) [4]

> Rembo2010 (31.10.10 23:55)
>
> Доброго всем времени суток!) Скажите пожалуйста как узнать
> ip-адрес на компьютере НО НЕ ЛОКАЛЬНЫЙ?
> Т.е. я написал прогу, которая должна будет на компе друга
> определить его ip и прислать его мне...

И что тебе даст его IP-адрес?

Вот например у моего компа 2 IP-адреса:
192.168.12.237 и 192.168.2.10, других нет

Это тебе что-то даст?

Dennis I. Komarov (2011-06-06 09:33:00) [5]

> Т.е. я написал прогу, которая должна будет на компе друга
> определить его ip и прислать его мне...

За каким? Он тебе отправлять будет, вот и смотри IP отправителя...

Dennis I. Komarov (2011-06-06 09:32:00) [6]

> где уничтожение?

А на кой? Узнал чего хотел, а там трава не расти...

brother (2011-06-06 05:23:00) [7]
> b:=Tstream.Create;

где уничтожение?

zemich (2011-06-05 22:53:00) [8]
у меня была таая же проблема сегдня
вот код:
procedure TForm1.Button1Click(Sender: TObject);
var s:string;
b:Tstream;
begin
b:=Tstream.Create;
s:=idHTTP1.get(‘ http://www.myip.ru/’);
memo1.Lines.Text:=s;
end;

Anatoly Podgoretsky (2010-11-01 00:55:00) [9]
> Rembo2010 (01.11.2010 00:37:04) [4]

Там нечего распарсивать, там возвращается одна строка с адресом
Он уже распарсен.

Плохиш (2010-11-01 00:54:00) [10]
Для начала, надо прочитать названия закладок в панеле компонентов.

Anatoly Podgoretsky (2010-11-01 00:53:00) [11]
> Rembo2010 (01.11.2010 00:35:03) [3]

Для этого надо знать топологию или применять другие методы, например
обращение к внешнему ресурсу и там определять.

Rembo2010 (2010-11-01 00:37:00) [12]
Т.е. как бы из моей программы нужно пропарсить этот сайт? Как это сделать в delphi, как это сделать в delphi, объясните пожалуйста!

Rembo2010 (2010-11-01 00:35:00) [13]
Ну не на компьютере, тот который в интернете, например, вот есть такой сайт http://www.whatismyip.com/automation/n09230945.asp
и содержимое сайта состоит только из 1 строчки -твоего нелокального) IP-адреса, как его можно например в Memo или ListBox перевести программно?

Anatoly Podgoretsky (2010-11-01 00:23:00) [14]
> Rembo2010 (01.11.2010 00:09:01) [1]

На компьютере может не быть "внешнего" адреса - норма.

Rembo2010 (2010-11-01 00:09:00) [15]
Не локальный, т.е. внешний.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »