Delphi ActiveX
Delphi ActiveX
Find My External Public IP Address
See more HTTP Examples
To find your external public IP address (not your LAN IP address, such as 192.168.1.* or 172.16.16.*, etc), your application would need to send a request to an HTTP server that can report back on the origin IP address. You can easily write a simple script on your own web server to do it, or you can use a service such as ipify.org.This example shows how to send a request to the ipify.org endpoint to get your public IP address.
Chilkat Delphi ActiveX Downloads
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Chilkat_TLB;
...
procedure TForm1.Button1Click(Sender: TObject);
var
http: TChilkatHttp;
my_ip_address: WideString;
begin
http := TChilkatHttp.Create(Self);
my_ip_address := http.QuickGetStr('https://api.ipify.org');
if (http.LastMethodSuccess = 0) then
begin
Memo1.Lines.Add(http.LastErrorText);
Exit;
end;
Memo1.Lines.Add('My Public IP Address: ' + my_ip_address);
end;