المشاركات : 778
المواضيع 97
:
: 0
الإنتساب : Nov 2008
o15s19 كتب :عليك نور
هذا ما قصدته
طيب جميل,
بارك الله لك على التوضيح,
والسلام عليكم
فرّج همّ المهمومين يا الله
اللهم فك قيد اسرانا و اسرى المسلمين
المشاركات : 2,293
المواضيع 157
:
: 81
الإنتساب : Dec 2008
29-12-2009, 12:28 PM
(آخر تعديل لهذه المشاركة: 29-12-2009, 02:12 PM بواسطة kachwahed.)
لماذا FRoomNumber من نوع String (أو Char) أليس من المفروض أن يكون Integer؟
اللهم احقن دماء المسلمين، لا تنسوهم بالدعاء...
المشاركات : 240
المواضيع 16
:
: 0
الإنتساب : Dec 2008
كذلك لدي ملاحظة , اليس من المستحسن ان يكون FRoomNumber من نوع Dynamic Array , الا اذا كنت تريد حصره في عدد معين .
المشاركات : 778
المواضيع 97
:
: 0
الإنتساب : Nov 2008
29-12-2009, 01:07 PM
(آخر تعديل لهذه المشاركة: 29-12-2009, 02:12 PM بواسطة kachwahed.)
اولا, جزاك الله خيرا,
امّا فيما يخص FRoomNumber فهو الآن Integer بعد ان استخدمت ال Case الآن,,
كنت اضعه في String لأنه يرسل من الكلينت في حالة ال String وليس integer,
وبعدها لم اقم بتحويله الى Integer ,, لكن بما انك طرحت الموضوع,
هل التعامل مع ال Integer اسرع دآئما ؟ مثلا في حالتي انا, هل هناك فرق بين 1 String او integer ؟
بارك الله لكم
فرّج همّ المهمومين يا الله
اللهم فك قيد اسرانا و اسرى المسلمين
المشاركات : 240
المواضيع 16
:
: 0
الإنتساب : Dec 2008
هل عدد الغرف محصور في عدد معين ؟
المشاركات : 778
المواضيع 97
:
: 0
الإنتساب : Nov 2008
اهلا بك اخ Mohfa :bye1:
نعم, الغرف في مشروعي حالياً ستكون ثلآثة فقط,,
بارك الله لك,
فرّج همّ المهمومين يا الله
اللهم فك قيد اسرانا و اسرى المسلمين
المشاركات : 778
المواضيع 97
:
: 0
الإنتساب : Nov 2008
إقتباس :ألاحظ أنك تستخدم ClientsIPList و ClientsPortList يعني قائمتين
طيب أنت فينك تستخدم قائمة واحدة تضم كلا الاثنين لاحظ هذا الكود
هنا لإضافة على القائمة مع ملاحظة أن ال '=' يمكنك استبدالها بشئ أخر و لكن هذه المتعارف عليها
PHP كود : ClientsIPList[0].Add(FUserName + '=' + FUserPort) ;
السلام عليكم من جديد,
طيب الا يمكن الإستفآدة من اكثر من = في القآئمة ؟ بارك الله لكم,
يعني مثلا شئ من هذا ؟ (ملآحظة, لم تنجح معي العمليّة في الأسفل)
كود : List.Add(Edit1.Text+ '=' +Edit2.Text+ '=' +Edit3.Text);
يتم عمل حآجز وآحد فقط, يعني يحسب ال = الؤلى فقط,
وعند استدعآء الثآنية يتم استدعآء الثآنية و الثآلثة,
ما الحلّ بارك الله لكم,
فرّج همّ المهمومين يا الله
اللهم فك قيد اسرانا و اسرى المسلمين
المشاركات : 117
المواضيع 10
:
: 0
الإنتساب : Dec 2008
AL-MOB4RM3G كتب :السلام عليكم من جديد,
طيب الا يمكن الإستفآدة من اكثر من = في القآئمة ؟ بارك الله لكم,
يعني مثلا شئ من هذا ؟ (ملآحظة, لم تنجح معي العمليّة في الأسفل)
كود : List.Add(Edit1.Text+ '=' +Edit2.Text+ '=' +Edit3.Text);
يتم عمل حآجز وآحد فقط, يعني يحسب ال = الؤلى فقط,
وعند استدعآء الثآنية يتم استدعآء الثآنية و الثآلثة,
ما الحلّ بارك الله لكم,
لا يمكن الاستفادة أكثر من ذلك من ال TStringList
الحل حسب معلوماتي المتوفرة و التجربة التي قمت بها هي كالتالي
نقوم بإنشاء كلاس يحوي الأشاء الأساسية التي نريدها
كود : type
TClient = Class // Create Class Of Client
Public
IP: String;
Port: String;
Name: String;
Connected: Boolean;
end;
ثم عند اتصال الكلاينت نقوم بتعريف متغير و ليكن CT
و عند الاتصال نضيف معلومات الكلاينت التي نريدها
كود : CT := TClient.Create ;
CT.IP := AContext.Binding.PeerIP ;
CT.Port := IntToStr(AContext.Binding.PeerPort) ;
CT.Name := 'Something you want' ;
CT.Connected := True ;
و عند الاستدعاء نقوم بالبحث و المطابقة حسب قيمة معينة مثل الأي بي (بحالتي) أو الاسم أو ال Mac Addres أو قيمة تحددها أنت
طبعا هنا ال Clients هي عبارة عن TList نقوم بتعريفها عند انشاء البرنامج و نقوم باضافة الكلاينت الجديد لها طبعا
كود : for I := 0 to Clients.Count - 1 do
begin
if TClient(Clients[i]).IP = AContext.Binding.PeerIP then
begin
//do something like
TClient(Clients[i]).Connected := True ;
end;
end;
حلول أخرى لم اجرببها بعد Record و TThreadList . و جاري تطويرها (لأن هناك مشكلة تشغل بالي)
المشاركات : 778
المواضيع 97
:
: 0
الإنتساب : Nov 2008
جميل اخي الكريم, بارك الله لك,
إقتباس :حلول أخرى لم اجرببها بعد record و tthreadlist . و جاري تطويرها (لأن هناك مشكلة تشغل بالي)
طيب, بما انه تم انشآء مشروع محآدثة جمآعي, قد يكون من المستحسن لو ننآقش هذه الأمور ان شاء الله في ذلك الموضوع بدل من ان اسئلك عنه الآن هنا,  (لآن هذا السؤآل كما تعلمون, يخص ذلك المشروع )
على كل حال, اشكرك على جوآبك اخي
بارك الله لكم,
فرّج همّ المهمومين يا الله
اللهم فك قيد اسرانا و اسرى المسلمين
المشاركات : 778
المواضيع 97
:
: 0
الإنتساب : Nov 2008
اخوآني الكراك, فقط سؤآل,
فيما يخص الكود الذي وضعه الأخ عبد العزيز, فكرت فيه اليوم قليلا,
PHP كود : I := ClientsIPList[StrItemNum].Count - 1; for x := 0 to Thread.Count - 1 do begin ac:= Thread[x]; for e:=0 to i do If (ac.Binding.PeerIP = ClientsIPList[StrItemNum].Strings[e]) and (IntToStr(ac.Binding.PeerPort) = ClientsPortList[StrItemNum].Strings[e]) then begin ac.Connection.IOHandler.WriteLn('_CS_RoomUsersListSends'); ac.Connection.IOHandler.Write(Str, True,Tencoding.UTF8); end; end;
ان كان عدد المستخدمين كثير, لنفترض 100000 مستخدم, في ممثلا 1000 غرفة مثلا,
هل يتم استدعآء هذا الكود ليعمل لووب كلّما كتب احد المستخدمين في غرفة من الغرف ؟ الن يكون هذا عبئ كبير على السرفر ؟ وخصوصا انه هناك اكيد 2 من المستخدمين من يكتبان في نفس الوقت,
ام انه هناك طريقة لعمل Session او Room في السرفر بطريقة احسن, ؟
بارك الله لكم
فرّج همّ المهمومين يا الله
اللهم فك قيد اسرانا و اسرى المسلمين
|