Как из Делфи обратится к полю memo в отчете?
FR2.53. Отчет без Band, одна страница, как платежка. Как из Делфи обратится к полю memo в отчете?
Я гружу отчет из файла и мне надо проверить, есть ли там поле memo2, какой оно ширины, есть ли скрипт у него? Это поле адреса организации, хочу сделать что-то типа защиты от распространения. Другие способы очень неудобны.
Я гружу отчет из файла и мне надо проверить, есть ли там поле memo2, какой оно ширины, есть ли скрипт у него? Это поле адреса организации, хочу сделать что-то типа защиты от распространения. Другие способы очень неудобны.
Комментарии
А дальше - RTFM.
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;