تعلم معي خطوة خطوة صنع برنامج لتسيير المخزون و التسويق

[kachwahed]

ملحوظة صغيرة بخصوص تسمية المتغيرات/الأنماط والمكونات، إذ يحسن تسميتها بشكل نمطي (لاحقة +اسم المكون) يجعل من السهل التعرف على دورها أو البحث عنها كما يجعل المصادر أكثر مقروئية.
مثال: مكون TDataSource المخصص لربط الجدول المبيعات Vente يسمى dsVente، ومكون الحذف (Supprimer) نسميه مثلا btSupprimer وقس على ذلك باقي المكونات...

ليتعرف مكون الـ Skin يستحسن أن نجعله يبحث عن المسار بشكل أكثر ديناميكية. شيء مثل هذا:
عند إنشاء أول نموذج OnCreate نضيف:

PHP كود :

//تحديد المسار الحالي
  sSkinManager1.SkinDirectory := ExtractFilePath(Application.ExeName) + '\Skins';
//تحديد المظهر
  sSkinManager1.SkinName := 'MacOS2';
//تفعيل المكون
  sSkinManager1.Active := True; 


بخصوص مكونات AlphaControls Free Edition هي نسخة مجانية غير مفتوحة المصدر (ملفات dcu فقط)، يمكن الحصول عليها من الموقع الرسمي:

كود :

http://www.alphaskins.com/dwnld.php

-----

@S.FATEH
الخلل في طريقة عرض شاشة الاستقبال، رغم ذلك يمكن إصلاح الخلل باقتناص حدث WM_SYSCOMMAND وإجبار النموذج على Minimize فور استقباله قيمة SC_MINIMIZE. شيء مثل:

PHP كود :

private
    procedure WMMinimize(var Msg: TWMSysCommand); message WM_SYSCOMMAND;
...

procedure TFGSM.WMMinimize(var Msg: TWMSysCommand);
begin
  if msg.CmdType = SC_MINIMIZE then
    Application.Minimize
  else
    DefaultHandler(Msg);
end; 


حاولت تعديل جميع المرفقات لكنني فشلت، فقمت ببعض التعديلات الشكلية على المرفقات الأولى وآخر مرفق هنا.

بالتوفيق أخي نبيل.