منزل
Top.Mail.Ru Yandeks.Metrika
المنتدى: "الشبكات";
الأرشيف الحالي: 2002.07.25;
تنزيل: [xml.tar.bz2];

إلى

آخر مرة حول IP و GetHostByName البحث عن فروع مماثلة


chernoruk   (2002-05-13 07:53) [0]

كيف ، إذن ، لمعرفة عنوان IP الحقيقي الخاص بك إذا كان GetHostByName ("المضيف المحلي") يصدر دائمًا 127.0.0.1؟



Song   (2002-05-13 09:08) [1]

وظيفة TForm1.GetHost: سلسلة ؛ {الحصول على عنوان IP}
Var WSAData: TWSAData؛
p: PHostEnt ؛
الاسم: array [0 .. $ FF] Char؛
تبدأ
WSAStartup ($ 0101 ، WSAData) ؛
GetHostName (الاسم ، $ FF) ؛
p: = GetHostByName (الاسم) ؛
النتيجة: = inet_ntoa (PInAddr (p.h_addr_list ^) ^) ؛
WSACleanup.
الغاية؛



Сатир   (2002-05-13 17:12) [2]

2Song
وما هي المكتبة التي يجب أن تكون متصلاً بالأنواع والوظائف:
TWSAData ، PHostEnt ، WSAStartup ، GetHostName ، GetHostByName ،
inet_ntoa.



Song   (2002-05-13 17:43) [3]

يستخدم WinSock



Сатир   (2002-05-13 19:39) [4]

2Song
شكرا ، لقد وجدت بالفعل نفسي.
أين يمكن أن يكون TPowerSock؟



Malder   (2002-05-13 21:29) [5]

الناس. حسنا أجب على السؤال التالي. وإذا كان هناك عدة واجهات ، فكيف لتحديد عناوين IP في كل منها؟



Song   (2002-05-13 21:35) [6]

2Malder © (13.05.02 21:29)
الحالي على التسجيل .. إذا 98SE



Malder   (2002-05-14 00:04) [7]

أغنية ، حسنا هذا ليس خيارا ... وإذا لم يكن 98SE؟ بعد كل شيء ، WinIpCfg و ipconfig يحددان دائمًا كل شيء جيدًا! كيف يفعلون ذلك؟ كم سألت - لا أحد يعرف ...



Song   (2002-05-14 00:08) [8]

:)))
وتقوم بتشغيل WinIpCfg و ipconfig وتحليل الجواب ...



chernoruk   (2002-05-14 08:12) [9]

---> أغنية
شكرا على مثال العمل!



chernoruk   (2002-05-14 08:52) [10]

وسؤال آخر: ماذا نفعل مع تعبيرات مثل PInAddr (...) ،
أين PInAddr نوع من نوع المؤشر؟



Kaban   (2002-05-14 14:45) [11]

2Malder
تحتاج فقط إلى البحث.
راجع التعليمات البرمجية المصدر لـ Network Adapter Monitor
http://users.pandora.be/dirk.claessens2/



Anatoly Podgoretsky   (2002-05-14 15:02) [12]

chernoruk © (14.05.02/08/52 XNUMX:XNUMX)
هذا هو نوع القرفصاء



False_Delirium   (2002-05-15 01:01) [13]

// من الناحية الافتراضية ، يجب أن يكون هذا صحيحًا
وظيفة LocalIP: سلسلة ؛
نوع
TaPInAddr = array [0..10] من PInAddr؛
PaPInAddr = ^ TaPInAddr؛
فار
phe: PHostEnt؛
pptr: PaPInAddr؛
المخزن المؤقت: صفيف [0..63] من char؛
أنا: عدد صحيح
GInitData: TWSADATA؛

تبدأ
WSAStartup ($ 101، GInitData)؛
النتيجة: = "" ؛
GetHostName (المخزن المؤقت ، SizeOf (المخزن المؤقت)) ؛
phe: = GetHostByName (المخزن المؤقت) ؛
إذا phe = لا شيء ، ثم الخروج ؛
pptr: = PaPInAddr (Phe ^ .h_addr_list) ؛
// Phe ^ .h_addr_list - يجب أن يحتوي على IP لجميع الواجهات.
أنا: = 0 ؛
بينما pptr ^ [I] <> لا شيء يبدأ
/ / أحضرهم من أجل عرض طبيعي
النتيجة: = النتيجة + StrPas (inet_ntoa (pptr ^ [I] ^)) + "# 10 # 13"؛
Inc (I) ؛
الغاية؛
WSACleanup.
الغاية؛



صفحات: 1 فرع كامل

المنتدى: "الشبكات";
الأرشيف الحالي: 2002.07.25;
تنزيل: [xml.tar.bz2];

الطابق العلوي





الذاكرة: 0.58 ميغابايت
الوقت: 0.023 ج
8-81391
SEVYLOR
2002-03-18 04:03
2002.07.25
تنسيقات الصوت


1-81273
دلتا
2002-07-15 12:47
2002.07.25
الحافظة


14-81461
الحد الاقصى
2002-06-25 16:21
2002.07.25
دعم Font.Charset


3-81175
Digitman
2002-07-03 15:06
2002.07.25
اللعنة على هذه الأشياء الغريبة التي تحدث ... وكوزمنكو صامت (


1-81295
kserg@ukr.net
2002-07-11 18:36
2002.07.25
StringGrid - كيفية معرفة ما إذا كان StringGrid-a لديه أشرطة التمرير





الأفريكانية الألبانية عربي الأرميني أذربيجان الباسكي البيلاروسية Bulgarian التشيكية الصينية المبسطة) تقاليد صينية) الكرواتية التشيكية دانماركي Dutch English الإستونية الفلبينية Finnish جيب
الجاليكية الجورجية الألمانيّة اليونانيّة الكريولية الهايتية اللغة العبرية الهندية الهنغارية أيسلندي Indonesian الأيرلندية Italian اليابانيّة الكوريّة اللاتفية اللتوانية المقدونية الملايو المالطية Norwegian
اللغة الفارسية بولنديّة البرتغاليّة رومانية Russian صربي السلوفاكيّة سلوفيني إسباني السواحيلي Swedish Thai التركية الأوكراني الأردية الفيتنامية ويلزي اليديشية البنغالي البوسنية
السيبيونو الاسبرانتو الغوجاراتية الهوسا همونغ الإيبو جاوي الكانادا الخمير لاو لاتينية الماوري المهاراتية المنغولية النيبالية البنجابية الصومالية التاميل التيلجو اليوروبا
زولو
Английский Французский ألماني Итальянский البرتغالية Русский Испанский