$mymetatags$
Наш опрос |
Создание mp3 плеера в Delphi 7
Для этого вам понадобяться следующие компоненты: Button вкладка Standard OpenDialog вкладка Dialogs MediaPlayer вкладка System Кидаем на форму эти компоненты и в обработчике событий он клик кнопки(Button) пишем: MediaPlayer1.Close; if opendialog1.Execute then begin MediaPlayer1.FileName:=opendialog1.FileName; MediaPlayer1.Open; end; В итоге код должен получиться таким : procedure TForm1.Button1Click(Sender: TObject); begin MediaPlayer1.Close; if opendialog1.Execute then begin MediaPlayer1.FileName:=opendialog1.FileName; MediaPlayer1.Open; end; end; end. По нажатию на кнопку Button будет открываться окно в котором нужно выбрать песню Плеер готов.
Гость
для того чтобы скачать "ИСХОДНИК", Вам нужно кликнуть по рекламным ссылкам.
|
|