43 lines
990 B
Plaintext
Executable File
43 lines
990 B
Plaintext
Executable File
// gets playing music from WinAmp, and returns
|
|
BOOL CPostOptionsDlg::GetPlayingMusic(CString &song)
|
|
{
|
|
// is WinAMP open?
|
|
HWND hwndWinamp = ::FindWindow("Winamp v1.x",NULL);
|
|
if (hwndWinamp == NULL) return FALSE;
|
|
|
|
// in WinAMP playing?
|
|
int ret = ::SendMessage(hwndWinamp, WM_USER, 0, 104);
|
|
if (ret != 1) return FALSE;
|
|
|
|
// it is, let's find out what the title bar is:
|
|
char this_title[2048],*p;
|
|
::GetWindowText(hwndWinamp,this_title,sizeof(this_title));
|
|
p = this_title+strlen(this_title)-8;
|
|
while (p >= this_title)
|
|
{
|
|
if (!strnicmp(p,"- Winamp",8)) break;
|
|
p--;
|
|
}
|
|
if (p >= this_title) p--;
|
|
while (p >= this_title && *p == ' ') p--;
|
|
*++p=0;
|
|
|
|
char *iter, *start;
|
|
start = this_title;
|
|
iter = start;
|
|
|
|
// remove leading s/^\d+\. //;
|
|
int numhead = 0;
|
|
while (*iter) {
|
|
if (isdigit(*iter)) { iter++; numhead++; }
|
|
else break;
|
|
}
|
|
if (numhead && *iter=='.' && *(iter+1)==' ') {
|
|
start = iter+2;
|
|
}
|
|
|
|
song = start;
|
|
return TRUE;
|
|
}
|
|
|