22-12-2009, 01:43 PM
مافي مشكلة أخي الكريم سأضع المثال الذي يوضح ذلك بالمرفقات وعلى جميع النواحي:
1- أفتح مشروع جديد.
2- ضع على الفورم العنصر TFileListBox الموجود في الصفحة Win 3.1 .
3-ضع على الفورم أربع عناصر TCheckBox وقم بإعادة تسميتها لتصبح :
ReadOnly;
Archive;
System;
Hidden;
4 - ضع ثلاثة عناصر TLabel وقم بتسميتها كما يلي:
FileDirName;
PathName;
ChangeDate;
5- ضع على الفورم عنصر TButton وقم بإعادة تسميته ليصبح:
Properties1
ضع في حدث ال onClick له الإجرائية .
شغل تطبيقك وأضغط على اسم الملف الموجود في عنصر TFileListBox وسوف يقوم البرنامج بإعطاءك خصائصه قم بتغيير الخصائص عن طريق العناصر TCheckBox و أضغط بعدها على الزر وسوف تجد بأنها تغيرت . وفقك الله والجميع.
1- أفتح مشروع جديد.
2- ضع على الفورم العنصر TFileListBox الموجود في الصفحة Win 3.1 .
3-ضع على الفورم أربع عناصر TCheckBox وقم بإعادة تسميتها لتصبح :
ReadOnly;
Archive;
System;
Hidden;
4 - ضع ثلاثة عناصر TLabel وقم بتسميتها كما يلي:
FileDirName;
PathName;
ChangeDate;
5- ضع على الفورم عنصر TButton وقم بإعادة تسميته ليصبح:
Properties1
ضع في حدث ال onClick له الإجرائية .
شغل تطبيقك وأضغط على اسم الملف الموجود في عنصر TFileListBox وسوف يقوم البرنامج بإعطاءك خصائصه قم بتغيير الخصائص عن طريق العناصر TCheckBox و أضغط بعدها على الزر وسوف تجد بأنها تغيرت . وفقك الله والجميع.