Fórum IP INternet #328974
08/09/2006
0
Galara Como faço para pegar o ip da internet, no caso eu uso um modem adsl, mas a função que eu uso pega o ip da placa de rede e nao da internet, www.meuip.com.br
Guigosnet
Curtir tópico
+ 0
Responder
Posts
08/09/2006
Mahdak
idHttp1 = TIDHttp1
procedure TForm1.Button1Click(Sender: TObject); var strFull : string; begin strFull := idHttp1.Get(´http://www.meuip.com.br´); Edit_IP.Text := Copy(strFull,Pos(´<strong class="IP">´, strFull) + 19, 12); end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)