ساخت سیدی اموزشی با دلفی (فوری)

[omid_matrix3]

سلام به همه دلفی کاران عزیز
من می خوام یه سیدی اموزشی با دلفی بسازم و از همه این اموزش کلیپ تهیه کردم
حالا مشکلم اینکه تو سی دی چه جوری اینهارو مسیر دهی کنم
مثلا کلیپ در لینک
F:\amozesh delphi\13.avi زیر هست حالا که می خوام تو سیدی قرار بدم بجای \:F چی قرار بدم

با Multimedia Builder 4.8 ;کار میکردم این دستور <SrcDir>\ کارم رو راه می انداخت اما با دلفی؟
SrcDir>\amozesh delphi\13.avi>

[KhepeleSibilo]

ExtractFilePath(Application.ExeName);

[omid_matrix3]

میشه یه مثال بزنید

[KhepeleSibilo]

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

[mojtaba-design]

البته از این هم می شه :
getcurrentdir

[omid_matrix3]

ممنون از راهنمایی تون KhepeleSibilo ,mojtaba-design
اما باز نتونستم
کارایی که برای پخش کلیپ می کنم
1-بعد از ایجاد فرم از قسمت system یک mediapleyer1 میزارم تو فرم
2- روmediapleyer1 کلیک می کنم از منوی Object Inspector از FileName مسیر فایل رو انتخاب میکنم
F:\amozesh delphi\13.avi
3-AutoOpen را True می کنم
یا یک Button1 انتخاب می کنم روش کلیک می کنم و کد mediaplayer1.play; را می نویسم
حالا من این کدا را کجا قرار بدم و نیز uses خواصی هم فراخوانی بکنم

[omid_matrix3]

MediaPlayer1.FileName:=ExtractFilePath(Application .ExeName)+'amozesh delphi\13.avi';
MediaPlayer1.AutoOpen:=true;
MediaPlayer1. Open;
MediaPlayer1.Play;