Форум: Техническая поддержка

Почему в процедуре STREAM в Delphi 6 не получается использовать динамические массивы - выдает ошибку? Как быть если я заранее не знаю размер количество снимаемых точек?
Привожу код где возникает ошибка:
const
        CurChannel = 0;
        Rate = 100;
var
        DAData, ADData      :array of integer;
        i                   :cardinal;
begin
  OUTDA(-1024);
  SetLength(ADData, NPoint);
  for i:=0 to NPoint-1 do ADData[i]:=i;
  STREAM(ADData, NPoint, CurChannel, Rate);
  ListBox1.Items.Clear;
  for i:=0 to NPoint-1 do
  begin
    LisBox1.Items.Add(IntToStr(ADData[i]));
  end;
end;

Npoint задается отдельно

Надо делать динамически выделяемый массив. Туда передается указатель на область памяти куда данные класть. Функция собирает заведомо известное количество данных типа ShortInt.