آیا راهی هست که فایل صوتی رو روی فرم درگ کنم و برنامم بخونه و اجراش کنه؟

[mbshareat]

سلام
قبلا در مورد درگ کردن فایل مثل برنامه فکر کنم IDM سوال شده بود.
من یه راه آسون میخوام که فایل صوتی رو درگ کنم روی فرم برنامم و مثل برنامه های اجراگر فیلم که با درگ نام فیلم اجراش می کنند من هم تو برنامم صوت رو پخش کنم.
اگه یه راه ساده هست که من هم ممکنه متوجه بشم لطفا بفرمایین.

[BORHAN TEC]

سلام
راحت ترین راه استفاده از کامپوننت TJvDragDrop است که در JVCL وجود دارد. این هم یک نمونه کد در این رابطه:
procedure TForm1.FormCreate(Sender: TObject);
begin
JvDragDrop1.AcceptDrag := True;
JvDragDrop1.DropTarget := Panel1;
end;

procedure TForm1.JvDragDrop1Drop(Sender: TObject; Pos: TPoint; Value: TStrings);
var
I: Integer;
begin
for I := 0 to Pred(Value.Count) do
ShowMessage(Value[I]);
end;

در مورد پخش فایلها هم خودش یک بحث جداست و کامپوننت های مختلفی برای این کار وجود داره. ولی توجه داشته باشید که Delphi XE3 به صورت ذاتی از فرمتهای زیر پشتیبانی می کند:

در محیط ویندوز:
avi - wmv - mp4 - m4v - mov - wma - mp3 - wav

در محیط mac:
mov - m4v - mp4 - avi - wav - mp3

موفق باشید...

[Felony]

اگر نخواستید از کامپوننت خاصی استفاده کنید : http://delphi.about.com/od/windowsshellapi/a/accept-filedrop.htm