كيف يمكن اظهار محتويات ملف معين في listview
كيف يمكن اظهار محتويات ملف معين في listview
سؤالك غريب :blink: ملف في listview لماذا تريده في listview
listview تحتوي على Items, هل تقصد عرض كل سطر من الملف في ltem من listview
يا جماعة للمرة المليون!! وضح السؤال حتى تحصل على الاجابة :)
رب اجعلني مقيم الصلاة ومن ذريتي ربنا وتقبل دعاء.
لا تنسى: "العقل مثل العضلة كلما استخدمته أكثر كلما ازدادت قوته"
بعد تحميلك للصورة أظن أن ما تقصده هو عرض محتويات مجلد وليس ملف والفرق كبيراقتباسكيف يمكن اظهار محتويات ملف معين في listview
وما تحتاجه هو FileListView وتجدها في مكونات Delphi في صفحة Win3.1
كما يوجد العديد من المكونات التي تقدم مثل هذه الميزة بجمالية أكبر مثل VirtualTreeView
اقتباسكيف يمكن اظهار محتويات ملف معين في listview
السؤال في الشرق والصورة المرفقة في الغرب ...
أضيف على ما ذكره الأخ fh_feras :
بامكانك الإطلاع على المثال Delphi7\Demos\Virtual Listview ففيه ما تريد ..
أيضا TShellListView قد تفيدك ...
"First they ignore you, then they laugh at you, then they attack you, then you win"
===
اقتباسحُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا
هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا
الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا
القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ
لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ
البردوني "أبو تمام وعروبة اليوم" 1971
===
اقتباسعبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــمو تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم
ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم
أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟
ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا
البردوني "نحن و الحاكمون "
انا اريد ان استقبل اصنع برنامج شبكات يستقبل اسماء ملفات بامتداها و تظهر صورتها في listview
up
السلام عليكم
اخي ربما ينفعك هذا
procedure TForm1.Button1Click(Sender: TObject); var SR : TSearchRec; S,sFilePattern : String; Begin sFilePattern := ExtractFileDir(ParamStr(0)) + '\*.*'; S := ''; if FindFirst(sFilePattern,faAnyFile,SR) = 0 then Begin while FindNext(sr) = 0 do Listview.ltem.Add(SR.Name); End; End;
تحياتي
تم تعديل هذه المشاركة بواسطة BLOODYSTORM في 1 نوفمبر 2006 في 22:52
BLooDY - StOrM

أشهد ان لا اله الا الله واشهد ان محمد رسول الله
هذا الموضوع مغلق.