ياريت أي محترف يشرح لنا مثال على ANDY

مغلق

بدأه aymansoft في 3 فبراير 2005 · 22 رد · 2,749 مشاهدة · في لغة Delphi

#13 فبراير 2005 في 04:44 صاحب الموضوع

السلام عليكم نريد من محترفين هذا المنتدى شرح أدوات ANDY لإستخدامها في عمل ماسينجر اذا كانت تصلح .

#23 فبراير 2005 في 20:14

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

ان ادوات indy من الادوات الشهيرة فى عالم الدلفى فى مجال ربط الاجهزة والشبكات وتعتبر من المكتبات المهمة جدا فى هذا المجال.....................

لبناء برنامج يعمل على جهزين يعنى Client\Server يمكننا هذا من خلال مكونات الIndy

حيث يبرز دور2 كمبوننت من كمبوننت الindy

هما

idTCPClient وتستخدم فى الClient

idTCPServer وتستخدم فى الServer

نبدأ على بركت الله فى شرح الفكرة وبطريقة بسيطة كبداية ثم نطور عملنا تدريجيا

اولا افتح مشروع جديد وسميه server ومن Indy Servers قم باضافة idTCPServer

ثم من Object Inseptor قم بتحديد Defaultport وقم بتحديد رقم البورت الذى سوف ينتظر السيرفر الاتصال عليه وليكن 5050

ثم قم باضافة memo

فى الحدث onCreate للفورم اكتب الكود التالى لكى يفتح البرنامج بورت وينتظر الاتصال من الClient

IdTCPServer1.Active := true;

اختار ال idTCPSERVER مرة اخرى ومن خلال object inseptor ومن الEvents فى الحدث

onExecute

اكتب الكود التالى لكى يقرأ ما يرسله الClient

with AThread.Connection do begin
memo1.Lines.add(ReadLn);
end;

وفى الحدث onClose الخاص بالفورم اكتب الكود التالى لكى يتم اغلاق البورت الخاص بالبرنامج

IdTCPServer1.Active:=false;

ومن هنا اعمل compile للبرنامج واحفظه غى مجلد تحت اسم server

ناتى الى الشق الثانى للبرنامج وهو الClient

انشئ برنامج جديد ومن قائمة indy clients اضف IdTCPClient

من object inseptor حدد البورت الذى حددته فى السرفر لازم يكونوا ذى بعض تماما

5050

قم باضافى 2 button و2 memo وedit

قم باضافة الكود التالى فى الزر الاول والذى يحمل اسم connect فى الحدث onClick

if IdTCPClient1.Connected = false then
begin
IdTCPClient1.Host:=Edit1.text;
IdTCPClient1.Connect();
end;

فى الbutto رقم 2 فى الحدث onClick اضف الكود التالى

if IdTCPClient1.Connected = true then
begin
IdTCPClient1.WriteLn(memo2.Lines.Text);
Memo1.Lines.Add(memo2.Lines.Text);
memo2.Lines.Clear;
end;

اعمل Compile للبرنامج وشغل واحفظه فى مجلد تحت اسم client ومن ثما افتح كل من السيرفر والكلينت اعمل connect

هذا كان شرح بسيط للربط بين الاجهزة باستخدام idTCPClient و idTCpServer

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

indy projects.zip

{ربى زدنى علما}

#33 فبراير 2005 في 20:17

ان شاء الله هناك طريقة متقدمة لنقل التعليمات بين الclient والسيرفر سوف اقوم باضافتها بعد ان يكون كلام السابق قد تم استيعابه على الاقل كنقطة بداية

على الرغم انى بفضل TClientSocket وTServerSocket

على الرغم من امكانات الindy وشكرا والسلام عليكم ورحمة الله وبركاته

{ربى زدنى علما}

#44 فبراير 2005 في 01:49

شكرا لك يا أخي العزيز JuStNiCk

#54 فبراير 2005 في 03:22

على الرحب ارجو ان يكون الشرح مفيد لك وشكرا

{ربى زدنى علما}

#64 فبراير 2005 في 03:38

أهلا بالأحبة ...

الموضوع جميل و مفيد, أنا لم أستخدم تطبيقات الويب منذ الإصدارة الخامسة أو الرابعة لديلفي على ما أظن..

لو تتكلف يا أخي JuStNiCk و تتكرم علينا بدرس مستفيض عن تطبيقات الويب في ديلفي, ولتكن البداية بدرس عن Indy و مكوناتها...

من البداية إلى الإحتراف إن شاء الله.

سأتغيب عن المنتدى وستكون لي زيارات خفيفة بين الحين و الحين

يا صاحب الهم إن الهم منفرج.....................أبشر بخير فإن الفارج الله.

اليأس يقطع أحيانا بصاحبه..........................لا تيأس فإن الكافي الله.

الله يحدث بعد العسر ميسرة.........................لا تفزعن فإن الصانع الله.

إذا بليت فثق بالله وارض به...................فإن الذي يكشف البلوى هو الله.

و الله ما لك غير الله من أحد.......................فحسبك الله في كل لك الله

أخوكم مراد

#74 فبراير 2005 في 05:00

أتمنى لك مزيد من التفوق يا JuStNiCk

#84 فبراير 2005 في 15:30

شكرا لكم على اى حال انا لا اجيد كتابة الدروس ولكن احاول ذلك ان شاء الله

وشكرا لكما

{ربى زدنى علما}

#911 فبراير 2005 في 21:04

بارك الله فيك

أضاعوني وأي فتى أضاعـوا * * * ليـوم كــريهـة وســـداد ثغــــر

وخـــــلونـي ومعتـرك المنايـا * * * وقد شـــرعوا أسنــتهم لنحـري

كأني لم أكــــــن فيهـم وسيطـا * * * ولم تك نســبتي في آل عمــرو

أجرر في الجـــوامع كـل يـوم * * * ألا لله مظــــلمتـي وهـصـــري

عسى الملك المجيب لمن دعاه * * * سينجيني فيعلم كيــف شكـري

فأجـــزي بالكرامـة أهـل ودي * * * وأجزي بالضـغينة أهل ضري

منتديات الرياضيات العربية

#1012 فبراير 2005 في 01:34

وبارك لك اخى الكريم :rolleyes:

تم تعديل هذه المشاركة بواسطة JuStNiCk في 12 فبراير 2005 في 01:35

{ربى زدنى علما}

#119 سبتمبر 2005 في 17:00

اضم صوتي الى اصوات الموجودين

المنتدى ينقصه دروس برمجة الشبكات باستخدام دلفي

الحمد لله الذي هدانا لهذا وماكنا لنهتدي لولا ان هدانا الله

Ibraheem Al-Dhamari

#129 سبتمبر 2005 في 19:06

لي سؤالين :

1- كيف يمكن عمل البرنامج ليكون ثنائي التجاه. هل نضم السيرفر و الكلاينت في نفس التطبيق

واذا كان كذلك هل على نفس البورت او بورت اخر ؟

2- في برنامج اسمه web remote control يقوم بالتحكم في جهاز عبر الشبكة ولكن الغريب انه

لا يحتاج اي برنامج على الجهاز الذي سيتحكم به . كل ما يحتاجه هو العنوان و اسم المستخدم وكلمة المرور . هل عندكم اي فكرة عن كيفية عمله ؟

ارجو ان لا اكون اثقلت عليكم

تحياتي للجميع

الحمد لله الذي هدانا لهذا وماكنا لنهتدي لولا ان هدانا الله

Ibraheem Al-Dhamari

#139 سبتمبر 2005 في 20:22

بالنسبة للسؤال الاول ماذا تقصد بثنائى الاتجاه؟؟ هل تقصد ان من يقوم بالاتصال بالاخر اى طرف ام ماذا؟

اما بالنسبة للسؤال التانى منطقيا غير ممكن الا بوجود سيرفر مزروع على هذا الجهاز او وجود صغرة امنية على الجهاز

{ربى زدنى علما}

#149 سبتمبر 2005 في 21:56

مشكور على سرعة الرد

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

الشق الثاني : الحقيقة انا ايضاً كنت اقول مستحيل حتى جربت هذا البرنامج علماً انه يباع على الانترنت

وله موقع رسمي اي غير معقول انه يستخدم ثغرة ما . اليك الرابط الخاص به :

http://www.atelierweb.com/RComm/index.htm

تحياتي للجميع

الحمد لله الذي هدانا لهذا وماكنا لنهتدي لولا ان هدانا الله

Ibraheem Al-Dhamari

#159 سبتمبر 2005 في 22:32

لا يكفى فقط ان يكون احدهم سيرفر والاخر كلينت ويقوم احدهم بالاتصال بالاخر

{ربى زدنى علما}

#169 سبتمبر 2005 في 22:40

سوف اقوم بانزال البرنامج وتجربته لالنت كدة المواضيع اختلفت الحمد لله مش ممكن يتصل بجهازى لانى شايل منه كل الحجات الى هو بيستخدمها علشان يعمل كونكت

{ربى زدنى علما}

#179 سبتمبر 2005 في 23:40

Quote:

Client for Microsoft Networks installed on both local and remote machines and File and Printer sharing enabled at least on the remote machine.

If the remote computer platform is Windows XP Professional, the access is only possible within the classical sharing and security model for local accounts. This is enabled from Control Panel / Administrative Tools / Local Security Policy / Network access: Classic - local users authenticate as themselves. You can obtain the same result from Windows Explorer / Tools / Folder Options / View and uncheck Use Simple File Sharing.

http://www.atelierweb.com/rcomm/faq.htm

{ربى زدنى علما}

#1810 سبتمبر 2005 في 17:46

مشكور على التواصل

يا ريت لو تحط لنا مثال بسيط على ارسال النصوص باتجاهين وما هو التغيير في حالة اكثر من جهاز في نفس الوقت اي كالتالي :

جهاز1 يدردش مع جهاز2 وجهاز3 في وقت واحد اي يستقبل نص من اي منهما ويمكنه الارسال لاي منهما

جهاز2 يدردش مع جهاز1 وجهاز3 في وقت واحد اي يستقبل نص من اي منهما ويمكنه الارسال لاي منهما

وهكذا

بالنسبة لبرنامج web remote control : معنى ذلك انه يستخدم ادوات موجودة في الوندوز

اي انه يمكن لمايكروزفت استخدام نفس الاسلوب و الدخول على اجهزتنا في اي وقت

هل يمكن عمل شيء مشابه عن طريق الدلفي ؟

واسف ان كنت ثقلت عليك

تحياتي للجميع

الحمد لله الذي هدانا لهذا وماكنا لنهتدي لولا ان هدانا الله

Ibraheem Al-Dhamari

#1910 سبتمبر 2005 في 18:45

بالنسبة للمثال احاول اعمله لك بس انا مش محترف ولا حتى ذو مستوى متوسط ان يدوب على ادى اوى وان شاء الله البيلك احتياجاتك

ام للسؤال التانى نعم ميكرو سوفت ممكن تعمل الى هى عيذاه لو احنا بنزل الويندوز باعداداته الافترادية وممكن بالدلفى تعمل كل شئ يعنى مفيش مستحيل اولا لان الدلفى قوية و لا ن غيرك عمل الى بتفكر فيه اذا ممكن ولكن تحتاج مراجع من ميكروسوفت عن كيفية استخدام تلك الخدمات

وفى النهاية شكرا

{ربى زدنى علما}