عرض رقم الآيبي الخاص بالشبكة الداخلية

الكود التالي من مكتوب بلغة الدلفي على ويندوز 8 ، يمكننا من معرفة رقم الآيبي للشبكة الداخلية :  
استعملنا فيه العناصر التالية :

الكود:

Button1: TButton;
    Label1: TLabel;

نستعمل الأوامر التالية من المكتبة Indy 10 :

الكود:

uses IdIPWatch;

ثم الكود لشرح كفية الحصول على رقم الأيبي :
- عند تنفيذ البرنامج نحصل على النتيجة من الشكل التالي :

يمكن تحميل التطبيق على الرابط التالي :
تحميل

يمكن استعمال أوامر Winapi.WinSock لمعرفة رقم الأيبي واسم المستضيف للحهاز الحالي : باستعمال  العناصر والأموار التالية :

الكود:

Edit2: TEdit;
    Edit1: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Button2: TButton;

-نصرح باستعمال المكتبة Winapi.WinSock  كما يلي :

الكود:

implementation
uses Winsock

ثم نكتب الكود التالي الذي يحتوي على مجموع الأوامر اللازمة لعرض اسم المضيف ورقم الآيبي :

ثم نعطي الأمر لتنفيذ الكود السابق كما يلي  :

يمكن تحميل التطبيق على الرابط التالي :تحميل