frxCrossView

Comments

• BJL Brussels, Belgium

  October 2004 edited 10:48PM

  I am trying to fill a DBCrossView using the following code. But I get an error at the AddValue line saying "Bad Variant type". I admit I have a pour experience on working with Variant. Can someone helps?
  
  void __fastcall TForm1::frxReport2BeforePrint(TfrxReportComponent *Sender)
  {
  TfrxDBCrossView* Cross;
  if (dynamic_cast<TfrxDBCrossView*>(Sender))
  {
  Cross = dynamic_cast<TfrxDBCrossView*>(Sender);
  dsStat->First();
  while (!dsStat->Eof)
  {
  for (int i = 4; i < dsStat->Fields->Count; i++)
  {
  Variant RH[2] = {dsStat->Fields->Fields[1]->AsString, dsStat->Fields->Fields[3]->AsString};
  Variant CH[1] = {dsStat->Fields->Fields->DisplayLabel};
  Variant C[1] = {dsStat->Fields->Fields->AsFloat};
  Cross->AddValue(RH, 2, CH, 1, C, 1); }
  dsStat->Next();
  }
  }
  }
  
  Thanks
  
  BJL