Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.09.2009, 23:42   #1
askerpro
Новичок
Джуниор
 
Регистрация: 17.09.2009
Сообщений: 45
По умолчанию now playing

как узнать название текущей песни в плеере, в частности в winamp.
в какой переменной содержится название? знаю как узнать битрейт текущей песни, а как узнать название не знаю
код для получения битрейта:
Код:
#include "main.h"

int WinMain(HINSTANCE     hInstance,
               HINSTANCE     hPrevInstance,
               LPSTR          lpCmdLine,
               int               nCmdShow)
{
     HWND          hWnd;
     LRESULT          lResult;

     hWnd = FindWindow(NULL, "356. Hush - Fired Up - Winamp");
     lResult = SendMessage(hWnd, WM_USER, 1, 126);

     return 0;
}
список команд winamp
http://www.delphisources.ru/pages/fa...th_winamp.html
askerpro вне форума Ответить с цитированием
Старый 30.09.2009, 23:42   #2
askerpro
Новичок
Джуниор
 
Регистрация: 17.09.2009
Сообщений: 45
По умолчанию

сразу скажу пользовался поиском... не нашел
askerpro вне форума Ответить с цитированием
Старый 30.09.2009, 23:43   #3
askerpro
Новичок
Джуниор
 
Регистрация: 17.09.2009
Сообщений: 45
По умолчанию

так как название окна винампа постоянно меняется на название текущей песни, чтобы найти окно надо посмотреть название, и какой то замкнутый круг получается
"356. Hush - Fired Up - Winamp" в коде
askerpro вне форума Ответить с цитированием
Старый 01.10.2009, 00:30   #4
ZuBy
Участник клуба
 
Аватар для ZuBy
 
Регистрация: 29.09.2008
Сообщений: 1,234
По умолчанию

искать нужно
Hnd := FindWindow('Winamp v1.x', nil);
а получать уже
SendMessage(Hnd, WM_GETTEXT, *,*);
ZuBy вне форума Ответить с цитированием
Старый 01.10.2009, 01:28   #5
askerpro
Новичок
Джуниор
 
Регистрация: 17.09.2009
Сообщений: 45
По умолчанию

пасиб)
помог
askerpro вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц