доступ к записям ADOQuery динамически

Комментарии

• Lex

  October 2005 отредактировано 03:43

  В принципе можно но опиши зачем тебе это нужно,
  возможно есть другое рещение этой проблемы.
  
  
  
• Buka

  October 2005 отредактировано 03:43

  Дело в том, что мне надо эти Memo располагать в различных местах отчета, а не по DataBand. У меня координаты расположения Memo зависят от значений, содержащихся в ADOQuery.
• Lex

  October 2005 отредактировано October 2005

  Если положение мемок меняеться и по горизонтале и по вертикале то вот-так:
  
  
  В программе на лету создавай мемки и распоогай их
  непосредственно на листе листе отчета.
  что - типа этого
  

  var 
    myMemo : Array of TfrxMemoView;
    myPage: TfrxReportPage;
    .....
    
    myPage:= frxReport.FindObject('Page1') as TfrxReportPage;
    while not myQuery.Eof do
    begin
      SetLength(myMemo, Length(myMemo)+1);
      myMemo[Length(myMemo) - 1] := TfrxMemoView.Create(myPage);
      myMemo[Length(myMemo) - 1].SetBonuts(.....);
      myMemo[Length(myMemo) - 1].Text := myQuery.FieldValues['Text'];
      myQuery.Next;
    end;
  

  
  Для того что-бы отчистить отчет от твоих мемок нужно
  сохранять их имена а затем ищя по
  именам (frxReport.FindObject) делать им free.
  Это необходимо делать потому, что после посторения отчета все
  объекты переносятся в поток и ты не сможещь их удалить обращаясь
  к через масив.
  
  
  Да... это все хорошо если ты не вылезешь за размер страницы, а иначе тебе прейдется добавлять ручками стринацы.