کمک - مشکلی در خصوص تابع ShellExecute در دلفی (فوری)

[میتی دات نت]

به نام خدا

با سلام خدمت همه دوستان :)

من می خواهم در برنامه توسط توابع API یک فایل pdf را باز کنم به صورت زیر :

<span dir=ltr><span dir=ltr>
procedure TForm1.Button2Click(Sender: TObject);
begin
ShellExecute(0,'Open',Pchar('d:\Qs.pdf'),Nil,Nil,S W_NORMAL);
end;
</span></span>
ولی در موقع اجرای برنامه LOGO برنامه Adobe Acrobat را نشان داده ولی برنامه اصلی باز نشده و فایل مورد نظر را نمایش نمیدهد ولی اگر از قبل برنامه Adobe Acrobat باز باشد بدون هیچ مشکلی فایل مورد نظر را نمایش می دهد .

آیا کسی علت آنرا می داند . :?: :?:

آیا راه بهتری وجود دارد . :idea:

-----------------------------------------------------------------------------------------------------------
:?: در ضمن چگونه در این قسمت تایپ مطالب از سمت چپ به راست امکان پذیر است

[Sohrab_Tapar]

به این شکل از اون استفاده کن

  AppName := 'C:\WINME\Desktop\ti89la.pdf';

  ShellExecute(0 , 'Open' , PChar(ExtractFileName(AppName)) ,

               '',PChar(ExtractFilePath(AppName))  ,SW_SHOWNORMAL);

[Mohammad S]

برای بخش دوم سوالت هم:
http://www.barnamenevis.org/faq.php?mode=bbcode

[SalarSoft]

این رو امتحان کن:

ShellExecute(0,nil,Pchar('d:\Qs.pdf'&#  41;,Nil,Nil,SW_NORMAL);

[میتی دات نت]

با سلام خدمت دوستان عزیز :lol:

جواب آقای Sohrab_Tapar کاملا درست بود و حتی نوشته خودم ولی اشکال در خود برنامه Adobe است .

نگارش شماره 5 آن را روی چند دستگاه امتحان کردم و همچنان همین مشکل برقرار بود ولی با نصب نگارش شماره 6 آن مشکل حل شد .

در خصوص پاسخ دوست عزیز SalarSoft به نظرم این حالت برای اجرای فایلهای exe باشد .

=====
با تشکر از همه دوستان :wink:

[MSK]

تابع FindExecutable هم مسیر برنامه اجرایی بازکننده یک فایل را برمی گرداند(در ShellAPI). :مخالف:
گفتم شاید بدرد بخوره.
:mrgreen:

[میتی دات نت]

به نام خدا


سلام (:D)

مثل خودم خیلی آقایی :wink:

:flower: