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

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


عبد الهادي بهاب
17-11-2017, 11:12 PM
السلام عليكم ورحمة الله وبركاته

نريد ان نحول بيانات جدول الى رسم بياني بالأعمدة
طبعا فيه اضافة PieChart تحول الببنانات الى رسم بياني لكن على شكل دائرة مقسمة حسب النسب المئوية
في المشروع المفتوح المطروح نعنمد على عنصر grid البيانات
طبعا نحدد في انبوت الاعمدة عدد الاعمدة و في انبوت اخر عدد الاسطر
------- في مثالنا نكتفي بعمودين حتى يتم تعديل الكود ليقبل عدد غير محدد من الاعمدة --------------
حسب عدد الاعمدة و الاسطر نستخدم الكود للاظهر الغريد حسب المطلوب و المتغيرات Nrow لعدد الاسطر و Ncol لعدد الاعمدة

Grid.SetRowCount("Grid1", Nrow);
Grid.SetColumnCount("Grid1", Ncol);


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

ثم باستخدام دالى pageCreat لانشاء صور و نحدد طولها حسب القيم
Page.CreateObject(OBJECT_IMAGE, "A"..i, tblImageProps)



نفس الدالة لانشاء ليبال في اسفل كل صورة يمثل اسم العمود و ليبال اخر فوق العود فيه قيمة العمود

Page.CreateObject(OBJECT_LABEL, "LB"..i, tblLabelProps);


الشرح لشكل المشروع

https://e.top4top.net/p_6866nfjb1.gif

الملف المفتوح :
https://up.top4top.net/downloadf-686ghso81-rar.html


بالتوفيق

ثامر أبو بلقيس
18-11-2017, 06:38 AM
ملف غاية في الـــــــــروعة و الأهمية :abc_139:

كان بالامكان التفكير في عنصر Grid ثاني للتعبئة البيانية
لقابليته للطباعة و طاقة الاستيعاب

عبد الهادي بهاب
18-11-2017, 10:18 AM
ملف غاية في الـــــــــروعة و الأهمية :abc_139:

كان بالامكان التفكير في عنصر Grid ثاني للتعبئة البيانية
لقابليته للطباعة و طاقة الاستيعاب

شكرا جزيلا استاذ على المرور

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

فرح صالحي
18-11-2017, 12:22 PM
شـكــ وبارك الله فيك ـــرا لك ...:abc_152: لك مني أجمل تحية .

azizsoft
20-11-2017, 11:22 PM
جزاكم الله خيرا أخي عبد الهادي فعلا ملف مميز وعمل جميل
دائما يبقى الحنين لهذا البرنامج الشيق رغم تركي له منذ مدة

كل الشكر على جهودكم الطيبة

يوسف البراهيم
23-04-2018, 04:15 PM
شكرا عزيزي