动态XtraReport在细节上为我提供了很多行之间的间距

Question

我正在编写一个使用 Excel 文件动态创建发票的程序。一切正常，除了报表详细信息部分显示行之间的大量间距，最大间距为 2 英尺。我正在使用绑定标签来创建行。我已经读到使用XRRichText可以提供帮助，但它没有。你能帮帮我吗？

报告：

public partial class XtraReport1 : DevExpress.XtraReports.UI.XtraReport
{
    public XtraReport1()
    {
        InitializeComponent();
    }
    public void AddBoundLabel(String bindingMember, Rectangle bounds)
    {
        XRLabel label = new XRLabel();
        Detail.Controls.Add(label);
        label.Font = new Font("Arial", 8);
        label.Location = bounds.Location;
        label.Size = bounds.Size;
        label.DataBindings.Add("Text", null, bindingMember);
        label.CanGrow = true;
        label.CanShrink = true;
        label.HeightF -= 50;
        label.Padding = 0;
    }
    private void xrLabel_BeforePrint(object sender, System.Drawing.Printing.PrintEventArgs e)
    {
        XRRichText label = sender as XRRichText;
        e.Cancel = true;
        label.HeightF = 1 ;
        label.Padding = 0;
    }
}

报告生成：

 private void button1_Click(object sender, EventArgs e)
    {
        int cantidad;
        string codigo, descripcion;
        double pU, pT;
        ArrayList listBindingSource = new ArrayList();
        List<String> myList = dataGridView1.DataSource as List<String>;
        for(int i = 0; i< dataGridView1.Rows.Count; i++)
        {
            cantidad = Convert.ToInt16(dataGridView1.Rows[i].Cells[0].Value);
            codigo = dataGridView1.Rows[i].Cells[1].Value.ToString();
            descripcion = dataGridView1.Rows[i].Cells[2].Value.ToString();
            pU = Convert.ToDouble(dataGridView1.Rows[i].Cells[3].Value);
            pT = Convert.ToDouble(dataGridView1.Rows[i].Cells[4].Value);
            listBindingSource.Add(new FacturaRecord(cantidad, codigo, descripcion, pU, pT));
        }
        XtraReport1 report = new XtraReport1();
        report.Margins = new System.Drawing.Printing.Margins(100, 100, 25, 25);
        report.DataSource = listBindingSource;
        report.xrLabel6.Text = String.Format("Date: {0}", dateTimePicker1.Value.ToShortDateString());
        report.xrLabel11.Text = String.Format("Invoice Number {0}", textBox1.Text);
        report.xrLabel12.Text = String.Format("Total: ${0}", sum);
        report.AddBoundLabel("cantidad", new Rectangle(100, 20, 50, 5));
        report.AddBoundLabel("codigo", new Rectangle(150, 20, 100, 5));
        report.AddBoundLabel("descripcion", new Rectangle(250, 20, 200, 5));
        report.AddBoundLabel("precioUnitario", new Rectangle(500, 20, 50, 5));
        report.AddBoundLabel("precioTotal", new Rectangle(600, 20, 50, 5));
        ReportPrintTool printTool = new ReportPrintTool(report);
        printTool.ShowPreviewDialog();
    }

Answer 1

数据绑定的 XtraReport 使用"详细信息带"设置呈现每一行。设置不仅包括添加到细节带的组件，还包括细节带高度。若要减小行之间的间距，请将 DetailBand.HeightF 属性设置为较小的值。