|
#1
|
||||
|
||||
Проигрыватель....
Здрасте)
Вообщем я написал проигрыватель на Delphi c использованием bass.dll vis_bass.dll и тд. Вообщем проблема в следущем хочу чтоб название трека отображалось в Mail.Ru Agent е как это сделать плиз подскажите очень надо... [ iNewStar.Ru ] - Продам! Вопросы в ПМ |
#2
|
||||
|
||||
посматрити тут: http://agent.mail.ru/ru/developers/index.html
если ответ не найдётся, то: Цитата:
Никакая цель не высока настолько, чтобы оправдывала недостойные средства для ее достижения. Невозможно решить проблему на том же уровне, на котором она возникла. Нужно стать выше этой проблемы, поднявшись на следующий уровень. (Альберт Энштеин) Существует три разновидности людей: те, кто видит; те, кто видит, когда им показывают; и те, кто не видит. Оскорбляя другого, ты не заботишься о самом себе. (Леонардо да Винчи) Моя политика проста - пашло всё н#куй. (Краснодеревщик М.) +++ |
#3
|
||||
|
||||
Цитата:
[ iNewStar.Ru ] - Продам! Вопросы в ПМ |
#4
|
||||
|
||||
Ппц...что никто не знает ответа?! хоть б какие ниюуть предложения былиб....вообще 0 рекции...(((
[ iNewStar.Ru ] - Продам! Вопросы в ПМ |
#5
|
||||
|
||||
Код:
//создай вот такую функцю function NowPlayingWindowProc(wnd, msg, wparam, lparam : Integer) : integer; stdcall; begin case msg of WM_USER : //Агентру еще проверяет играется ли сейчас песня //Для этого винампу посылается WM_USER, 104, 0 //1 - играет 3-пауза. if lParam = 104 then Result := 1 else Result := DefWindowProc(wnd, msg, wparam, lparam); else Result := DefWindowProc(wnd, msg, wparam, lparam); end; end; //Это выполни при создании формы var NowPlayingWnd : HWND; wc : TWndClass; begin ZeroMemory(@wc, SizeOf(Wc)); wc.lpfnWndProc := @NowPlayingWindowProc; wc.hInstance := HInstance; wc.lpszClassName := 'Winamp v1.x';//помоему так RegisterClass(wc); NowPlayingWnd := CreateWindow('Winamp v1.x', '<Нет трека>', 0, 0, 0, 0, 0, 0, 0, HInstance, nil); end. Что бы изменить текущую песню - поменяй заголовок Код:
SetWindowText(NowPlayingWnd, 'Terra Fantastica - Flavus '); Когда окно не будет нужно, сделай так Код:
DestroyWindow(NowPlayingWnd ) _________ Маленькая ошибка закралась в WM_USER необходимо проверять Lparam а не Wparam на 104 _________ А, да, сам метод - мы "притворяемся" винампом. ...сказал, и загрустил от бесспорной своей правоты Последний раз редактировалось 0nni, 12.09.2009 в 11:55. |
#6
|
|||
|
|||
___deleted
Последний раз редактировалось M-UNIT, 03.03.2015 в 12:26. |
#7
|
||||
|
||||
Цитата:
...сказал, и загрустил от бесспорной своей правоты |
#8
|
|||
|
|||
___deleted
Последний раз редактировалось M-UNIT, 03.03.2015 в 12:26. |
#9
|
|||
|
|||
Цитата:
Новый файловый хостинг. |