IPGeoLocation
v1.5.3

IP 지리적 위치 라이브러리.
델파이 언어로 구현 된이 회사는 유창한 인터페이스 개념을 사용하여 라이브러리 사용을 안내합니다.
라이브러리는 승인 된 공급자 목록에 첨부 된 "IP-Goolocation"솔루션 시장의 주요 업체를 사용하여 개발했습니다.
IP 주소 -기반 지리적 위치는 IP 주소를 사용하여 인터넷에 연결된 장치의 지리적 위치를 추정하는 데 사용되는 기술입니다. 이 메커니즘은 장치의 IP 주소가 해당 위치, 우편 주소, 도시, 국가, 지역 또는 지리적 좌표가있는 데이터베이스에 나타나는데, 이는 기록 할 수있는 세부 사항 수준 중 일부입니다.
자세한 정보 : IPS 지리적 위치
이 기술은 다음과 같이 널리 사용됩니다.
지리 마케팅
내용 방향
액세스 제어 (콘텐츠/서비스)
보안
| 공급자 | 웹 사이트 | API | 무료 요청 |
|---|---|---|---|
| ip2location | https://www.ip2location.com | https://api.ip2location.com/v2 | 1 년마다 10,000 |
| ipgeolocation | https://ipgeolocation.io | https://api.ipgeolocation.io/ipgeo | 매일 1,500 |
| Ipstack | https://ipstack.com | http://api.ipstack.com | 매월 10,000 |
| iPify | https://geo.ipify.org | https://geo.ipify.org/api/v1 | 매월 1,000 |
| IPAPI | https://ipapi.com | http://api.ipapi.com/api | 1 년마다 10,000 |
| ipinfo | https://ipinfo.io | https://ipinfo.io | 매월 50,000 |
| ipgeolocationapi | https://ipgeolocationapi.com | https://api.ipgeolocationapi.com/geolocate | 제한 없는 |
| ipwhois | https://ipwhois.io | http://ipwhois.app | 매월 10,000 |
| IPDIG | https://ipdig.io | https://ipdig.io | 제한 없는 |
| IPDATA | https://ipdata.co | https://api.ipdata.co | 매일 1,500 |
| iplabstack | https://labstack.com/ip | https://ip.labstack.com/api/v1 | 매월 10,000 |
| iptwist | https://iptwist.com | https://iptwist.com | 매월 1,000 |
| IP-API | https://ip-api.com | http://ip-api.com | 제한 없는 |
| DB-IP | https://db-ip.com | http://api.db-ip.com/v2 | 제한 없는 |
보스 (Delphi 용 의존성 anager)를 사용하면 라이브러리를 자동으로 설치할 수 있습니다.
boss install github.com/antoniojmsjr/IPGeoLocation
프로젝트> 옵션> 델파이 컴파일러> 대상> 모든 구성> 검색 경로
..IPGeoLocationSource
uses IPGeoLocation, IPGeoLocation.Interfaces, IPGeoLocation.Types; var
lMsgError: string;
lGeoLocation: IGeoLocation;
begin
try
lGeoLocation := TIPGeoLocation.New
.IP[ ' 201.86.220.241 ' ]
.Provider[TIPGeoLocationProviderKind.IPInfo]
// .SetTimeout(5000) //[OPCIONAL]
// .SetAPIKey('TOKEN') //[OPCIONAL]: VERIFICAR ARQUIVO: APIKey.inc
.Request
// .SetResultLanguageCode('pt-br') //[OPCIONAL]
.Execute;
Application.MessageBox(PWideChar(lGeoLocation.ToJSON), ' JSON ' , MB_OK + MB_ICONINFORMATION); // JSON COM O RESULTADO DA GEOLOCALIZAÇÃO
except
on E: EIPGeoLocationRequestException do
begin
lMsgError := Concat(lMsgError, Format( ' IP: %s ' , [E.IP]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' IPVersion: %s ' , [E.IPVersion]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Provider: %s ' , [E.Provider]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' DateTime: %s ' , [DateTimeTostr(E.DateTime)]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Kind: %s ' , [E.Kind.AsString]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' URL: %s ' , [E.URL]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Method: %s ' , [E.Method]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Status Code: %d ' , [E.StatusCode]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Status Text: %s ' , [E.StatusText]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Message: %s ' , [E.Message]));
Application.MessageBox(PWideChar(lMsgError), ' A T E N Ç Ã O ' , MB_OK + MB_ICONERROR);
end ;
on E: Exception do
begin
Application.MessageBox(PWideChar(E.Message), ' A T E N Ç Ã O ' , MB_OK + MB_ICONERROR);
end ;
end ;
end ;

IPGeoLocation 은 무료이며 오픈 소스 소프트웨어에 따라 라이센스가 부여됩니다