如何在快速报告中隐藏空文本对象的边框

Question

如何在文本对象为空时隐藏边框。我在同一列中使用了抑制选项来重复值，请参考图片 image

Answer 1

使用 procedure DBXQuery1FIELD2OnAfterData(Sender: TfrxComponent); begin if DBXQuery1FIELD2.Text = '' then DBXQuery1FIELD2.Frame.Typ := 0 else DBXQuery1FIELD2.Frame.Typ := ftLeft + ftRight + ftTop; end;