Visual Basic

Sohaib_A wrote:

when only the main form is maximized first and then i open the child form in it,it doesn't open as maxmized,it opens in normail window state

 Private Sub crView_Drill(ByVal source As Object, ByVal e As CrystalDecisions.Windows.Forms.DrillEventArgs) Handles crView.Drill


        Dim strsql As String
        Dim objUtil As New clsReportUtil
        Dim rpt As CrystalDecisions.CrystalReports.Engine.ReportDocument
        Dim ds As New DataSet

        rpt = Me.crView.ReportSource

        strsql = "Select * From tblDeliveryOrderHead " _
                & "INNER JOIN tblCustomer ON tblDeliveryOrderHead.CustomerID = tblCustomer.CustomerID " _
                & "Where CustomerName = '" & e.NewGroupName & "' "
        ds = objUtil.GetDataSet(IBS_Utility.clsUtLib.GetConnectionString, strsql)
rpt.Subreports(0).SetDataSource(ds)
Dim subc As New CrystalDecisions.Shared.SubreportContext()
subc.SubreportName = rpt.Subreports(0).Name
subc.PageNumber = CType(source, CrystalDecisions.Windows.Forms.PageView).GetCurrentPageNumber
subc.Position = New System.Drawing.Point(1827, 2889)

tN.GroupLevel = e.NewGroupLevel
tN.GroupName = e.NewGroupName
tN.GroupNamePath = e.NewGroupNamePath
tN.GroupPath = New Integer() {e.NewGroupPath}
subc.ContainingGroupInfo = tN

CTyp(source,CrystalDecisions.Windows.Forms.PageView).DrillDownOnSubreport(subc)

rpt.Refresh()
End Sub

...
rpt.Subreports(0).SetDataSource(ds)
rpt.SetDataSource(someOtherDs)
...