Iska, например, я Вас спрашиваю, как вывести значение текстового поля в лэйбл. А Вы, вместо того, чтобы ответить
Label1.Caption := Edit1.Text;
просите предоставить исходный код.
Цитата:
Никто, кроме Вас, не знает, что скрывается под
Цитата:
|
проигрыватель, написанный мной на основе wmp (элемент activex tWindowsMediaPlayer)
|
|
Все кроме Вас это знают.
Но чтобы уже не заводить этот диалог в никуда, вот код
Код:
***
TWindowsMediaPlayer: WMP;
***
***
***
WMP->URL = "C:\1.avi";
WMP->Controls.Play;
Вот. А теперь скажите, как этот код проапгрейдить, чтобы звук шел с нужного мне (а не проигрывателю) устройства.
