Описываю обработчик прерывания

procedure IrqHandler(p:pointer);stdcall;
  Begin
   read_fifo(Data,HalfSize);
   reset_irq();
  End;

Далее описываю параметры
И пищу функцию
TIMER_INPUT_IRQ_START_E330(@IrqHandler);
происходить ошибка.

Как решить эту проблему?

Чего за ошибка то?

Дословно!
Пишет
“Variable required” на строчку “TIMER_INPUT_IRQ_START_E330(@IrqHandler);”.
И
“Unsatisfied forward or external declaration: ‘TForm1.IrqHandler’. “
на  “procedure IrqHandler(p:pointer);stdcall;”

Описали эту процедуру не там скорее всего.
IrqHandler должен быть глобальной процедурой а не методом класса.

Исправил! Но дальше…

Если я правильно понимаю то:
После генераций прерываний
TIMER_INPUT_IRQ_START_E330(@IrqHandler);
должен работать обработчик прерываний,
procedure IrqHandler(p:pointer);{stdcall;}
  Begin
   Read_Fifo(Data,HalfSize);
   Reset_IRQ();
  End;
но он у меня к нему не обращается. Почему?

А stdcall зачем закомментировали?

В поисках истины предпринимал различные попытки.
Если убирать комментарий, и соответственно в описании процедуры, то обработчик все равно не срабатывает. Вы не могли бы посмотреть всю программу,  если я отправлю на Ваш E-Mail,  может это прояснить ситуацию?

присылайте

Для платы Е330
Обработчик прерывания:

procedure PNIRQHandler(Hndl: THandle);stdcall;far;
begin
A := A + 1;
RESET_IRQ;
end;

Нажатие Кнопки

procedure TForm1.BitBtn1Click(Sender: TObject);
var
  I: Cardinal;
begin
  A := 0;
//  Channels[0] := 0;
  SET_FIFO_PARAMETERS_E330(10, 0);
  SET_TIME_PARAMETERS_E330(100);
  TIMER_INPUT_IRQ_START_E330(@PNIRQHandler);
  I := GetTickCount + 5000;
  while GetTickCount < I do; //ждем 5 сек
  STOP_FUNC_E330;
  Form1.Memo1.Lines.Add(IntToStr(A));
end;

Выдает А=1
Почему так?

Если данные не забирать то все встает. Потому и 1

var
  Buffer: array[0..1000] of char
......
Обработчик стал таким:

procedure PNIRQHandler(Hndl: THandle);stdcall;far;
begin
A := A + 1;
READ_FIFO(Buffer, 5);
RESET_IRQ;
end;

Все сработало, но только один раз!
Через некоторое время при запуску этой процедуры было выдано 0, а PLATA_TEST вернула 1.
Помогло только колное выключение питания компьютера... Но снова только на 1 раз.
Подскажите, пожалуйста, выход.

Там не просто сколько-то считать а именно половинку буфера.

Но если
SET_FIFO_PARAMETERS_E330(10,0)
устанавливает размер FIFO=10, то
READ_FIFO(Buffer, 5)
читает половину, не так ли?

Сразу несколько доп.вопросов
1. По умолчанию размер FIFO=400?
2. Как работает STOP_FUNC_E330, нужно ли (и если да, то как) очищать буфер перед следующим запуском?

1 да
2 просто останавливае сбор. нет

Почему после выполнения STOP_FUNC_E330 плата больше не отвечает при повторной попытки заного установить параметры и начать новое чтение данных, не проходит даже тест. Приходиться выключать питание компьютера.

Pavel, получил ли мой пример работы с E330 по IRQ?
Работает или нет?