Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];




Вниз

работа с mmSystem 


Satrap   (2001-12-07 14:56) [0]

Уважаемые мастера, помогите, очень нужно. Мне необходимо ипспользовать функцию WaveInOpen с флагом CALLBACK_FUNCTION. При этом, необходимо указать адрес CALLBACK-функции. Как это сделать, ума не приложу. Попробовал пользоваться оператором @@, но он возвращает pointer, а нужен Cardinal. Помогоите, то есь Help.



troits   (2001-12-07 20:20) [1]

procedure YourWaveInProc(hwi: HWAVEIN; uMsg: UINT; dwInstance, dwParam1, dwParam2:DWORD);
begin
// Твоя ф - ция
end;

Вызов:
waveInOpen(
lphWaveIn,
uDeviceID,
lpFormatEx,
DWORD(@YourWaveInProc), !!!!!!!
dwInstance,
dwFlags);



Satrap   (2001-12-13 10:13) [2]

большое спасибо за помошь, только вот входя в эту процедуру, я получаю ошибку, появляется окно с содержимым ячеек процессора. Я пытался написать
WaveInProc как метод своей формы и просто как паскалевскую процедуру, результат один. Может знаешь в чем дело.



troits   (2001-12-13 11:00) [3]

Попробуй
procedure YourWaveInProc(hwi: HWAVEIN; uMsg: UINT; dwInstance, dwParam1, dwParam2:DWORD); stdcall; - забыл указать stdcall

Наверняка дело в этом.
Я просто не работал никогда с этим API. Не проверил...



Satrap   (2001-12-17 14:49) [4]

Так и есть, спасибо.




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.035 c
1-42749           xmapa                 2002-01-30 13:13  2002.02.14  
User Functions в Quick Report


14-42830          DieMan                2001-12-23 20:50  2002.02.14  
Russian Help


4-42899           Вовка                 2001-12-16 21:37  2002.02.14  
WinAPI


1-42762           _SnAke_               2002-01-31 11:57  2002.02.14  
Отображение главной формы


14-42862          Макс                  2001-12-24 13:08  2002.02.14  
Help по EhLib