المساعد الشخصي الرقمي

مشاهدة نسخة كاملة : مطلوب : أداة ListBox مطورة تقبل Long بدلاً عن Integer


أبو الفضل
03-06-07, 10:36 PM
السلام عليكم ورحمة الله وبركاته ،،،،

الإخوة الأعزاء ،،،،

مطلوب : أداة ListBox مطورة تقبل Long بدلاً عن Integer .

للتوضيح فالأداة المرفقة مع الفيجوال بيسيك لا تقبل سرد أكثر من 32767 بينما أحتاج إلى قائمة تدعم Long .

أرجو أن يكون المطلوب واضحاً .

المبرمج
04-06-07, 07:27 AM
أنا عن نفسي ما فهمت المطلوب

؟؟؟!!!

أبو الفضل
04-06-07, 10:08 PM
أخي العزيز ،

أشكرك على تفاعلك ، وأقول حتى يتضح لك المراد قم بالتجربة التالية :

1 ــ افتح مشروعاً جديداً .
2 ــ أدرج فيه أداتين :
ــ ListBox .
ــ CommandButton .
3 ــ أدرج الكود التالي في الفورم .

Private Sub Command1_Click()
For I = 0 To 32767
List1.AddItem I
Next I
End Sub

Private Sub List1_Click()
Me.Caption = List1.ListIndex + 1
End Sub

4 ــ بعد تنفيذ البرنامج اضغط على زر الأمر ثم انتظر حتى يتم اكتمال سرد الأرقام في القائمة .
5 ــ اذهب إلى العنصر الأخير واضغط عليه وسترى المشكلة لأن خاصية ( ListIndex ) لأداة القائمة ( ListBox ) لا تقبل أكثر من عدد من العناصر أكثر من ( 32767 ) وهو ما يعني أن نو البيانات ( DataType ) المستخدمة في هذه الخاصية هي ( Integer ) .

وللاستزادة انقر على الروابط التالية :

http://www.rentron.com/datatypes.htm

أو

http://www.developerfusion.co.uk/show/32

أكرر شكر ي لك على تفاعلك ...

أحمد جمال
04-06-07, 11:29 PM
أخي الكريم ، بصراحة لا اعرف أي اداة تقوم بهذه المهمة ولكن يمكنك برمجة أداة تقوم بما تريد وتربطها ب Long بدل من Integer مثلاً .

يمكن ان تفيدك الأداة الخاصة في الملف المرفق ...

Boutemine Oualid
05-06-07, 05:28 PM
السلام عليكم ورحمة الله تعالى وبركاته
أهلا مرة أخرى صديقي أبا الفضل.
يمكنك إستعمال أداة الليست بوكس المطورة. قد تفي بالغرض

أبو الفضل
05-06-07, 07:46 PM
وعليكم السلام ورحمة الله تعالى وبركاته ،،،،

أشكرك أخي / Boutemine Oualid على تفاعلك وسأقوم بتجربة هذه الأداة بإذن الله .

وبالنسبة لأداة الليست بوكس المطورة فأين أجدها ؟؟؟

جزاكم الله خير الجزاء .

أبو الفضل
05-06-07, 08:04 PM
وجدت هذه الأداة الرائعة ولكنها تحتوي على الكثير من الخصائص التي لا أحتاجها ( تغيير اللون والشكل والتدريج ... ) ولا تدعم بعض الخصائص الأخرى مثل ( hwnd ) والتي أحتاجها كثير عند التعامل مع الأداة من خلال توابع ( API ) .

eng_mostafa
15-02-08, 11:48 PM
مشكووووووووووووووووووووووور اخى الاداة رائعه وجميلة

وايضآ اشكر الاخ احمد جمال على المرفق الموضوع

لانه ايضآ رائع والسلام عليكم ورحمة الله وبركاته