Q&A

  • 퀵리포트에서 runtime시 QRChart에 Series 생성시 에러가...
DBChart에서는 잘 되었거든요.
근데 QRChart에서는 "access violation"  error 나네요.
누가 좀 도와주세요... ㅠㅠ

<DBChart에서 되는 코드>

var
IncSeries   : array of TFastLineSeries ;

.......

for i := 0 to Table1.RecordCount-1 do
begin
     IncSeries[i] := TFastLineSeries.Create( Self );
     IncSeries[i].ParentChart := DBChart2 ;
end;
k := 0;
While not Table4.Eof do
begin
     for i := 0 to inc_num do
     begin
       IncSeries[k].AddXY(Table4.Fields[5].AsFloat,Table4.Fields[1].AsFloat);
       Table4.Next;
     end;
     i := 0;
     k := k + 1;
  end;

<QRChart에서 안되는 코드>

procedure TFReport2.QuickRep1Preview(Sender: TObject);
var
IncSeries: array of TFastLineSeries;
i,k : integer;
begin
  for i := 0 to Table6.RecordCount-1 do
  begin
    QRChart1.Chart.AddSeries(IncSeries[i]);
    IncSeries[i] := TFastLineSeries.Create(Self);
    IncSeries[i].ParentChart := QRDBChart1 ;
  end;
  k := 0;
  While not Table4.Eof do
  begin
    for i := 0 to inc_num+1 do
    begin
      IncSeries[k].AddXY(Table4.Fields[5].AsFloat,Table4.Fields[1].AsFloat);
      Table4.Next;
    end;
    i := 0;
    k := k + 1;
  end;

end;

하루 종일 별짓 다해봤어요. 제발 좀 도와주세요.... 빨리

6  COMMENTS