Версия для печати темы

Автор: Артемий2 22.11.2006 19:52

Здрастье. Пишу плеер и столкнулся с проблемой - как узнать, какое расширение имеет муз. файл (.mp3;.mpg;.avi и т.д). Должно получиться вроде того:

Автор: volvo 22.11.2006 19:56

ExtractFileExt чем не устраивает?

Автор: Артемий2 22.11.2006 20:07

Извини, я наверное описался, я имел ввиду то, что я уже знаю какое расширение файл. Не могу только понять, помоги пожалуйста разобраться.
Вот так:

if {расширение .WAV} then begin
                   {делаем какие-то действия.}
                     end;
                  if {расширение .MP3} then begin
                    {делаем какие-то действия.}
                     end;  

Автор: Артемий2 23.11.2006 18:14

Прости volvo, лоханулся. Вот че получилось:

begin
 OpenDialog1.Execute;
 if ExtractFileExt(OpenDialog1.FileName) = '.mp3' then begin
 MediaPlayer1.FileName := OpenDialog1.FileName;
 MediaPlayer1.Open;
 Mediaplayer1.Play;
 end;
end;