Форум: "Прочее";
Текущий архив: 2006.10.29;
Скачать: [xml.tar.bz2];
ВнизКак узнать какой файл используеться приложением Найти похожие ветки
← →
eRoR_rrr © (2006-10-03 09:03) [0]Нужно узнать полный путь к файлу который проигрываеться в WinAMP.
Заренее благодарен.
← →
pavel_guzhanov © (2006-10-03 09:31) [1]Выбрать файл в плей-листе и нажать Alt+3(цифра три). Или тебе программно надо?
← →
Гриха(снова пароль забыл) (2006-10-03 09:32) [2]
> Или тебе программно надо?
=)
← →
eRoR_rrr © (2006-10-03 19:57) [3]Конечно программно =))))
← →
Furyz © (2006-10-03 20:12) [4]Winampsdk угадал?
← →
eRoR_rrr © (2006-10-03 21:32) [5]Furyz © (03.10.06 20:12) [4]
Хм, покапался, не нашёл что нужно отсылать дабы получить имя файла. Или плохо искал просто ...
← →
Zeqfreed © (2006-10-03 22:07) [6]
function ActiveTracksFileName() : String;
const
IPC_GETPLAYLISTFILE = 211; //Returns the pointer to title of the Nth track in active playlist
IPC_GETLISTPOS = 125; //Returns an index of the current track in active playlist
var
hwndWinamp : HWND;
Idx, p : Integer;
op, process, read : Cardinal;
Buf : Pointer;
begin
Result := "";
hwndWinamp := FindWindow("Winamp v1.x", nil);
if (hwndWinamp <> 0) then begin
Idx := SendMessage(hwndWinamp, WM_USER, 0, IPC_GETLISTPOS);
p := SendMessage(hwndWinamp, WM_USER, Idx, IPC_GETPLAYLISTFILE);
if (p = 0) then Exit;
GetWindowThreadProcessId(hwndWinamp, process);
op := OpenProcess(PROCESS_VM_READ, false, process);
if (op <> 0) then begin
GetMem(Buf, 1024); //We assume that 1K will be enough to store the filename
try
ReadProcessMemory(op, Pointer(p), Buf, 1024, read);
if (read > 0) then Result := PChar(Buf);
finally
FreeMem(Buf);
end;
CloseHandle(op);
end;
end;
end;
← →
Zeqfreed © (2006-10-03 22:10) [7]> [6] Zeqfreed © (03.10.06 22:07)
Returns the pointer to title of the Nth track in active playlist
Тут имелось в видуReturns a pointer to the filename of the Nth track in active playlist
.
← →
eRoR_rrr © (2006-10-04 00:48) [8]Спасибо.
Всё таки я плохо искал =)
Страницы: 1 вся ветка
Форум: "Прочее";
Текущий архив: 2006.10.29;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.089 c