Определить на каком элементе в Превью сделан Клик

Комментарии

• -=Serg=-

  May 2006 отредактировано 10:14

  Наверно в сторону Demos\InteractiveReport
• -=Serg=-

  May 2006 отредактировано 10:14

  Или для начала лучше Demos\Main->BasicReports->Interactive report
• -=Den=-

  May 2006 отредактировано May 2006

  3D Bob написал:

  Хочу сделать РанТайм редактирование отчета.
  Подумал насчет того что можно сделать клик на превью и определить на каком именно элементе, например TfrxMemoview был сделать клик... И получить на него указатель. Скажите возможно ли это, сделать? И если да то в какую сторону копать?

  Сделать это можно в событии TfrxReport::OnClickObject :
  
  void __fastcall TForm1::frxReport1ClickObject(TfrxView *Sender,
  TMouseButton Button, TShiftState Shift, bool &Modified)
  {
  TfrxMemoView * Memo;
  if((Memo = dynamic_cast <TfrxMemoView*> (Sender)) != NULL)//вместо этого можно сравнить имя класса Sender->ClassName() с TfrxMemoView
  {
  ShowMessage(Memo->Name);
  Memo->Text = "New Text";
  frxReport1->Preview->Refresh();
  }
  
  }
• 3D Bob

  May 2006 отредактировано 10:14

  Спасибо. Глянув искходники. Именно такой код я реализовал пол часа назад)
  Но все равно примного благодарен.
• 3D Bob

  May 2006 отредактировано May 2006

  Вопрос Намбер два.
  После Report->PrepareReport()
  Значения возвращаются. С чем это связано и как этого избежать?
  
  
  Думаю знаю в чем дела. Вопрос в следующем, как из превью передать отчет обратно в репорт?
  
  Или как добавить элемент в превью?
  
  Задача изменять и добавлять объекты в превью.
• -=Den=-

  May 2006 отредактировано 10:14

  написал:

  
  Вопрос Намбер два.
  После Report->PrepareReport()
  Значения возвращаются. С чем это связано и как этого избежать?

  Отчет строится заново и заначения будут браться либо из базы либо из XML файла отчета.

  написал:

  Думаю знаю в чем дела. Вопрос в следующем, как из превью передать отчет обратно в репорт?

  попробуйте найти объект в самом отчете через FindObject:
  void __fastcall TForm1::frxReport1ClickObject(TfrxView *Sender,
  TMouseButton Button, TShiftState Shift, bool &Modified)
  {
  TfrxMemoView * Memo;
  if((Memo = dynamic_cast <TfrxMemoView*> (Sender)) != NULL)//вместо этого можно сравнить имя класса Sender->ClassName() с TfrxMemoView
  {
  ShowMessage(Memo->Name);
  Memo->Text = "New Text";
  Memo = dynamic_cast<TfrxMemoView *> (frxReport->FindObject(Memo->Name));
  Memo->Text = "NewText"
  frxReport1->Preview->Refresh();
  }
  }
  
  или сохраняйте отчет в fp3 формат.
• 3D Bob

  May 2006 отредактировано 10:14

  А возможно ли добавить обект в Превью, а не в главный Report, раз уже отчет для Превью строится заново. То есть обойти Report из которого загружаются старые данные, забыть о нем?
  А то я думал что превью отображает текущее в frxReport
• -=Den=-

  May 2006 отредактировано 10:14

  3D Bob написал:

  А возможно ли добавить обект в Превью, а не в главный Report, раз уже отчет для Превью строится заново. То есть обойти Report из которого загружаются старые данные, забыть о нем?

  Да, возможно.
  
  void __fastcall TForm1::frxReport1ClickObject(TfrxView *Sender,
  TMouseButton Button, TShiftState Shift, bool &Modified)
  {
  TfrxMemoView * Memo;
  if(strcmp(Sender->Name.c_str(),"Memo1") == 0)
  {
  Memo = new TfrxMemoView(frxReport1->PreviewPages->Page[0]);
  Memo->SetBounds(100,100,100,50);
  Memo->Text = "MEMO TEXT";
  }
  frxReport1->Preview->Refresh();
  }
• -=Den=-

  May 2006 отредактировано 10:14

  Page[0] можно заменить на Page[frxReport1->PreviewPages->CurPage], чтобы объект создавался на текущей странице.
• 3D Bob

  May 2006 отредактировано 10:14

  Благодарю.