Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2009.01.11;
Скачать: [xml.tar.bz2];

Вниз

Функция плагина winamp...   Найти похожие ветки 

 
FEV   (2008-11-26 20:10) [0]

Пишу маленький плагин к Winamp"у...
имею функцию

function winampuser(data:integer; id:integer):integer;
var
winamphwnd:hwnd;
begin
winamphwnd:=findwindow ("winamp v1.x", nil);
if winamphwnd<>0 then
result:=sendmessage (winamphwnd,wm_user,data, id)
else result:=-1;
end;


Имею подсказку:
winampuser(*,211) - Retrieves (and returns a pointer in "ret") a string that contains the filename of a playlist entry (indexed by "data"). Returns NULL if error, or if "data" is out of range.
Дело в том, что сама команда sendmessage возвращает всегда только integer;
Как мне получить строку имени файла или имя композиции и т.п. в общем чтоб вывело строку? Как модифицировать функцию?


 
Сергей М. ©   (2008-11-26 20:16) [1]

Ты где такой травы накурился ?


 
Slym ©   (2008-11-27 05:39) [2]

FEV   (26.11.08 20:10)
function winampuser(data:integer; id:integer):string;
begin
...
res:=sendmessage(winamphwnd,wm_user,data, id);
if res<>0 then
 result:=StrPas(res)
else
 result:="";
end;


 
Дядя Коля   (2008-11-28 14:06) [3]

FEV   (26.11.08 20:10)
Читай из заголовка окна)
GetWindowText :)



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2009.01.11;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.006 c
4-1202912615
Андрей Пл
2008-02-13 17:23
2009.01.11
Как определить что данные черех СОМ порт отправлены???


3-1212567348
french_cat
2008-06-04 12:15
2009.01.11
Установить фильтр для ADOQuery


6-1196964272
BlazeMaster
2007-12-06 21:04
2009.01.11
Вопрос о компоненте WebBrowser


2-1227687010
cosinus
2008-11-26 11:10
2009.01.11
Как понять, что тот или иной компонент создан?


2-1227865339
oracled
2008-11-28 12:42
2009.01.11
Консольное приложение, пытаюсь создать объект TString





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский