FastReportのDBクロスタブでカラムを非表示にする

Question

カラムヘッダーの値が14001の場合、FastReportのDBクロスタブからカラムを非表示にしようとしていました。しかし構文の下で仕事ではありません！

procedure DBCross2OnCalcWidth(ColumnIndex: Integer; ColumnValues: Variant;var Width: Extended); 
begin 
if (VarToStr(ColumnValues[0]) = '14001') then 
    Width := 0; 
end; 

Answer 1

手順を追加してみ印刷して、コレクションHeaderValues [0]

procedure DBCross2OnPrintColumnHeader(Memo: TfrxMemoView; HeaderIndexes, HeaderValues, Value: Variant); 
begin 
    if (VarToStr(HeaderValues[0]) = '14001') then 
    begin 
    Memo.Width := 0; 
    Memo.Height := 0; 
    Memo.Printable := false; 
    Memo.Visible := false;       
    end;      
end;