2 Cross берущих данные из 2-x различных StringGrid

отредактировано 19:12 Раздел: FastReport 3.0
Имеется отчет с MasterData1 (в нем Cross1 + стоит показывать заголовок колонки) и MasterData2 (в нем Cross2).
Данной частью кода заполняется Cross2 - берущей свои данные из StringGrid3, а вот заполнить Cross1 не получается (данные должны браться из StringGrid4).
procedure TForm1.frxReport1BeforePrint(Sender: TfrxReportComponent);
var
  Cross: TfrxCrossView;
  i, j: Integer;
begin
if Sender is TfrxCrossView then
  begin
    Cross := TfrxCrossView(Sender);
     for j := 1 to CarCountActive do
      for i := 1 to 13 do
       begin
        Cross.AddValue([j], [i], [StringGrid3.Cells[i-1, j]]);
       end;
  end;
end;
Подскажите, как это можно реализовать?

Комментарии

  • отредактировано 19:12
    Что совсем ни у кого идей нет?
    Даже у разработчиков?
  • отредактировано April 2006
    procedure TForm1.frxReport1BeforePrint(Sender: TfrxReportComponent);
    var
     Cross: TfrxCrossView;
     i, j: Integer;
    begin
    if Sender is TfrxCrossView then
    if Sender.Name = 'Cross1' then
     begin
    //заполняем первый корсс.
       Cross := TfrxCrossView(Sender);
        for j := 1 to CarCountActive do
         for i := 1 to 13 do
          begin
           Cross.AddValue([j], [i], [StringGrid3.Cells[i-1, j]]);
          end;
     end
    else if Sender.Name = 'Cross2' then 
      begin
      //заполняем второй корсс.
       Cross := TfrxCrossView(Sender);
        for j := 1 to CarCountActive do
         for i := 1 to 13 do
          begin
           Cross.AddValue([j], [i], [StringGrid4.Cells[i-1, j]]);
          end;
    end;
       
    end;
    

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

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