Hi
My code is as below ....
It fails on the very first line.
I most definately have an object "oIndividual" defined in the DetailSection.
I have also used the Find method of the Items method but have the same problem.
Any ideas ?
Kind Regards
David
My code is as below ....
Private Sub DetailSection_ItemDataBound(ByVal sender As Object, ByVal e As System.EventArgs) Handles DetailSection.ItemDataBound |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oIndividual").Visible = False |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oSoleTrader").Visible = False |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oOrganisation").Visible = False |
If CType(CType(CType(sender, Telerik.Reporting.Processing.DetailSection).DataItem, DataRowView).Row("DARGA_nEntityType"), DAREnterprises.Enums.EntityTypes).Equals(DAREnterprises.Enums.EntityTypes.Individual) Then |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oIndividual").Visible = True |
ElseIf CType(CType(CType(sender, Telerik.Reporting.Processing.DetailSection).DataItem, DataRowView).Row("DARGA_nEntityType"), DAREnterprises.Enums.EntityTypes).Equals(DAREnterprises.Enums.EntityTypes.SoleTrader) Then |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oSoleTrader").Visible = True |
Else |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oOrganisation").Visible = True |
End If |
End Sub |
I most definately have an object "oIndividual" defined in the DetailSection.
I have also used the Find method of the Items method but have the same problem.
Any ideas ?
Kind Regards
David
6 Answers, 1 is accepted
0
hkdave95
Top achievements
Rank 2
answered on 09 Jun 2008, 11:05 PM
Hi
A lettle more delving and I get "The pointer for this method was null" when trying to display the items method in the immediate window.
Kind Regards
David
A lettle more delving and I get "The pointer for this method was null" when trying to display the items method in the immediate window.
Kind Regards
David
0
Hello David,
The code you've provided works properly on our end, so we are not sure what might be causing the null reference exception. Please provide more info on how do you bind/create your report and its items in the details section or send a sample report, we can look into.
All the best,
Steve
the Telerik team
Instantly find answers to your questions at the new Telerik Support Center
The code you've provided works properly on our end, so we are not sure what might be causing the null reference exception. Please provide more info on how do you bind/create your report and its items in the details section or send a sample report, we can look into.
All the best,
Steve
the Telerik team
Instantly find answers to your questions at the new Telerik Support Center
0
hkdave95
Top achievements
Rank 2
answered on 10 Jun 2008, 05:55 PM
Hi
Here is my report ...
Kind Regards
David
Here is my report ...
Option Explicit On |
Option Strict On |
Imports System.Web.UI |
Imports System.ComponentModel |
Imports System.Drawing |
Imports System.Windows.Forms |
Imports Telerik.Reporting |
Imports Telerik.Reporting.Drawing |
Public Class Report_AddressesDetailed |
Inherits Report |
Private WithEvents DetailSection As Telerik.Reporting.DetailSection |
Private WithEvents titleTextBox As Telerik.Reporting.TextBox |
Private WithEvents reportHeader As Telerik.Reporting.ReportHeaderSection |
Private WithEvents pageInfoTextBox As Telerik.Reporting.TextBox |
Private WithEvents currentTimeTextBox As Telerik.Reporting.TextBox |
Private WithEvents pageFooter As Telerik.Reporting.PageFooterSection |
Private WithEvents reportNameTextBox As Telerik.Reporting.TextBox |
Private WithEvents DARGA_sID As Telerik.Reporting.TextBox |
Private WithEvents DARGA_sName As Telerik.Reporting.TextBox |
Private WithEvents pageHeader As Telerik.Reporting.PageHeaderSection |
Private WithEvents dareSOFT_DataSet As DAREnterprises.Data.dareSOFT_DataSet |
Friend WithEvents oCompanyName As Telerik.Reporting.SubReport |
Friend WithEvents Subreport_CompanyName As DAREnterprises.Library_Specific.Subreport_CompanyName |
Private Shared loSavedPage As Page = Nothing |
Friend WithEvents pnlDetails As Telerik.Reporting.Panel |
Friend WithEvents sDetails As Telerik.Reporting.TextBox |
Friend WithEvents pnlName As Telerik.Reporting.Panel |
Friend WithEvents oIndividual As Telerik.Reporting.SubReport |
Friend WithEvents oOrganisation As Telerik.Reporting.SubReport |
Friend WithEvents oSoleTrader As Telerik.Reporting.SubReport |
Friend WithEvents TextBox1 As Telerik.Reporting.TextBox |
Friend WithEvents Panel1 As Telerik.Reporting.Panel |
Friend WithEvents Subreport_Organisation As DAREnterprises.Library_Specific.Subreport_Organisation |
Friend WithEvents Subreport_Individual1 As DAREnterprises.Library_Specific.Subreport_Individual |
Private poPage As Page |
Public Sub New(ByVal loPage As Page) |
Call Me.InitializeComponent() |
Me.Report.DataSource = Nothing |
Me.poPage = loPage |
Call SetGetPage(loPage) |
End Sub |
Private Sub InitializeComponent() |
Dim StyleRule1 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule |
Dim StyleRule2 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule |
Dim StyleRule3 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule |
Dim StyleRule4 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule |
Me.pageHeader = New Telerik.Reporting.PageHeaderSection |
Me.reportNameTextBox = New Telerik.Reporting.TextBox |
Me.pageFooter = New Telerik.Reporting.PageFooterSection |
Me.currentTimeTextBox = New Telerik.Reporting.TextBox |
Me.pageInfoTextBox = New Telerik.Reporting.TextBox |
Me.oCompanyName = New Telerik.Reporting.SubReport |
Me.Subreport_CompanyName = New DAREnterprises.Library_Specific.Subreport_CompanyName |
Me.reportHeader = New Telerik.Reporting.ReportHeaderSection |
Me.titleTextBox = New Telerik.Reporting.TextBox |
Me.DetailSection = New Telerik.Reporting.DetailSection |
Me.DARGA_sID = New Telerik.Reporting.TextBox |
Me.DARGA_sName = New Telerik.Reporting.TextBox |
Me.pnlDetails = New Telerik.Reporting.Panel |
Me.sDetails = New Telerik.Reporting.TextBox |
Me.pnlName = New Telerik.Reporting.Panel |
Me.Panel1 = New Telerik.Reporting.Panel |
Me.oOrganisation = New Telerik.Reporting.SubReport |
Me.Subreport_Organisation = New DAREnterprises.Library_Specific.Subreport_Organisation |
Me.oIndividual = New Telerik.Reporting.SubReport |
Me.oSoleTrader = New Telerik.Reporting.SubReport |
Me.TextBox1 = New Telerik.Reporting.TextBox |
Me.dareSOFT_DataSet = New DAREnterprises.Data.dareSOFT_DataSet |
Me.Subreport_Individual1 = New DAREnterprises.Library_Specific.Subreport_Individual |
CType(Me.Subreport_CompanyName, System.ComponentModel.ISupportInitialize).BeginInit() |
CType(Me.Subreport_Organisation, System.ComponentModel.ISupportInitialize).BeginInit() |
CType(Me.dareSOFT_DataSet, System.ComponentModel.ISupportInitialize).BeginInit() |
CType(Me.Subreport_Individual1, System.ComponentModel.ISupportInitialize).BeginInit() |
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit() |
' |
'pageHeader |
' |
Me.pageHeader.Height = New Telerik.Reporting.Drawing.Unit(0.71428573131561279, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.pageHeader.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.reportNameTextBox}) |
Me.pageHeader.Name = "pageHeader" |
Me.pageHeader.PrintOnLastPage = False |
Me.pageHeader.Style.Font.Style = System.Drawing.FontStyle.Regular |
' |
'reportNameTextBox |
' |
Me.reportNameTextBox.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.052910052239894867, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.052910052239894867, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.reportNameTextBox.Name = "reportNameTextBox" |
Me.reportNameTextBox.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(25.620635986328125, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.60000002384185791, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.reportNameTextBox.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.reportNameTextBox.StyleName = "PageInfo" |
Me.reportNameTextBox.Value = "Report_AddressesDetailed" |
' |
'pageFooter |
' |
Me.pageFooter.Height = New Telerik.Reporting.Drawing.Unit(1.3999996185302734, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.pageFooter.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.currentTimeTextBox, Me.pageInfoTextBox, Me.oCompanyName}) |
Me.pageFooter.Name = "pageFooter" |
Me.pageFooter.Style.BorderStyle.Default = Telerik.Reporting.Drawing.BorderType.Solid |
Me.pageFooter.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.pageFooter.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Bottom |
' |
'currentTimeTextBox |
' |
Me.currentTimeTextBox.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.052910052239894867, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.940740704536438, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.currentTimeTextBox.Name = "currentTimeTextBox" |
Me.currentTimeTextBox.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(8.12169361114502, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.43270394206047058, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.currentTimeTextBox.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(8, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
Me.currentTimeTextBox.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.currentTimeTextBox.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left |
Me.currentTimeTextBox.StyleName = "PageInfo" |
Me.currentTimeTextBox.Value = "=NOW()" |
' |
'pageInfoTextBox |
' |
Me.pageInfoTextBox.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(17.525197982788086, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.91438579559326172, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.pageInfoTextBox.Name = "pageInfoTextBox" |
Me.pageInfoTextBox.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(8.12169361114502, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.45905885100364685, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.pageInfoTextBox.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(8, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
Me.pageInfoTextBox.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.pageInfoTextBox.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.pageInfoTextBox.StyleName = "PageInfo" |
Me.pageInfoTextBox.Value = "=PageNumber + ' of ' + PageCount" |
' |
'oCompanyName |
' |
Me.oCompanyName.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.0352732352912426, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.oCompanyName.Name = "oCompanyName" |
Me.oCompanyName.Parameters.Add(New Telerik.Reporting.Parameter("O_nId", "= GetCurrentCompanyO_nId()")) |
MeMe.oCompanyName.ReportSource = Me.Subreport_CompanyName |
Me.oCompanyName.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(25.620637893676758, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.826002299785614, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.oCompanyName.Style.Color = System.Drawing.Color.Black |
Me.oCompanyName.Style.Font.Name = "Verdana" |
Me.oCompanyName.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(8, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
Me.oCompanyName.Style.Font.Style = System.Drawing.FontStyle.Bold |
' |
'reportHeader |
' |
Me.reportHeader.Height = New Telerik.Reporting.Drawing.Unit(1.059259295463562, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.reportHeader.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.titleTextBox}) |
Me.reportHeader.Name = "reportHeader" |
Me.reportHeader.Style.BackgroundColor = System.Drawing.Color.LightGray |
Me.reportHeader.Style.BorderStyle.Default = Telerik.Reporting.Drawing.BorderType.Solid |
Me.reportHeader.Style.Font.Style = System.Drawing.FontStyle.Regular |
' |
'titleTextBox |
' |
Me.titleTextBox.Name = "titleTextBox" |
Me.titleTextBox.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(25.646890640258789, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.95925933122634888, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.titleTextBox.Style.BackgroundColor = System.Drawing.Color.Empty |
Me.titleTextBox.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.titleTextBox.StyleName = "Title" |
' |
'DetailSection |
' |
Me.DetailSection.Height = New Telerik.Reporting.Drawing.Unit(10.9264554977417, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.DetailSection.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.DARGA_sID, Me.DARGA_sName, Me.pnlDetails, Me.sDetails, Me.pnlName, Me.TextBox1}) |
Me.DetailSection.Name = "DetailSection" |
Me.DetailSection.Style.BorderStyle.Default = Telerik.Reporting.Drawing.BorderType.Solid |
Me.DetailSection.Style.Font.Style = System.Drawing.FontStyle.Regular |
' |
'DARGA_sID |
' |
Me.DARGA_sID.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(19.769412994384766, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.026554936543107033, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.DARGA_sID.Name = "DARGA_sID" |
Me.DARGA_sID.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(5.90413236618042, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.47344470024108887, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.DARGA_sID.Style.Font.Name = "Verdana" |
Me.DARGA_sID.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.DARGA_sID.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.DARGA_sID.Value = "=Fields.DARGA_sID" |
' |
'DARGA_sName |
' |
Me.DARGA_sName.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.052909649908542633, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.00019981748482678086, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.DARGA_sName.Name = "DARGA_sName" |
Me.DARGA_sName.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(19.663393020629883, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.47344470024108887, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.DARGA_sName.Style.Color = System.Drawing.Color.Black |
Me.DARGA_sName.Style.Font.Name = "Verdana" |
Me.DARGA_sName.Style.Font.Style = System.Drawing.FontStyle.Bold |
Me.DARGA_sName.Value = "=Fields.DARGA_sName" |
' |
'pnlDetails |
' |
Me.pnlDetails.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(13.126455307006836, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.1798646450042725, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.pnlDetails.Name = "pnlDetails" |
Me.pnlDetails.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(12.347090721130371, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(9.4201345443725586, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.pnlDetails.Style.BorderStyle.Default = Telerik.Reporting.Drawing.BorderType.Solid |
Me.pnlDetails.Style.Font.Style = System.Drawing.FontStyle.Regular |
' |
'sDetails |
' |
Me.sDetails.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(13.126455307006836, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.52675461769104, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.sDetails.Name = "sDetails" |
Me.sDetails.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.9999994039535522, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.59999984502792358, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.sDetails.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.sDetails.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Bottom |
Me.sDetails.Value = "Details" |
' |
'pnlName |
' |
Me.pnlName.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.Panel1}) |
Me.pnlName.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.29999992251396179, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.1798646450042725, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.pnlName.Name = "pnlName" |
Me.pnlName.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(12.546890258789063, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.7201354503631592, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.pnlName.Style.BorderStyle.Default = Telerik.Reporting.Drawing.BorderType.Solid |
Me.pnlName.Style.Font.Style = System.Drawing.FontStyle.Regular |
' |
'Panel1 |
' |
Me.Panel1.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.oOrganisation, Me.oIndividual, Me.oSoleTrader}) |
Me.Panel1.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.19999994337558746, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.17314648628234863, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.Panel1.Name = "Panel1" |
Me.Panel1.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(11.900099754333496, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.3469890356063843, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.Panel1.Style.Font.Style = System.Drawing.FontStyle.Regular |
' |
'oOrganisation |
' |
Me.oOrganisation.Dock = System.Windows.Forms.DockStyle.Fill |
Me.oOrganisation.Name = "oOrganisation" |
Me.oOrganisation.Parameters.Add(New Telerik.Reporting.Parameter("O_nId", "Fields.[DARGA_nEntityId]")) |
MeMe.oOrganisation.ReportSource = Me.Subreport_Organisation |
Me.oOrganisation.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(11.900099754333496, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.3469890356063843, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.oOrganisation.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.oOrganisation.Visible = False |
' |
'oIndividual |
' |
Me.oIndividual.Dock = System.Windows.Forms.DockStyle.Fill |
Me.oIndividual.Name = "oIndividual" |
Me.oIndividual.Parameters.Add(New Telerik.Reporting.Parameter("I_nId", "=Fields.[DARGA_nEntityId]")) |
MeMe.oIndividual.ReportSource = Me.Subreport_Individual1 |
Me.oIndividual.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(11.900099754333496, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.3469890356063843, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.oIndividual.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.oIndividual.Visible = False |
' |
'oSoleTrader |
' |
Me.oSoleTrader.Dock = System.Windows.Forms.DockStyle.Fill |
Me.oSoleTrader.Name = "oSoleTrader" |
Me.oSoleTrader.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(11.900099754333496, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.3469890356063843, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.oSoleTrader.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.oSoleTrader.Visible = False |
' |
'TextBox1 |
' |
Me.TextBox1.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.29999992251396179, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.52675461769104, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.TextBox1.Name = "TextBox1" |
Me.TextBox1.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.0000002384185791, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.60000145435333252, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.TextBox1.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.TextBox1.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Bottom |
Me.TextBox1.Value = "Name" |
' |
'dareSOFT_DataSet |
' |
Me.dareSOFT_DataSet.DataSetName = "dareSOFT_DataSet" |
Me.dareSOFT_DataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema |
' |
'Report_AddressesDetailed |
' |
Me.Culture = New System.Globalization.CultureInfo("") |
Me.DataMember = "dargAddresses_0" |
MeMe.DataSource = Me.dareSOFT_DataSet |
Me.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.pageHeader, Me.pageFooter, Me.reportHeader, Me.DetailSection}) |
Me.PageSettings.Landscape = True |
Me.PageSettings.Margins.Bottom = New Telerik.Reporting.Drawing.Unit(2, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.PageSettings.Margins.Left = New Telerik.Reporting.Drawing.Unit(2, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.PageSettings.Margins.Right = New Telerik.Reporting.Drawing.Unit(2, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.PageSettings.Margins.Top = New Telerik.Reporting.Drawing.Unit(2, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.PageSettings.PaperKind = System.Drawing.Printing.PaperKind.A4 |
Me.Sorting.AddRange(New Telerik.Reporting.Data.Sorting() {New Telerik.Reporting.Data.Sorting("=Fields.DARGA_sName", Telerik.Reporting.Data.SortDirection.Asc)}) |
Me.Style.Font.Style = System.Drawing.FontStyle.Regular |
StyleRule1.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Title")}) |
StyleRule1.Style.BackgroundColor = System.Drawing.Color.Empty |
StyleRule1.Style.Color = System.Drawing.Color.FromArgb(CType(CType(28, Byte), Integer), CType(CType(58, Byte), Integer), CType(CType(112, Byte), Integer)) |
StyleRule1.Style.Font.Name = "Verdana" |
StyleRule1.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(18, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
StyleRule1.Style.Font.Style = System.Drawing.FontStyle.Regular |
StyleRule2.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Caption")}) |
StyleRule2.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(28, Byte), Integer), CType(CType(58, Byte), Integer), CType(CType(112, Byte), Integer)) |
StyleRule2.Style.Color = System.Drawing.Color.White |
StyleRule2.Style.Font.Name = "Verdana" |
StyleRule2.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(11, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
StyleRule2.Style.Font.Style = System.Drawing.FontStyle.Bold |
StyleRule2.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle |
StyleRule3.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Data")}) |
StyleRule3.Style.Color = System.Drawing.Color.Black |
StyleRule3.Style.Font.Name = "Verdana" |
StyleRule3.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
StyleRule3.Style.Font.Style = System.Drawing.FontStyle.Regular |
StyleRule3.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle |
StyleRule4.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("PageInfo")}) |
StyleRule4.Style.Color = System.Drawing.Color.Black |
StyleRule4.Style.Font.Name = "Verdana" |
StyleRule4.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(8, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
StyleRule4.Style.Font.Style = System.Drawing.FontStyle.Regular |
StyleRule4.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle |
Me.StyleSheet.AddRange(New Telerik.Reporting.Drawing.StyleRule() {StyleRule1, StyleRule2, StyleRule3, StyleRule4}) |
Me.Width = New Telerik.Reporting.Drawing.Unit(25.673545837402344, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
CType(Me.Subreport_CompanyName, System.ComponentModel.ISupportInitialize).EndInit() |
CType(Me.Subreport_Organisation, System.ComponentModel.ISupportInitialize).EndInit() |
CType(Me.dareSOFT_DataSet, System.ComponentModel.ISupportInitialize).EndInit() |
CType(Me.Subreport_Individual1, System.ComponentModel.ISupportInitialize).EndInit() |
CType(Me, System.ComponentModel.ISupportInitialize).EndInit() |
End Sub |
Private Sub Report_AddressesDetailed_NeedDataSource(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.NeedDataSource |
CType(sender, Telerik.Reporting.Processing.Report).DataSource = DAREnterprises.Library_Specific.WebsiteObjects(Me.poPage).oSV.dareSOFT_CurrentReportDataSet |
End Sub |
Private Sub titleTextBox_ItemDataBinding(ByVal sender As Object, ByVal e As System.EventArgs) Handles titleTextBox.ItemDataBinding |
Me.titleTextBox.Value = DAREnterprises.Library_Specific.WebsiteObjects(Me.poPage).oText.FindByTag(DAREnterprises.Enums.TextItems.txtReportAddressesDetailedTitle).GetTextByLanguage(DAREnterprises.Library_Specific.WebsiteObjects(Me.poPage).oSV.CurrentLanguage) |
End Sub |
Public Shared Function GetCurrentCompanyO_nId() As Integer |
Return CInt(DAREnterprises.Library_Specific.WebsiteObjects(SetGetPage(Nothing)).oDB.GetToLink(DAREnterprises.Library_Specific.WebsiteObjects(SetGetPage(Nothing)).oSV.dareSOFT_CurrentC_nId, DAREnterprises.Enums.LinkTypes.FromCompaniesToOrganisations, DAREnterprises.Library_Specific.WebsiteObjects(SetGetPage(Nothing)).oSV.dareSOFT_CurrentC_nId)) |
End Function |
Private Shared Function SetGetPage(ByVal loPage As Page) As Page |
If loPage IsNot Nothing Then |
loSavedPage = loPage |
End If |
Return loSavedPage |
End Function |
Private Sub DetailSection_ItemDataBound(ByVal sender As Object, ByVal e As System.EventArgs) Handles DetailSection.ItemDataBound |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oIndividual").Visible = False |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oSoleTrader").Visible = False |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oOrganisation").Visible = False |
If CType(CType(CType(sender, Telerik.Reporting.Processing.DetailSection).DataItem, DataRowView).Row("DARGA_nEntityType"), DAREnterprises.Enums.EntityTypes).Equals(DAREnterprises.Enums.EntityTypes.Individual) Then |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oIndividual").Visible = True |
ElseIf CType(CType(CType(sender, Telerik.Reporting.Processing.DetailSection).DataItem, DataRowView).Row("DARGA_nEntityType"), DAREnterprises.Enums.EntityTypes).Equals(DAREnterprises.Enums.EntityTypes.SoleTrader) Then |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oSoleTrader").Visible = True |
Else |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oOrganisation").Visible = True |
End If |
End Sub |
End Class |
Kind Regards
David
0
hkdave95
Top achievements
Rank 2
answered on 10 Jun 2008, 05:55 PM
Hi
Here is my report ...
Kind Regards
David
Here is my report ...
Option Explicit On |
Option Strict On |
Imports System.Web.UI |
Imports System.ComponentModel |
Imports System.Drawing |
Imports System.Windows.Forms |
Imports Telerik.Reporting |
Imports Telerik.Reporting.Drawing |
Public Class Report_AddressesDetailed |
Inherits Report |
Private WithEvents DetailSection As Telerik.Reporting.DetailSection |
Private WithEvents titleTextBox As Telerik.Reporting.TextBox |
Private WithEvents reportHeader As Telerik.Reporting.ReportHeaderSection |
Private WithEvents pageInfoTextBox As Telerik.Reporting.TextBox |
Private WithEvents currentTimeTextBox As Telerik.Reporting.TextBox |
Private WithEvents pageFooter As Telerik.Reporting.PageFooterSection |
Private WithEvents reportNameTextBox As Telerik.Reporting.TextBox |
Private WithEvents DARGA_sID As Telerik.Reporting.TextBox |
Private WithEvents DARGA_sName As Telerik.Reporting.TextBox |
Private WithEvents pageHeader As Telerik.Reporting.PageHeaderSection |
Private WithEvents dareSOFT_DataSet As DAREnterprises.Data.dareSOFT_DataSet |
Friend WithEvents oCompanyName As Telerik.Reporting.SubReport |
Friend WithEvents Subreport_CompanyName As DAREnterprises.Library_Specific.Subreport_CompanyName |
Private Shared loSavedPage As Page = Nothing |
Friend WithEvents pnlDetails As Telerik.Reporting.Panel |
Friend WithEvents sDetails As Telerik.Reporting.TextBox |
Friend WithEvents pnlName As Telerik.Reporting.Panel |
Friend WithEvents oIndividual As Telerik.Reporting.SubReport |
Friend WithEvents oOrganisation As Telerik.Reporting.SubReport |
Friend WithEvents oSoleTrader As Telerik.Reporting.SubReport |
Friend WithEvents TextBox1 As Telerik.Reporting.TextBox |
Friend WithEvents Panel1 As Telerik.Reporting.Panel |
Friend WithEvents Subreport_Organisation As DAREnterprises.Library_Specific.Subreport_Organisation |
Friend WithEvents Subreport_Individual1 As DAREnterprises.Library_Specific.Subreport_Individual |
Private poPage As Page |
Public Sub New(ByVal loPage As Page) |
Call Me.InitializeComponent() |
Me.Report.DataSource = Nothing |
Me.poPage = loPage |
Call SetGetPage(loPage) |
End Sub |
Private Sub InitializeComponent() |
Dim StyleRule1 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule |
Dim StyleRule2 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule |
Dim StyleRule3 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule |
Dim StyleRule4 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule |
Me.pageHeader = New Telerik.Reporting.PageHeaderSection |
Me.reportNameTextBox = New Telerik.Reporting.TextBox |
Me.pageFooter = New Telerik.Reporting.PageFooterSection |
Me.currentTimeTextBox = New Telerik.Reporting.TextBox |
Me.pageInfoTextBox = New Telerik.Reporting.TextBox |
Me.oCompanyName = New Telerik.Reporting.SubReport |
Me.Subreport_CompanyName = New DAREnterprises.Library_Specific.Subreport_CompanyName |
Me.reportHeader = New Telerik.Reporting.ReportHeaderSection |
Me.titleTextBox = New Telerik.Reporting.TextBox |
Me.DetailSection = New Telerik.Reporting.DetailSection |
Me.DARGA_sID = New Telerik.Reporting.TextBox |
Me.DARGA_sName = New Telerik.Reporting.TextBox |
Me.pnlDetails = New Telerik.Reporting.Panel |
Me.sDetails = New Telerik.Reporting.TextBox |
Me.pnlName = New Telerik.Reporting.Panel |
Me.Panel1 = New Telerik.Reporting.Panel |
Me.oOrganisation = New Telerik.Reporting.SubReport |
Me.Subreport_Organisation = New DAREnterprises.Library_Specific.Subreport_Organisation |
Me.oIndividual = New Telerik.Reporting.SubReport |
Me.oSoleTrader = New Telerik.Reporting.SubReport |
Me.TextBox1 = New Telerik.Reporting.TextBox |
Me.dareSOFT_DataSet = New DAREnterprises.Data.dareSOFT_DataSet |
Me.Subreport_Individual1 = New DAREnterprises.Library_Specific.Subreport_Individual |
CType(Me.Subreport_CompanyName, System.ComponentModel.ISupportInitialize).BeginInit() |
CType(Me.Subreport_Organisation, System.ComponentModel.ISupportInitialize).BeginInit() |
CType(Me.dareSOFT_DataSet, System.ComponentModel.ISupportInitialize).BeginInit() |
CType(Me.Subreport_Individual1, System.ComponentModel.ISupportInitialize).BeginInit() |
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit() |
' |
'pageHeader |
' |
Me.pageHeader.Height = New Telerik.Reporting.Drawing.Unit(0.71428573131561279, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.pageHeader.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.reportNameTextBox}) |
Me.pageHeader.Name = "pageHeader" |
Me.pageHeader.PrintOnLastPage = False |
Me.pageHeader.Style.Font.Style = System.Drawing.FontStyle.Regular |
' |
'reportNameTextBox |
' |
Me.reportNameTextBox.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.052910052239894867, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.052910052239894867, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.reportNameTextBox.Name = "reportNameTextBox" |
Me.reportNameTextBox.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(25.620635986328125, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.60000002384185791, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.reportNameTextBox.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.reportNameTextBox.StyleName = "PageInfo" |
Me.reportNameTextBox.Value = "Report_AddressesDetailed" |
' |
'pageFooter |
' |
Me.pageFooter.Height = New Telerik.Reporting.Drawing.Unit(1.3999996185302734, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.pageFooter.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.currentTimeTextBox, Me.pageInfoTextBox, Me.oCompanyName}) |
Me.pageFooter.Name = "pageFooter" |
Me.pageFooter.Style.BorderStyle.Default = Telerik.Reporting.Drawing.BorderType.Solid |
Me.pageFooter.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.pageFooter.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Bottom |
' |
'currentTimeTextBox |
' |
Me.currentTimeTextBox.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.052910052239894867, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.940740704536438, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.currentTimeTextBox.Name = "currentTimeTextBox" |
Me.currentTimeTextBox.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(8.12169361114502, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.43270394206047058, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.currentTimeTextBox.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(8, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
Me.currentTimeTextBox.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.currentTimeTextBox.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left |
Me.currentTimeTextBox.StyleName = "PageInfo" |
Me.currentTimeTextBox.Value = "=NOW()" |
' |
'pageInfoTextBox |
' |
Me.pageInfoTextBox.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(17.525197982788086, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.91438579559326172, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.pageInfoTextBox.Name = "pageInfoTextBox" |
Me.pageInfoTextBox.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(8.12169361114502, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.45905885100364685, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.pageInfoTextBox.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(8, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
Me.pageInfoTextBox.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.pageInfoTextBox.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.pageInfoTextBox.StyleName = "PageInfo" |
Me.pageInfoTextBox.Value = "=PageNumber + ' of ' + PageCount" |
' |
'oCompanyName |
' |
Me.oCompanyName.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.0352732352912426, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.oCompanyName.Name = "oCompanyName" |
Me.oCompanyName.Parameters.Add(New Telerik.Reporting.Parameter("O_nId", "= GetCurrentCompanyO_nId()")) |
MeMe.oCompanyName.ReportSource = Me.Subreport_CompanyName |
Me.oCompanyName.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(25.620637893676758, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.826002299785614, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.oCompanyName.Style.Color = System.Drawing.Color.Black |
Me.oCompanyName.Style.Font.Name = "Verdana" |
Me.oCompanyName.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(8, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
Me.oCompanyName.Style.Font.Style = System.Drawing.FontStyle.Bold |
' |
'reportHeader |
' |
Me.reportHeader.Height = New Telerik.Reporting.Drawing.Unit(1.059259295463562, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.reportHeader.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.titleTextBox}) |
Me.reportHeader.Name = "reportHeader" |
Me.reportHeader.Style.BackgroundColor = System.Drawing.Color.LightGray |
Me.reportHeader.Style.BorderStyle.Default = Telerik.Reporting.Drawing.BorderType.Solid |
Me.reportHeader.Style.Font.Style = System.Drawing.FontStyle.Regular |
' |
'titleTextBox |
' |
Me.titleTextBox.Name = "titleTextBox" |
Me.titleTextBox.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(25.646890640258789, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.95925933122634888, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.titleTextBox.Style.BackgroundColor = System.Drawing.Color.Empty |
Me.titleTextBox.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.titleTextBox.StyleName = "Title" |
' |
'DetailSection |
' |
Me.DetailSection.Height = New Telerik.Reporting.Drawing.Unit(10.9264554977417, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.DetailSection.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.DARGA_sID, Me.DARGA_sName, Me.pnlDetails, Me.sDetails, Me.pnlName, Me.TextBox1}) |
Me.DetailSection.Name = "DetailSection" |
Me.DetailSection.Style.BorderStyle.Default = Telerik.Reporting.Drawing.BorderType.Solid |
Me.DetailSection.Style.Font.Style = System.Drawing.FontStyle.Regular |
' |
'DARGA_sID |
' |
Me.DARGA_sID.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(19.769412994384766, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.026554936543107033, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.DARGA_sID.Name = "DARGA_sID" |
Me.DARGA_sID.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(5.90413236618042, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.47344470024108887, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.DARGA_sID.Style.Font.Name = "Verdana" |
Me.DARGA_sID.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.DARGA_sID.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.DARGA_sID.Value = "=Fields.DARGA_sID" |
' |
'DARGA_sName |
' |
Me.DARGA_sName.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.052909649908542633, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.00019981748482678086, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.DARGA_sName.Name = "DARGA_sName" |
Me.DARGA_sName.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(19.663393020629883, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.47344470024108887, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.DARGA_sName.Style.Color = System.Drawing.Color.Black |
Me.DARGA_sName.Style.Font.Name = "Verdana" |
Me.DARGA_sName.Style.Font.Style = System.Drawing.FontStyle.Bold |
Me.DARGA_sName.Value = "=Fields.DARGA_sName" |
' |
'pnlDetails |
' |
Me.pnlDetails.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(13.126455307006836, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.1798646450042725, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.pnlDetails.Name = "pnlDetails" |
Me.pnlDetails.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(12.347090721130371, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(9.4201345443725586, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.pnlDetails.Style.BorderStyle.Default = Telerik.Reporting.Drawing.BorderType.Solid |
Me.pnlDetails.Style.Font.Style = System.Drawing.FontStyle.Regular |
' |
'sDetails |
' |
Me.sDetails.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(13.126455307006836, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.52675461769104, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.sDetails.Name = "sDetails" |
Me.sDetails.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.9999994039535522, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.59999984502792358, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.sDetails.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.sDetails.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Bottom |
Me.sDetails.Value = "Details" |
' |
'pnlName |
' |
Me.pnlName.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.Panel1}) |
Me.pnlName.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.29999992251396179, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.1798646450042725, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.pnlName.Name = "pnlName" |
Me.pnlName.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(12.546890258789063, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.7201354503631592, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.pnlName.Style.BorderStyle.Default = Telerik.Reporting.Drawing.BorderType.Solid |
Me.pnlName.Style.Font.Style = System.Drawing.FontStyle.Regular |
' |
'Panel1 |
' |
Me.Panel1.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.oOrganisation, Me.oIndividual, Me.oSoleTrader}) |
Me.Panel1.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.19999994337558746, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.17314648628234863, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.Panel1.Name = "Panel1" |
Me.Panel1.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(11.900099754333496, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.3469890356063843, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.Panel1.Style.Font.Style = System.Drawing.FontStyle.Regular |
' |
'oOrganisation |
' |
Me.oOrganisation.Dock = System.Windows.Forms.DockStyle.Fill |
Me.oOrganisation.Name = "oOrganisation" |
Me.oOrganisation.Parameters.Add(New Telerik.Reporting.Parameter("O_nId", "Fields.[DARGA_nEntityId]")) |
MeMe.oOrganisation.ReportSource = Me.Subreport_Organisation |
Me.oOrganisation.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(11.900099754333496, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.3469890356063843, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.oOrganisation.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.oOrganisation.Visible = False |
' |
'oIndividual |
' |
Me.oIndividual.Dock = System.Windows.Forms.DockStyle.Fill |
Me.oIndividual.Name = "oIndividual" |
Me.oIndividual.Parameters.Add(New Telerik.Reporting.Parameter("I_nId", "=Fields.[DARGA_nEntityId]")) |
MeMe.oIndividual.ReportSource = Me.Subreport_Individual1 |
Me.oIndividual.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(11.900099754333496, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.3469890356063843, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.oIndividual.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.oIndividual.Visible = False |
' |
'oSoleTrader |
' |
Me.oSoleTrader.Dock = System.Windows.Forms.DockStyle.Fill |
Me.oSoleTrader.Name = "oSoleTrader" |
Me.oSoleTrader.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(11.900099754333496, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.3469890356063843, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.oSoleTrader.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.oSoleTrader.Visible = False |
' |
'TextBox1 |
' |
Me.TextBox1.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.29999992251396179, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.52675461769104, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.TextBox1.Name = "TextBox1" |
Me.TextBox1.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.0000002384185791, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.60000145435333252, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType))) |
Me.TextBox1.Style.Font.Style = System.Drawing.FontStyle.Regular |
Me.TextBox1.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Bottom |
Me.TextBox1.Value = "Name" |
' |
'dareSOFT_DataSet |
' |
Me.dareSOFT_DataSet.DataSetName = "dareSOFT_DataSet" |
Me.dareSOFT_DataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema |
' |
'Report_AddressesDetailed |
' |
Me.Culture = New System.Globalization.CultureInfo("") |
Me.DataMember = "dargAddresses_0" |
MeMe.DataSource = Me.dareSOFT_DataSet |
Me.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.pageHeader, Me.pageFooter, Me.reportHeader, Me.DetailSection}) |
Me.PageSettings.Landscape = True |
Me.PageSettings.Margins.Bottom = New Telerik.Reporting.Drawing.Unit(2, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.PageSettings.Margins.Left = New Telerik.Reporting.Drawing.Unit(2, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.PageSettings.Margins.Right = New Telerik.Reporting.Drawing.Unit(2, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.PageSettings.Margins.Top = New Telerik.Reporting.Drawing.Unit(2, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
Me.PageSettings.PaperKind = System.Drawing.Printing.PaperKind.A4 |
Me.Sorting.AddRange(New Telerik.Reporting.Data.Sorting() {New Telerik.Reporting.Data.Sorting("=Fields.DARGA_sName", Telerik.Reporting.Data.SortDirection.Asc)}) |
Me.Style.Font.Style = System.Drawing.FontStyle.Regular |
StyleRule1.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Title")}) |
StyleRule1.Style.BackgroundColor = System.Drawing.Color.Empty |
StyleRule1.Style.Color = System.Drawing.Color.FromArgb(CType(CType(28, Byte), Integer), CType(CType(58, Byte), Integer), CType(CType(112, Byte), Integer)) |
StyleRule1.Style.Font.Name = "Verdana" |
StyleRule1.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(18, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
StyleRule1.Style.Font.Style = System.Drawing.FontStyle.Regular |
StyleRule2.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Caption")}) |
StyleRule2.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(28, Byte), Integer), CType(CType(58, Byte), Integer), CType(CType(112, Byte), Integer)) |
StyleRule2.Style.Color = System.Drawing.Color.White |
StyleRule2.Style.Font.Name = "Verdana" |
StyleRule2.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(11, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
StyleRule2.Style.Font.Style = System.Drawing.FontStyle.Bold |
StyleRule2.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle |
StyleRule3.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Data")}) |
StyleRule3.Style.Color = System.Drawing.Color.Black |
StyleRule3.Style.Font.Name = "Verdana" |
StyleRule3.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
StyleRule3.Style.Font.Style = System.Drawing.FontStyle.Regular |
StyleRule3.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle |
StyleRule4.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("PageInfo")}) |
StyleRule4.Style.Color = System.Drawing.Color.Black |
StyleRule4.Style.Font.Name = "Verdana" |
StyleRule4.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(8, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
StyleRule4.Style.Font.Style = System.Drawing.FontStyle.Regular |
StyleRule4.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle |
Me.StyleSheet.AddRange(New Telerik.Reporting.Drawing.StyleRule() {StyleRule1, StyleRule2, StyleRule3, StyleRule4}) |
Me.Width = New Telerik.Reporting.Drawing.Unit(25.673545837402344, CType(Telerik.Reporting.Drawing.UnitType.Cm, Telerik.Reporting.Drawing.UnitType)) |
CType(Me.Subreport_CompanyName, System.ComponentModel.ISupportInitialize).EndInit() |
CType(Me.Subreport_Organisation, System.ComponentModel.ISupportInitialize).EndInit() |
CType(Me.dareSOFT_DataSet, System.ComponentModel.ISupportInitialize).EndInit() |
CType(Me.Subreport_Individual1, System.ComponentModel.ISupportInitialize).EndInit() |
CType(Me, System.ComponentModel.ISupportInitialize).EndInit() |
End Sub |
Private Sub Report_AddressesDetailed_NeedDataSource(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.NeedDataSource |
CType(sender, Telerik.Reporting.Processing.Report).DataSource = DAREnterprises.Library_Specific.WebsiteObjects(Me.poPage).oSV.dareSOFT_CurrentReportDataSet |
End Sub |
Private Sub titleTextBox_ItemDataBinding(ByVal sender As Object, ByVal e As System.EventArgs) Handles titleTextBox.ItemDataBinding |
Me.titleTextBox.Value = DAREnterprises.Library_Specific.WebsiteObjects(Me.poPage).oText.FindByTag(DAREnterprises.Enums.TextItems.txtReportAddressesDetailedTitle).GetTextByLanguage(DAREnterprises.Library_Specific.WebsiteObjects(Me.poPage).oSV.CurrentLanguage) |
End Sub |
Public Shared Function GetCurrentCompanyO_nId() As Integer |
Return CInt(DAREnterprises.Library_Specific.WebsiteObjects(SetGetPage(Nothing)).oDB.GetToLink(DAREnterprises.Library_Specific.WebsiteObjects(SetGetPage(Nothing)).oSV.dareSOFT_CurrentC_nId, DAREnterprises.Enums.LinkTypes.FromCompaniesToOrganisations, DAREnterprises.Library_Specific.WebsiteObjects(SetGetPage(Nothing)).oSV.dareSOFT_CurrentC_nId)) |
End Function |
Private Shared Function SetGetPage(ByVal loPage As Page) As Page |
If loPage IsNot Nothing Then |
loSavedPage = loPage |
End If |
Return loSavedPage |
End Function |
Private Sub DetailSection_ItemDataBound(ByVal sender As Object, ByVal e As System.EventArgs) Handles DetailSection.ItemDataBound |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oIndividual").Visible = False |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oSoleTrader").Visible = False |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oOrganisation").Visible = False |
If CType(CType(CType(sender, Telerik.Reporting.Processing.DetailSection).DataItem, DataRowView).Row("DARGA_nEntityType"), DAREnterprises.Enums.EntityTypes).Equals(DAREnterprises.Enums.EntityTypes.Individual) Then |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oIndividual").Visible = True |
ElseIf CType(CType(CType(sender, Telerik.Reporting.Processing.DetailSection).DataItem, DataRowView).Row("DARGA_nEntityType"), DAREnterprises.Enums.EntityTypes).Equals(DAREnterprises.Enums.EntityTypes.SoleTrader) Then |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oSoleTrader").Visible = True |
Else |
CType(sender, Telerik.Reporting.Processing.DetailSection).Items("oOrganisation").Visible = True |
End If |
End Sub |
End Class |
Kind Regards
David
0
hkdave95
Top achievements
Rank 2
answered on 10 Jun 2008, 10:46 PM
Hi
I solved it !
It turned out that the withevents variables had a mixture of Private and Friend declarations.
I changed them all to Firend and the aplication started working correctly.
Kind Regards
David
I solved it !
It turned out that the withevents variables had a mixture of Private and Friend declarations.
I changed them all to Firend and the aplication started working correctly.
Kind Regards
David
0
Hello hkdave95,
We're glad you've figured it out. The default serializer does not change this automatically for you, so you should manually change the modifiers according to your needs. Here is more info on Friend WithEvents modifier and what does it mean.
Kind regards,
Steve
the Telerik team
Instantly find answers to your questions at the new Telerik Support Center
We're glad you've figured it out. The default serializer does not change this automatically for you, so you should manually change the modifiers according to your needs. Here is more info on Friend WithEvents modifier and what does it mean.
Kind regards,
Steve
the Telerik team
Instantly find answers to your questions at the new Telerik Support Center