Как из Делфи обратится к полю memo в отчете?

Комментарии

• Yeti Riga, Latvia

  November 2004 отредактировано 17:17

  Проперть Pages в TfrReport, в которой, соответственно, проперть Objects.
  А дальше - RTFM.
• vv_fran

  November 2004 отредактировано 17:17

  Уважаемый Yeti!, что-то я не нашел свойство RTFM. Можно поподробней осветить мой вопрос?
• Vlash

  November 2004 отредактировано 17:17

  Вот пример того, как я стучусь к объектам (Delphi 6.0, FR 2.50)
  procedure TSpecBuilder.frReport1GetValue(const ParName: String;
  var ParValue: Variant);
  var TmpMemo:TfrMemoView;
  begin
  TmpMemo:= frReport1.FindObject('MEMO4') as TfrMemoView;
  if (SpecTable.Cells[4,frUserDataset1.RecNo+1]='') then
  if AnsiCompareText(ParName, 'NAME') = 0 then
  begin
  ParValue := SpecTable.Cells[2,frUserDataset1.RecNo+1];
  TmpMemo.Font.Style:=[fsBold,fsUnderLine];
  end
  else
  ParValue:=''
  else
  TmpMemo.Font.Style:=[];
  end;