+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف يمكن عمل قائمة menu مثل هذه . (/showthread.php?tid=12007)
كيف يمكن عمل قائمة menu مثل هذه . - أبو معاذ - 16-07-2022
السلام عليكم ورحمة الله وبركاته.
من فضلكم كيف يمكن عمل قائمة Menu مثل التي في الصورة.
حيث الستايل الغالب عليه هو Flat.
جربت مكونات dvExpress navbar و أيضا المكون SplitView ، لكن لم أحصل على النيجة المرغوب فيها.
![[صورة: 294617867.png]](https://www5.0zz0.com/2022/07/16/19/294617867.png)
RE: كيف يمكن عمل قائمة menu مثل هذه . - Delphi4Us - 17-07-2022
وعليكم السلام ورحمة الله
تعرف اخ ابومعاذ انني بدات افكر في اعادة انشاء وتغليف لبعض مكونات الدلفي والتي تحتاج الى اعادة ضبط لها كلما انشأت برنامج جديد
على سبيل المثال المكون TEdit اذا جعلت الارتفاع له اكثر من الاتفاع الافتراضي الكتابة لا تظهر في نصف المكون وتبقى معلقة فوق
والمشكلة كل المكونات التي ترث هذا المكون مثل StyleControl لم تعالج المشكلة
فمكتبة الـ CVL كلها تحتاج الى اعادة برمجة وتحديث فهي لم يتم تحدثها منذ نسخ الدلفي الاولى فبعضها لا يزال لا يملك حتى حدث تمرير بكرة الفأرة
يعني ستحتاج الى التدخل بنفسك اذا اردت مظهر جيد
على العموم مشكلتك طالما وانت تستخدم مكونات Devexpress فالامر سهل فقط تحتاج الى تعديل السكين وجعله مسطح
ويكفي برنامج الرسام لذلك .
مكونات Devexpress تقبل السكين StyleControl من الدلفي وفي القائمة Tolls ستجد الخيار Bitmap Style Desinger فقط افتح اقرب سكين تفضله وغير في الصور والالوان التي فيه الى ما تريد
وفي مكون Devexpress وفي SkinName اكتب StyleControl وسوف يطبق سكين StyleControl على المكونات
RE: كيف يمكن عمل قائمة menu مثل هذه . - Mr.DOS - 17-07-2022
السلام عليكم
يمكنك تصميم افضل منها لو كنت تتقن ui/ux
عن تجربتي لم اكن بحاجة لاي مكون خارجي مما ذكرت
فقط مكون واحد firemonkey container
بالاضافة الى pichon icons8 للايقونات
والباقي تعتمد على اساسيات ui/ux
----- تحليل اولي للصورة المرفقة بالموضوع
الاحتمال الاول : دمج بين fmx و vcl
فورم vcl يحتوي على 3 containe من fmx
top + buttom + left
وكل container مستقل بذاته : طبعا على اساس انو مستعمل الاداة parnassus
الاحتمال الثاني : تصميم كامل بـ vcl
هذا لا يمنع ممكن تكون عبارة عن 3 Tpanels لكن release راح يكون به بعض الشوائب
بمعنى حتى صورة المثال المرفق تبدو اقل دقة وبالتالي معتمد التصميم على vcl
اتمنى اكون قد افدك ولو بقليل مما اعرفه عن التصميم بشكل عام وعن واجهة وخبرة المستخدم بشكل خاص
السلام عليكم
بعض الاخطاء في التصميم
RE: كيف يمكن عمل قائمة menu مثل هذه . - Delphi4Us - 18-07-2022
بخصوص تطبيق السكين الذي مع الدلفي على مكونات Devexpress اخطاء شئ ونسيت شئ اخر
في SkinName تكتب VCLStyle
هناك وحدة تأتي مع مكونات الـ StyleControl بالاسم scDevExStyleAdapter
تضيف الوحدة scDevExStyleAdapter.pas التي تأتي مع StyleControl الى المشروع لتطبيق السكين
كود :
How to add VCL Style support without adding scDevExStyleAdapter.pas to the StyleControls VCL package:
1. Set LookAndFeel.NativeStyle properties to False in DevExpress controls.
2. Set LookAndFeel.SkinName property to "VCLStyle" in DevExpress controls manually (without choosing from list).
3. Add scDevExStyleAdapter.pas to the project (for example, to Uses of the main form)
How to add VCL Style support for QuantumGrid and some other DevExpress controls:
1. Add scDevExStyleAdapter.pas to the StyleControls VCL package and recompile it.
2. Set LookAndFeel.NativeStyle properties to False in DevExpress controls.
3. Set LookAndFeel.SkinName property to "VCLStyle" in DevExpress controls.RE: كيف يمكن عمل قائمة menu مثل هذه . - Delphi4Us - 18-07-2022
بالنسبة للـ VCL ليس سيئ اذا اردت ان تنشي من الصفر انظر للمرفقات مثال على السريع
واذكر كان لي مثال عن هذا المكون بقسم المشاريع المفتوحة المصدر وفيه Animation
[size=1]
![[صورة: InVawHQ.gif]](https://i.imgur.com/InVawHQ.gif)
[/size]
Menu.rar (الحجم : 167.14 ك ب / التحميلات : 49)