كيف اظهر محتوى مجلد في FileListBox

وعليكم السلام ورحمة الله وبركاته

أهلا صديقي :)

بعد أن تربط TDirectoryListBox من خلال الخاصية FileList مع المكون TFileListBox

يظهر مباشرة محتوى المجلد عند تحديده على TDirectoryListBox

غير أن تحديد المجلد يتم بنقر مزدوج

إذا أردت أن يتم تحديد المجلد بشكل فوري، اكتب في OnClick للـ TDirectoryListBox شيء مثل:

procedure TForm1.DirectoryListBox1Click(Sender: TObject);
begin
  FileListBox1.Directory := DirectoryListBox1.GetItemPath(DirectoryListBox1.ItemIndex);
end;

أنصحك بعد استخدام هذه المكونات (وكل مكونات Win3.1) لأنها ما جعلت إلا لأغراض التوافق مع الإصدارات السابقة

استخدم مكونات Shell عوضا عن السابقة

استبدل السابقين بـ TShellTreeView و TShellListView

بالتوفيق.

السلام عليكم ورحمة الله تعالى وبركاته

شكرًا لك اخي

لقد فعلت مثل ما قلت لي لكن لا يظهر محتوى المجلد

لكن ماهي مكونات Shell

وكيف اتعامل معها

وماهي مكونات TShellTreeView وTShellListView

ووفقكم الله

وعليكم السلام ورحمة الله وبركاته

هي مكونات مرفقة مع نسخة دلفي 7 على الأقل:

http://delphi.about.com/od/vclusing/l/aa052403a.htm

قد لا تكون مثبة على نسختك:

http://stackoverflow.com/questions/578241/where-is-tshelllistview-in-delphi-2009

التعامل معها سهل جدا

مثلها مثل Win3.1 تقريبا، كل شيء من خلال Object Inspector

بالتوفيق.

جميل جدا .. شكرا أخ Kachwahed

بالنسبة لمكونات Shell فهل هي المستعملة الآن أيضا في Embarcadero Delphi XE

أجل هي كذلك، لا شكرا على واجب :)

بالتوفيق.