كيفيه إنشاء أتصال بين مخدم وزبون بإضافه مخرجات

[php3man]

بسم الله الله الرحمن الرحيم

السلام عليكم ورحمه الله وبركاته

أسف مأقدرت اصيغ السؤال

بسأل عن طريقه اتصال بين مخدم وزبون


اذا كان المخدم
أيبي : 127.0.0.1
البورت : 5050

الزبون يقوم بإنشاء ملف ريجستري يقوم كالاتي
client:Server=ipPort=Port

طريقه الاتصال
client:Server=127.0.0.1Port=5050

عند فتح بورت اخر في المخدم أو تغير الايبي

بمجرد وضعه بالطريقه أعلاه يقوم بالاتصال عليه

مثال كما في برنامج الشات
all2chat.com

العميل

كود :

www.all2chat.com/download

[abdelmalek]

وعليكم السلام ورحمة الله وبركاته

اخي ممكن توضح سؤال اكثر

مادا تستعمل لربط بين الخادم والزبون :

1- indy
Socket -2
3- او مادا ...

ما الهدف الدي تريد تحقيقة من هاته الطريقة ( ممكن نعطيك طريقة اخرى او نعدل على طريقتك )

ممكن ترسل السورس كود لنرى مشكلة

بالتوفيق

في امان الله

[php3man]

السلام عليكم ورحمه الله وبركاته

أستخدم indy حاليا

الهدفه منها الاتصال من صفحات الانتر نت تلقائي بدون فتحه من الجهاز

اذا وضع كرابط

client:Server=127.0.0.1Port=5050

عند الضغط عليه يقوم بتشغيل برنامج client
والاتصال علي الايبي والبورت بدون وضع أيبي وبورت يدوي

ودا راح يساعد انه مو كل فتره اسوي كومبايل للكلينت حتي أضيف فيه ايبي السيرفر أو البورت

[أبو محمد اللحياني]

هذا له علاقة البارامترات التي تعمل مع البرنامج

مثلاً :

كود :

client.exe 127.0.0.1:5050

اسم البرنامج يأخذ البرامتر رقم 0
و IPORT يأخذ الرامتر رقم 1

تستطيع التقاطها بالـ :

كود :

ParamStr(0) ParamStr(1)

وبعد ذلك تستطيع تقطيعها إلى جزين بالحرف : [:]
وهذه دالة تريك البرامترات خطوة خطوة :

كود :

procedure showcmd; var cmd : string; i : Integer; begin cmd := CmdLine; ShowMessage(cmd); // Show the execution command + parameters ShowMessage('There are '+IntToStr(ParamCount)+' parameters'); for i := 0 to ParamCount do ShowMessage('Parameter '+IntToStr(i)+' = '+ParamStr(i)); end;