Подскажите как вывести многомерный массив

отредактировано 21:40 Раздел: FastReport 3.0
Есть многомерный массив:
 rCodeNameGroup = array[0..4] of string;
  arCodeNameGroup = array of rCodeNameGroup;
Не могу сделать:
1. Обработку OnGetValue
2. Задать количество элементов для вывода
 frxForShowAlf.RangeEnd := reLast;
  frxForShowAlf.RangeEndCount := length(ArrForAlf) - 1;
- не работает

Комментарии

  • gpigpi
    отредактировано 21:40
    Насколько я понял, массив выводится через frxUserDataset?
    1. Нужно заполнить свойство Fields у датасета
    2.
     frxForShowAlf.RangeEnd := reCount;
     frxForShowAlf.RangeEndCount := length(ArrForAlf) - 1;
    
  • отредактировано 21:40
    gpi написал:
    Насколько я понял, массив выводится через frxUserDataset?
    1. Нужно заполнить свойство Fields у датасета
    Да, через UserDataSet
    У меня заполнено Fields:
    CODE
    NAME
    TYPE
    
    Как правильно сделать обработчик в OnGetValue
    Должно быть что-то типа:
    
    CODE := ArrForAlf[frxForShowAlf.RecNo][1];
    NAME := ArrForAlf[frxForShowAlf.RecNo][2];
    TYPE := ArrForAlf[frxForShowAlf.RecNo][3];
    
    

  • gpigpi
    отредактировано 21:40
    procedure TForm1.frxUserDataSet1GetValue(const VarName: String;
      var Value: Variant);
    begin
      if VarName='CODE' then Value := ArrForAlf[frxForShowAlf.RecNo][1];
      if VarName='NAME' then Value := ArrForAlf[frxForShowAlf.RecNo][2];
      if VarName='TYPE' then Value := ArrForAlf[frxForShowAlf.RecNo][3];
    end;
    
  • отредактировано March 2006
    Спасибо.

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.