Delphi DLL

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.

Delphi DLL

uses
    Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
    Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Http;

...

procedure TForm1.Button1Click(Sender: TObject);
var
http: HCkHttp;
my_ip_address: PWideChar;

begin
http := CkHttp_Create();
my_ip_address := CkHttp__quickGetStr(http,'https://api.ipify.org');
if (CkHttp_getLastMethodSuccess(http) = False) then
  begin
    Memo1.Lines.Add(CkHttp__lastErrorText(http));
    Exit;
  end;

Memo1.Lines.Add('My Public IP Address: ' + my_ip_address);

CkHttp_Dispose(http);

end;