ورود

View Full Version : سوال: باز كردن و نمايش محتواي يك پوشه در My Computer


kamand314
شنبه 21 خرداد 1390, 13:06 عصر
سلام
چگونه مي تونم با دادن مسير در برنامه محتواي يك پوشه را در برنامه My Computer مشاهده كنم ؟
البته اين كارو با كامپوننتهاي مربوطه انجام داده ام منتها ميخوام صرفا در برنامه My computer بتونم اين كار بكنم
hossein_h62
شنبه 21 خرداد 1390, 13:22 عصر
سلام
از ShellExecute استفاده کنید!
یوسف زالی
شنبه 21 خرداد 1390, 13:45 عصر
سلام.
این رو تست کنید:


winexec('explorer d:', 0)
hossein_h62
شنبه 21 خرداد 1390, 14:00 عصر
بجای استفاده از تابع مرحوم winexec بهتره از SehllExecute استفاده بشه! :چشمک:
مثلا :
procedure TForm1.Button1Click(Sender: TObject);
var
str:String;
begin
str:=Edit1.Text;
ShellExecute(Handle, 'open', PChar('explorer'), PChar(str), nil, SW_SHOW);
end;
اضافه کردن ShellAPI به یونیت ها فراموش نشه.
یوسف زالی
شنبه 21 خرداد 1390, 14:05 عصر
مرحوم!!
:قهقهه:
درست می فرمایید.اما به خاطر سادگیش گفتم.
mbshareat
چهارشنبه 25 خرداد 1390, 01:12 صبح
با سلام
ممکنه بفرمایین چرا ShellExecute بهتره و چه فرقی داره؟
vcldeveloper
چهارشنبه 25 خرداد 1390, 01:20 صبح
ممکنه بفرمایین چرا ShellExecute بهتره
به همون دلیلی که گفته شد: مرحوم!

تابع WinExec ویندوز یک تابع منسوخ شده مربوط به دوره ویندوزهای 16 بیتی هست که فقط برای backward compatibility هنوز در ویندوز وجود داره و هیچ تضمینی هم نیست که در نسخه های آینده ویندوز وجود داشته باشه؛ پس برنامه نویسان باید از استفاده از آن در کدهای جدید خودشان پرهیز کنند.