Приведите, пожалуйста пример использования ADC_Kadr для АЦП L-Card E-154 на Delphi.

Моя программа обнаруживает E-154, умеет его запускать и останавливать, но функцию ADC_Kadr(AdcKadr: pShort) не выполняет. Видимо, дело в корректности определения переменной AdcKadr?

Можно ли запускать функцию AdcKadr с частотой работы таймера?

А что такое "не выполняет"? Выполняет с ошибкой или в AdcKadr.pShort лежит что-то не то?

Вообще-то через USB работать подобным образом можно не быстрее чем 20-30 Гц.

Для функций, требующих четкую частоту дискретизации необходимо использовать потоковые функции.

Спасибо за оперативный ответ!

Когда я запускаю if pModule.Adc_Start() then writeln (/'Ok/'), это выполняется (так же как и Stop), а if pModule.Adc_Kadr(AdcKadr) then writeln (/'OK/') игнорируется

Что касается частоты 20-30 Гц, то меня она вполне устраивает. Я работаю с медленными процессами.

Что касается pShort и потоковых функций, то вынужден признать, что я - чайник и не знаю, как работать с переменной AdcKadr: pShort на Delphi, а в "Examples" примеры только на С++.
Прошу Вашей помощи в написании кода программы для AdcKadr.

А перед вызовом ADC_Kadr Вы вызываете SET_ADC_PARS() для выбора числа опрашиваемых каналов и выбора номеров опрашиваемых каналов?

Да, Set_Adc_Pars() устанавливаю. Программа пишет ОК в ответ на if pModule.Set_Adc_Pars() then writeln(/'OK/');

Я взял за основу пример ReadData для Delphi, закавычив собственно потоковую функцию ввода массива данных и оставив все, что связано с поиском E-154, проверкой и установкой параметров.

Хорошо бы вызвать функцию GetLastErrorInfo после неудачного вызова AdcKadr и посмотреть код ошибки.

Простите, как это сделать?
В примере для ReadData для Delphi, который я взял за основу, функция GetLastErrorInfo не прописана

А пришлите на support Ваш исходник.

Исходник выслал

Исходнки рассмотрели. Чтобы все было OK.
надо Kadr объявить как Kadr : array [0..3] of SHORT;
А в функцию передавать @Kadr. И потом смотреть Kadr[0] и т.п.

Большое спасибо! Действительно работает!