XtraReports > 示例 > 如何：设置最终用户设计器中停靠面板的可视性

注意
重要说明： .NET Client Profile Framework 不支持此功能。要在最终用户的机器上使用此功能，则必须安装完整的 .NET Framework。更多信息，请参阅 Windows 窗体部署文档中的关于 .NET Framework 4.0 Client Profile 的重要说明小节。

这个示例展示了如何使用 XRDesignForm 类，来把报表加载到最终用户报表设计器窗体中。

为了把报表指派到设计器窗体，使用了 XRDesignForm.OpenReport 方法。同时，XRDesignForm.SetWindowVisibility 方法隐藏了所创建设计器窗体中的 Field List(字段列表) 和 属性网格 设计停靠面板。

C#	复制代码
using System; using System.Windows.Forms; using DevExpress.XtraReports.UI; using DevExpress.XtraReports.UserDesigner; // ... private void button1_Click(object sender, EventArgs e) { // Create a design form. XRDesignForm designForm = new XRDesignForm(); // Open the report to edit. designForm.OpenReport(new XtraReport1()); // Hide the Field List and Property Grid dock panels. designForm.SetWindowVisibility(DesignDockPanelType.FieldList \| DesignDockPanelType.PropertyGrid, false); // Invoke the design form. designForm.Show(); }

复制代码

using System;
using System.Windows.Forms;
using DevExpress.XtraReports.UI;
using DevExpress.XtraReports.UserDesigner;
// ...

private void button1_Click(object sender, EventArgs e) {
    // Create a design form.
    XRDesignForm designForm = new XRDesignForm();

    // Open the report to edit.
    designForm.OpenReport(new XtraReport1());

    // Hide the Field List and Property Grid dock panels.
    designForm.SetWindowVisibility(DesignDockPanelType.FieldList |
        DesignDockPanelType.PropertyGrid, false);

    // Invoke the design form.
    designForm.Show();
}

Visual Basic	复制代码
Imports System Imports System.Windows.Forms Imports DevExpress.XtraReports.UI Imports DevExpress.XtraReports.UserDesigner ' ... Private Sub OnButtonClick(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click ' Create a design form. Dim DesignForm As New XRDesignForm() ' Open the report to edit. DesignForm.OpenReport(New XtraReport1()) ' Hide the Field List and Property Grid dock panels. DesignForm.SetWindowVisibility(DesignDockPanelType.FieldList Or _ DesignDockPanelType.PropertyGrid, False) ' Invoke the design form. DesignForm.Show() End Sub

Visual Basic

复制代码

Imports System
Imports System.Windows.Forms
Imports DevExpress.XtraReports.UI
Imports DevExpress.XtraReports.UserDesigner
' ...

Private Sub OnButtonClick(ByVal sender As System.Object, _ 
ByVal e As System.EventArgs) Handles Button1.Click
    ' Create a design form.
    Dim DesignForm As New XRDesignForm()

    ' Open the report to edit.
    DesignForm.OpenReport(New XtraReport1())

    ' Hide the Field List and Property Grid dock panels.
    DesignForm.SetWindowVisibility(DesignDockPanelType.FieldList Or _ 
        DesignDockPanelType.PropertyGrid, False)

    ' Invoke the design form.
    DesignForm.Show()
End Sub

参阅