[ainagul]

Сам уже решил вопрос... Таким вот макаром (фрагмент кода, мо кому надо будет):

Код:

i:=Form2.Table2.RecordCount; //общее кол-во записей
j:=0; //индекс элемента массива
RecNum:=1; //номер записи в таблице БД
while RecNum<=i do //ставил RecNum:=0; whileRecNum<i - некорректно
  begin
  Form2.Table2.RecNo:=RecNum;
  SetLength(qnumarray, i); //задаём длину динамического массива с нужными данными 
  qnumarray[j]:=Form2.Table2.FieldByName('Код вопроса').AsInteger;
  j:=j+1;
  RecNum:=RecNum+1;
  end;

Admin: Пользуемся тегами!