كيفية فتح مجلد على ملف معين

[you_per7]

السلام عليكم
هل توجد طريقة لفتح مجلد معين على ملف محدد؟

أفيدونا بارك الله فيكم

[S.FATEH]

لم افهم قصدك من فتح مجلد على ملف ؟؟؟ هل تريد فتح مجلد ام ماذا وضح اكثر من فضلك

[Agmcz]

السلام علبكم
كما قال الاخ S.FATEH
السؤال غير واضح !!!
إدا كنت تقصد فتح مجلد استعمل الدالة ShellExecute

[you_per7]

شئ من هذا القبيل

كود :

procedure TMainForm.OpenFileLocationItemClick(Sender: TObject); var Param: String; begin if FoundFiles.Selected <> nil then begin with FoundFiles.Selected do Param := Format('/n,/select,"%s%s"', [SubItems[0], Caption]); ShellExecute(0, 'Open', 'explorer.exe', PChar(Param), nil, SW_NORMAL); end; end;

هذا الأمر مستخرج من برنامج آخر...
حاولت محاكاته لكنني لم أتمكن من ذلك.
للتوضيح.... أود أفتح المجلد A على أن يتم تحديد الملف 1 ضمن هذا المجلد

[S.FATEH]

السلام عليكم
بعيدا عن استخدام Format مثال لفتح المجلد Test و تحديد الملف fateh.txt
فقط قم بتغيير المسار الى ما يناسبك

PHP كود :

procedure TForm1.Button1Click(Sender: TObject);
var
  Param: string;
begin
  Param := '/n,/select,' + '"' + 'c:\test\fateh.txt' + '"';
  ShellExecute(0, 'Open', 'explorer.exe', PChar(Param), nil, SW_NORMAL);
end; 


سلامي

[you_per7]

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

[S.FATEH]

ليس هناك ما أشرحه فقط explorer.exe يقبل برامترات تعامل معها !!!

كود :

http://support.microsoft.com/kb/314853