مكون GetPublicIP للحصول على ال IP الخاص بالانترنت

[أبو معاذ]

[INDENT]

السلام عليكم ورحمة الله وبركاته ،
وأنا أتصفح الأنترنت وجدت موكون للحصول على الIP الخاص بالانترنت ، وكما هو معلوم لدى الجميع أن قيمة ال IP الخاصة بالانترنت تتغير وليست ثابتة .
قلت في نفسي ربما يكون هناك من يحتاج هذا المكون :p ، فرفعته لكم.
المكون يعمل على D2005 D2006 D2007 D2009 D2010 D3 D4 D5 D6 D7

This component obtains the public IP address, or Internet IP address, for
computers that are behind routers with NAT functionality. It works contacting
with any server on Internet that tells your public IP, and doing parsing with
the reply data to get the address.

By default it asks to: http://checkip.dyndns.org but you can change to another
server, setting the component properties, if desired.

TGetPublicIP don't blocks the application while the process is pending. To start
the process you must call the method "Execute". It returns inmediately. When the
process finalizes the event "OnDone" is called. Then you can read your public IP
in the property "PublicIP". If the process fails, "OnDone" never will be called,
so your program should take care for a timeout period.

Internally it uses the component TClientSocket that is in the package
dclsocketsXX.bpl. This package is not usually installed on recent versions of
Delphi. So you should install it before to use TGetPublicIP.

[/INDENT]

[onexite]

السلام عليكم بارك الله فيك اخي
هذه اضافة الى موضوعك ان سمحت
الموقع بدقة مع علم البلد Api
تحديد الموقع مع الخريطة والبلد والاحداثيات بدون موقع