Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Delphi DLL) Find My External Public IP AddressSee more HTTP ExamplesTo 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. For more information, see https://www.ipify.org/
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; |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.