الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سؤال عن برنامج شات

مغلق
بدأه Lola في 20 أبريل 2002 · 25 رد · 1,984 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

يا اخوان ممكن تساعدوني في مشروع التخرج

وقد وضعت موضوع سابقا عن البرنامج الذي نقوم بعمله

وهو شات في شبكه داخليه

وقد افادنا احد الاخوان عن برنامج الشات الموجود مع الدلفي وهو يعمل بشكل جيد

والمشكله انني حاولت الاستفادة من البرنامج ولكن دائما تظهر لي الرسالة التاليةولم استطع معرفه حل لها

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

#2

الرساله هي:

pro.jpg

#3

السلام عليكم

الصورة المرفقة غير ظاهره . يبدو ان الوصلة التي توجد فيها الصورة لا يمكن لي شخصيا الوصول لها .

لو تكتب الرسالة التي ظهرت لك يكون افضل .

حاول ان تبحث في الانترنت على الموضوع ستجد العديد من الامثلة .

في امان الله .

هناك حتى الأحلام أصبحت ممنوعة ...

إنه لعار أن ننتمي لهكذا أوطان ... لكن ... ربما العار أن نكون نحن أبناء لتلكم أوطان .. من يدري ؟!!

ليعلم أولئك ... إنّ الشعوب إنْ هي استيقظت تسحق ظُلامََهَا ...

There, even in dreams u r wanted

To be a programmer, how a nice dream it was

Leaving ...

أعيدوا لإسمي لونه المفضل

#4

اخي العزيز Lola

ممكن تذكر لنا نسخة الدلفي الي تعمل عليها؟؟؟

وتقبل اطيب تحياتي اخوك SUM

#5

نسخة الدلفي 6

والرساله هي:

Asynchronous socket error10065

#6

السلام عليكم

الخطأ 10065 او WSAEHOSTUNREACH يعني انه في خطا اثناء الاتصال بالـ server (مثلا الــ server مشغول ) , او هناك مشاكل في الـ server ...

بعد تشغيل البرنامج ما هي الخطوات التي قمت بها ؟ لو تشرحي قليلا عنها حتى نعرف اين الخطأ .

تاكدي من الـ server هل مسموح لك الاتصال به .

جربي ان يكون الـ server هو الـlocalhost اي 127.0.0.1 لا اظن انه سيكون هناك خطأ .

في امان الله .

هناك حتى الأحلام أصبحت ممنوعة ...

إنه لعار أن ننتمي لهكذا أوطان ... لكن ... ربما العار أن نكون نحن أبناء لتلكم أوطان .. من يدري ؟!!

ليعلم أولئك ... إنّ الشعوب إنْ هي استيقظت تسحق ظُلامََهَا ...

There, even in dreams u r wanted

To be a programmer, how a nice dream it was

Leaving ...

أعيدوا لإسمي لونه المفضل

#7

يا اخوان الله يوفقكم

مرررره محتاسه بالبرنامج لو احد يساعدني يعلمني او يسوي برنامج شات صغير سمبل فقط كيف ارسل واستقبل الرسائل

مو عارفه المشكله وين

حاولت اسوي مثل برنامج الشات الموجود مع الدلفي ونفس المشكله

#8

يا جماعه

يمكن في شئ في البروبرتي او اغير خصائص شئ ؟؟؟؟؟؟؟؟

سواء في الجهاز نفسه او في الدلفي

غير عن خصائص الكمبوننت ؟؟؟؟؟؟؟؟؟

#9

ياجماعه يمكن في شئ ناقص وانا مبتدئ بالدلفي

#10

الاخت tmaaa

جربت 127,0,0,1

ونفس الخطأ

#11

اخي العزيز Lola

على مااعتقد انك استخدمت المثال الموجود في الدلفي على نفس على هذا المسار :

DemosInternetChat

اليس كذلك :)

طبعاً المثال السابق ( اعني في المسار الذي ذكرته )

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

على العموم يوجد عندي لك مثال حلووووووووووو بالمرة

وهو على المسار التالي :

( هذا مسار السيرفر )

DemosInternetChatServerSource

( هذا مسار الكلينت )

DemosInternetChatClient

وهو في الحقيقة مثال ممتاز جداً معمول بتقنية Indy الموجودة في دلفي 6

وتقبل اطيب تحياتي اخوك SUM

#12

السلام عليكم

:D :D :D

الاخ وليس الاخت . يرجى تصحيح المعلومات التي لديك اختي .

لتجربة 127.0.0.1 يتم تشغيل البرنامج (exe file ) الموجود في الامتداد DemosInternetChat مرتين . ستظهر رسالة خطأ لا بأس في ذلك .

*عليك بازالة علامة الصح الموجودة على listen في القائمة file من احد البرنامجين . وجود علامة الصح تدل على ان البرنامج يوجد في الكمبيوتر الـ server , عدم وجودها يدل على ان البرنامج يوجد في الكمبيوتر الـ client .

*في البرنامج الـ client ( حيث ازيلت علامة الصح ) نقوم بعمل connect لــ 127.0.0.1 .

في هذه الحالة يمكن عمل chat .

جربي المذكور و اخبرينا بالنتيجة .

المثال الذي ذكره الاخ SUM مثال ممتاز ايضا ( هو الافضل ).

في امان الله.

هناك حتى الأحلام أصبحت ممنوعة ...

إنه لعار أن ننتمي لهكذا أوطان ... لكن ... ربما العار أن نكون نحن أبناء لتلكم أوطان .. من يدري ؟!!

ليعلم أولئك ... إنّ الشعوب إنْ هي استيقظت تسحق ظُلامََهَا ...

There, even in dreams u r wanted

To be a programmer, how a nice dream it was

Leaving ...

أعيدوا لإسمي لونه المفضل

#13

الاخ sum

يعطيك العافيه

المثال الموجود

DemosInternetChat

الانتر فيس جدا سهل

ويعمل بشكل ممتاز

سواء اذا اتصلت على شخص في الشبكه او اتصلت بنفس جهازي

يعمل بشكل ممتاز

حاولت عمل برنامج بنفس الكمبوننت المستخدمه ولكن دون فائده

لدرجه اني بعد ما يئست نسخت البرنامج كاملا دون تغير ونفس المشكله؟؟؟؟؟؟؟؟؟

البرنامج يعمل .,,, والبرنامج الذي كتبته لا يعمل ....... مثال عندي في كتاب Building Delphi 6 Application

نفس المشكله ؟؟؟؟؟؟؟

توجد خطوه في البدايه لم اعرف كيف انفذها:

1.From the network applet in the control panel add the peer web Server for windows NT (or personal web Server for windows 9x)by default, the server will refer to the LocalHost address on port 80 with adefault.htm page.

(غير مفهوم)

2.Open delphi and drop a TIdTCPClint component on thedefault blank form.

3. Add memo to the form, which will provide a convenient place to place output from the TCP connection.

4.add the code in the listing that follows to the Form Create event handler.

______________________________________________

procedure TForm1.FormCreate(Sender: TObject);

begin

IdTCPClient1.Host:='127.0.0.1';

IdTCPClient1.port:=80;

IdTCPClient1.Connect;

try

IdTCPClient1.SendCmd('GET /default.htm');

Memo1.Lines.Add(IdTCPClient1.CurrentReadBuffer);

finally

IdTCPClient1.Disconnect;

end;

end;

_____________________________________________

بعد عمل رن يطلع الرساله التاليه

Socket error #10061

#14

آآآآآآآآآآآآسف جدا اخ tmaaa

البرنامج يعمل بشكل جيد

ولكن للاسف البرنامج الذي اقوم بعمله هو الذي لا يعمل حاولت الاستعانه بالبرنامج المذكور

ولكن لماذا لم افهم البرنامج الذي ذكرتم انه افضل واسهل ؟؟؟؟؟

للاسف مبتدئ بالدلفي واخترتها لمشروع التخرج:(

وارجوا منكم مساعدتي

لا اريد برنامج معقد استطيع اضافه تعديلات

اريد برنامج جدا سهل فقط كيف اتبادل الرسائل ممكن تساعدوني

اذا استطاع احدكم ولا اريد اي انتر فيس اريد معرفه الخطا الموجود عندي فقط

#15

يعطيكم العافيه يااخوان:)

امس سهرت على البرنامج الا ان تمكنت من معرفه الخطأ

لم اقوم بعمل الخطوه الاولى عند فتح البرنامج وهي

serversocket.active:=true

لو لاحظتم ان FormCreate

تنادي procedure

والبرراميتر Nil كانت تطلع لي خطأ فحذفتها مؤقتا

ولكن لاداعي لاستدعائها وضعتها ضمنها شكرا يا اخوان

#16

سؤال يا اخوان

كيف استطيع الحصول على اسم الجهاز او الاي بي

واذا كان لديكم موقع للبورتات وعملها :rolleyes:

أرجوا ان لا اكون قد اثقلت عليكم ويعطيكم العافيه

#17

السلام عليكم

لا اعتقد انه قد اثقلت علينا . ان وجدت اسئلة يتعلم السائل والمجيب في نفس الوقت .

بالنسبة لموضوع اسم الجهاز و الـ ip راجعي المواضيع السابقة تم طرح الكود الخاص بهذا السؤال .

شوي وابحث عن المواضيع السابقة .

في امان الله

هناك حتى الأحلام أصبحت ممنوعة ...

إنه لعار أن ننتمي لهكذا أوطان ... لكن ... ربما العار أن نكون نحن أبناء لتلكم أوطان .. من يدري ؟!!

ليعلم أولئك ... إنّ الشعوب إنْ هي استيقظت تسحق ظُلامََهَا ...

There, even in dreams u r wanted

To be a programmer, how a nice dream it was

Leaving ...

أعيدوا لإسمي لونه المفضل

#18

السلام عليكم

http://arabteam.nicmatic.com/vb/showthread...p?threadid=6041

http://arabteam.nicmatic.com/vb/showthread...25&highlight=ip

هناك حتى الأحلام أصبحت ممنوعة ...

إنه لعار أن ننتمي لهكذا أوطان ... لكن ... ربما العار أن نكون نحن أبناء لتلكم أوطان .. من يدري ؟!!

ليعلم أولئك ... إنّ الشعوب إنْ هي استيقظت تسحق ظُلامََهَا ...

There, even in dreams u r wanted

To be a programmer, how a nice dream it was

Leaving ...

أعيدوا لإسمي لونه المفضل

#19

شكرا اخ tmaaa

بامكانك حذف هذا الموضوع اذا كان قد ازعجك

#20

السلام عليكم

لاحول ولا قوة الا بالله .

خيرا تعمل شرا تلقى .

ما الذي حصل ؟!

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

اقدم اعتذاري ان كان فهم قصدي بشكل اخر ( كان خطأ مني في طريقة التعبير ). أسف على ذلك .

(f) (f) (f)

انا امس كنت ناوي ابدا بعمل في هذا المشروع لكن احبطت تماما الان .

في امان الله

هناك حتى الأحلام أصبحت ممنوعة ...

إنه لعار أن ننتمي لهكذا أوطان ... لكن ... ربما العار أن نكون نحن أبناء لتلكم أوطان .. من يدري ؟!!

ليعلم أولئك ... إنّ الشعوب إنْ هي استيقظت تسحق ظُلامََهَا ...

There, even in dreams u r wanted

To be a programmer, how a nice dream it was

Leaving ...

أعيدوا لإسمي لونه المفضل

#21

أعتذر أخ tmaaa

ويعطيك العافيه على مجهودك

الظاهر اني فهمت الموضوع خطأ

#22

آسفه جدا اخ tmaaa

اعتقدت ان كثرت الردود ازعجتك

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

#23

السلام عليكم

مجرد سوء تفاهم بسيط لا غير :)

اتمنى لك التوفيق في المشروع .

هناك حتى الأحلام أصبحت ممنوعة ...

إنه لعار أن ننتمي لهكذا أوطان ... لكن ... ربما العار أن نكون نحن أبناء لتلكم أوطان .. من يدري ؟!!

ليعلم أولئك ... إنّ الشعوب إنْ هي استيقظت تسحق ظُلامََهَا ...

There, even in dreams u r wanted

To be a programmer, how a nice dream it was

Leaving ...

أعيدوا لإسمي لونه المفضل

#24

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

اخي العزيز lola في الحقيقة انا لاادري هل انتهت مشكلتك مع برنامج المحادثه ام لا

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

انظر للصورة الصورة :

server.jpg

طبعاً هذه الصورة هي صورة الجزء الأول من البرنامج (السيرفر ( المخدم ) )

واليك شرح النقاط المرقمة في الشكل السابق :

1- هذا الزر يقوم بتنشيط السيرفر و اغلاقه

2- هذا الزر يقوم بتحديث قائمة المتصلين بالسيرفر

3- هذا الزر يقوم بأخراج شخص معين من السيرفر ( قطع اتصاله بالمحادثه )

4- هذا الزر يقوم بأرسال رسالة خاصة الى شخص معين ( مثل الرسائل التحذيرية )

5- رقم المنفذ الي سيعمل عليه السيرفر

6- اسم السيرفر

7- رسالة ترحيبية لمن يقوم بالأتصال بالسيرفر

8- قائمة المتصلين بالسيرفر

واليك الصورة للجزء الثاني من البرنامج ( الكلينت ( برنامج المحادثين ))

client.jpg

واليك شرح النقاط المرقمة في الشكل السابق :

1- اسم الشخص او لقب الشخص

2- رقم السيرفر

3- رقم المنفذ الذي يعمل عليه السيرفر

4- اجراء عملية الأتصال

5- تحديث قائمة المتصلين

6- قائمة المتصلين

7- نصوص المحادثة

8- مكان كتابة النص المراد ارساله

وهذا شرح موجز عن عمل البرنامج

طبعاً جرب البرنامج وعطنا النتيجة وإن شاء الله انه راح يعجبك

وتقبل اطيب تحياتي اخوك SUM

#25

هلين الاخ SUM

يعطيك العافيه

والله ما قصرت انت والاخ tmaaa

تمكنت من عمل برنامج شات جدا صغير جدا فقط شات دون تغير الفونت والاضافات الاخرى

واشتغل البرنامج بين الجهازين

:)

هذا الموضوع مغلق.

مواضيع مشابهة