请问楼主:如何打开报表设计器的时候同时打开一个报表模板?(而不用打开设计器后再单击工具栏的“打开”按钮)
[此贴子已经被作者于2021/6/30 10:09:42编辑过]
全局代码
Private OpenReportFile As String
Public Sub New(ByVal OpenReportFile As String)
MyBase.New()
'该调用是 Windows 窗体设计器所必需的.
InitializeComponent()
'在 InitializeComponent() 调用之后添加任何初始化
Me.OpenReportFile = OpenReportFile
End Sub
Private Sub CustomDesign_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
'通过设定设计器控件的属性,自定义外观与行为
'AxGRDesigner1.OnlyLayout = True
'AxGRDesigner1.ShowExplorer = False
'AxGRDesigner1.ShowInspector = False
AxGRDesigner1.Report = Report
openFileDialog1.InitialDirectory = ProjectPath
If OpenReportFile IsNot Nothing Then
Report.LoadFromFile(OpenReportFile)
AxGRDesigner1.Reload()
End If
End Sub
Dim fm As System.Windows.Forms.Form = new CustomDesign(ProjectPath & "出库单.grf")
fm.Show()
[此贴子已经被作者于2021/6/30 14:25:10编辑过]
以下是引用linyunu在2021/6/30 10:31:00的发言:
全局代码
Private OpenReportFile As String
Public Sub New(ByVal OpenReportFile As String)
MyBase.New()
'该调用是 Windows 窗体设计器所必需的.
InitializeComponent()
Me.OpenReportFile = OpenReportFile
'在 InitializeComponent() 调用之后添加任何初始化
End Sub
Public Sub New()
MyBase.New()
'该调用是 Windows 窗体设计器所必需的.
InitializeComponent()
'在 InitializeComponent() 调用之后添加任何初始化
End Sub
Dim fm As System.Windows.Forms.Form = new CustomDesign(ProjectPath & "出库单.grf")
fm.Show()
[此贴子已经被作者于2021/6/30 10:33:14编辑过]
没调出啊,不知道哪里有问题。能上个附件(商业版)吗?谢谢
以下是引用y2287958在2021/6/30 11:58:00的发言:
没调出啊,不知道哪里有问题。能上个附件(商业版)吗?谢谢
之前的全局代码加上红色部分 ,然后new CustomDesign(ProjectPath & "出库单.grf") 蓝色是模板路径
是的,我是照做的。但是还是调不出来。下午我传个附件,请帮忙修改一下。谢谢