Inheiritance of a from WITH a dataset

[Gary Shell]

I have jumped in to the deep end of the pool, trying out visual inheritance
of a form and have run into a snag.

I have the need to create a simple maintenance form for five identically
configured database files. (The only difference in the tables is their name
and keyfield name.) Hmmm, I though, a perfect candidate for trying our
Visual Inheritance for the first time. ARGHHHHHHH! What have I gotten
myself into?

Here's the specifics. I created a form and saved it as a class. I am able
to then create a form that inherits my original. That part works great. I
was even able to add a couple of Protected Strings to the base form and in
the Public Sub New routine of the one of the real forms I added code to set
the two protected strings to reflect the Table name and Key name. The form
load event in the base form uses these strings to dynamically create the SQL
Data adapters SQLSelectComman d, the SQLEditCommand, SQLInsertComman d etc. I
even got the base form code to modify the BindingContext so the update and
inserts worked flawlessly.

The base form has a dataset defined on it. I was HOPING to modify the code
for the dataset so that I could use the same Table Name and Key Name fields
to dynamically create the dataset like I was able to do with the
SqlDataAdapter' s command strings. My real form inherits the base form,
initializes a base form instance and then sets my two protected strings in
the base form. Thusly:

Public Class frmIOClass
Inherits TheClassForm.fr mTheClass

#Region " Windows Form Designer generated code "
Public Sub New()
MyBase.New()

'This call is required by the Windows Form Designer.
InitializeCompo nent()

'Add any initialization after the InitializeCompo nent() call
'*gs* These override the Protected strings in the base class
' of this form.

MyClass.strTheT able = "Input_Output_C lass"
MyClass.strTheK ey = "IOClass"
End Sub

Then in the load event of the baseform the code executes to generate the
SQLDataAdapter command strings. I tried putting code in the load event that
would populate some Protected strings in the dataset class code module. But
I soon realized that was WAY too late. The initialization code for the
dataset class was executed when the base form itself was initialized. It
was at that time that the dataset class was instantiated.

I'm stumped. I can't figure out how to get the Private strings set with the
Table Name and Key Name in the dataset class code BEFORE the dataset class
initialization code executes. I found the code in the base form that
actually instantiates the dataset. Here is a bit of that code:
Friend WithEvents dsTheClass As TheClassForm.ds TheClass
<System.Diagnos tics.DebuggerSt epThrough()> Private Sub InitializeCompo nent()

Dim resources As System.Resource s.ResourceManag er = New
System.Resource s.ResourceManag er(GetType(frmT heClass))
Me.txtTheClassN ame = New System.Windows. Forms.TextBox
Me.dsTheClass = New TheClassForm.ds TheClass
Me.txtTheClassD escription = New System.Windows. Forms.TextBox
Me.btnCancel = New System.Windows. Forms.Button
Me.btnOK = New System.Windows. Forms.Button
Me.SqlDataAdapt er1 = New System.Data.Sql Client.SqlDataA dapter
Me.SqlDeleteCom mand1 = New System.Data.Sql Client.SqlComma nd
Me.SqlInsertCom mand1 = New System.Data.Sql Client.SqlComma nd
Me.SqlSelectCom mand1 = New System.Data.Sql Client.SqlComma nd
Me.SqlUpdateCom mand1 = New System.Data.Sql Client.SqlComma nd
CType(Me.dsTheC lass, System.Componen tModel.ISupport Initialize).Beg inInit()

I thought I could sneak in the code to set some private strings in the
dataset class right after the "Me.dsclass = New TheClassForm.ds Class" line
of code, but apparently VB wasn't kidding when I read the comment in the
code admonishing me as follows:

'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.

Any code I try to add there gets "eaten" by the IDE. So I've hit the
proverbial brick wall. Anybody tried to tackle this before? Anyone have
any pearls of wisdom that they might share on this topic?

Thanks,

Gary Shell

[One Handed Man \( OHM - Terry Burns \)]

If ever a wizard there was !, Wizards can help or hinder !

On the base form, take out all that code generated by the Visual Designer
and put it into a helper function. Delete the visual elements and do the
coding from scratch. Test your base form.

Arrange for this function to accept parameters you need to alter the
initialisation.

Now in your constructor for the subclass'ed form, call your helper function
to set up the appropriate table values etc

HTH
--

OHM ( Terry Burns )
. . . One-Handed-Man . . .

Time flies when you don't know what you're doing

"Gary Shell" <gs****@fuse.ne t> wrote in message
news:u2******** ******@TK2MSFTN GP12.phx.gbl...

I have jumped in to the deep end of the pool, trying out visual inheritance of a form and have run into a snag.

I have the need to create a simple maintenance form for five identically
configured database files. (The only difference in the tables is their name and keyfield name.) Hmmm, I though, a perfect candidate for trying our
Visual Inheritance for the first time. ARGHHHHHHH! What have I gotten
myself into?

Here's the specifics. I created a form and saved it as a class. I am able to then create a form that inherits my original. That part works great. I was even able to add a couple of Protected Strings to the base form and in
the Public Sub New routine of the one of the real forms I added code to set the two protected strings to reflect the Table name and Key name. The form load event in the base form uses these strings to dynamically create the SQL Data adapters SQLSelectComman d, the SQLEditCommand, SQLInsertComman d etc. I even got the base form code to modify the BindingContext so the update and
inserts worked flawlessly.

The base form has a dataset defined on it. I was HOPING to modify the code for the dataset so that I could use the same Table Name and Key Name fields to dynamically create the dataset like I was able to do with the
SqlDataAdapter' s command strings. My real form inherits the base form,
initializes a base form instance and then sets my two protected strings in
the base form. Thusly:

Public Class frmIOClass
Inherits TheClassForm.fr mTheClass

#Region " Windows Form Designer generated code "
Public Sub New()
MyBase.New()

'This call is required by the Windows Form Designer.
InitializeCompo nent()

'Add any initialization after the InitializeCompo nent() call
'*gs* These override the Protected strings in the base class
' of this form.

MyClass.strTheT able = "Input_Output_C lass"
MyClass.strTheK ey = "IOClass"
End Sub

Then in the load event of the baseform the code executes to generate the
SQLDataAdapter command strings. I tried putting code in the load event that would populate some Protected strings in the dataset class code module. But I soon realized that was WAY too late. The initialization code for the
dataset class was executed when the base form itself was initialized. It
was at that time that the dataset class was instantiated.

I'm stumped. I can't figure out how to get the Private strings set with the Table Name and Key Name in the dataset class code BEFORE the dataset class
initialization code executes. I found the code in the base form that
actually instantiates the dataset. Here is a bit of that code:
Friend WithEvents dsTheClass As TheClassForm.ds TheClass
<System.Diagnos tics.DebuggerSt epThrough()> Private Sub InitializeCompo nent()
Dim resources As System.Resource s.ResourceManag er = New
System.Resource s.ResourceManag er(GetType(frmT heClass))
Me.txtTheClassN ame = New System.Windows. Forms.TextBox
Me.dsTheClass = New TheClassForm.ds TheClass
Me.txtTheClassD escription = New System.Windows. Forms.TextBox
Me.btnCancel = New System.Windows. Forms.Button
Me.btnOK = New System.Windows. Forms.Button
Me.SqlDataAdapt er1 = New System.Data.Sql Client.SqlDataA dapter
Me.SqlDeleteCom mand1 = New System.Data.Sql Client.SqlComma nd
Me.SqlInsertCom mand1 = New System.Data.Sql Client.SqlComma nd
Me.SqlSelectCom mand1 = New System.Data.Sql Client.SqlComma nd
Me.SqlUpdateCom mand1 = New System.Data.Sql Client.SqlComma nd
CType(Me.dsTheC lass, System.Componen tModel.ISupport Initialize).Beg inInit()

I thought I could sneak in the code to set some private strings in the
dataset class right after the "Me.dsclass = New TheClassForm.ds Class" line
of code, but apparently VB wasn't kidding when I read the comment in the
code admonishing me as follows:

'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.

Any code I try to add there gets "eaten" by the IDE. So I've hit the
proverbial brick wall. Anybody tried to tackle this before? Anyone have
any pearls of wisdom that they might share on this topic?

Thanks,

Gary Shell

[Cor Ligthert]

Hi Gary,

I think that you can get what you want this when you are not using a typed
dataset as you do.
That typed dataset is set as class in your project.
You can see it when you set in the solution explorer to all files and push
on the +'s
That dataset class is generated from the XSD in design time and uses table
and datanames.
I think that it is therefore almost impossible to reach what you want.

However just my thougth.

Cor

I have jumped in to the deep end of the pool, trying out visual inheritance of a form and have run into a snag.

I have the need to create a simple maintenance form for five identically
configured database files. (The only difference in the tables is their name and keyfield name.) Hmmm, I though, a perfect candidate for trying our
Visual Inheritance for the first time. ARGHHHHHHH! What have I gotten
myself into?

Here's the specifics. I created a form and saved it as a class. I am able to then create a form that inherits my original. That part works great. I was even able to add a couple of Protected Strings to the base form and in
the Public Sub New routine of the one of the real forms I added code to set the two protected strings to reflect the Table name and Key name. The form load event in the base form uses these strings to dynamically create the SQL Data adapters SQLSelectComman d, the SQLEditCommand, SQLInsertComman d etc. I even got the base form code to modify the BindingContext so the update and
inserts worked flawlessly.

The base form has a dataset defined on it. I was HOPING to modify the code for the dataset so that I could use the same Table Name and Key Name fields to dynamically create the dataset like I was able to do with the
SqlDataAdapter' s command strings. My real form inherits the base form,
initializes a base form instance and then sets my two protected strings in
the base form. Thusly:

Public Class frmIOClass
Inherits TheClassForm.fr mTheClass

#Region " Windows Form Designer generated code "
Public Sub New()
MyBase.New()

'This call is required by the Windows Form Designer.
InitializeCompo nent()

'Add any initialization after the InitializeCompo nent() call
'*gs* These override the Protected strings in the base class
' of this form.

MyClass.strTheT able = "Input_Output_C lass"
MyClass.strTheK ey = "IOClass"
End Sub

Then in the load event of the baseform the code executes to generate the
SQLDataAdapter command strings. I tried putting code in the load event that would populate some Protected strings in the dataset class code module. But I soon realized that was WAY too late. The initialization code for the
dataset class was executed when the base form itself was initialized. It
was at that time that the dataset class was instantiated.

I'm stumped. I can't figure out how to get the Private strings set with the Table Name and Key Name in the dataset class code BEFORE the dataset class
initialization code executes. I found the code in the base form that
actually instantiates the dataset. Here is a bit of that code:
Friend WithEvents dsTheClass As TheClassForm.ds TheClass
<System.Diagnos tics.DebuggerSt epThrough()> Private Sub InitializeCompo nent()
Dim resources As System.Resource s.ResourceManag er = New
System.Resource s.ResourceManag er(GetType(frmT heClass))
Me.txtTheClassN ame = New System.Windows. Forms.TextBox
Me.dsTheClass = New TheClassForm.ds TheClass
Me.txtTheClassD escription = New System.Windows. Forms.TextBox
Me.btnCancel = New System.Windows. Forms.Button
Me.btnOK = New System.Windows. Forms.Button
Me.SqlDataAdapt er1 = New System.Data.Sql Client.SqlDataA dapter
Me.SqlDeleteCom mand1 = New System.Data.Sql Client.SqlComma nd
Me.SqlInsertCom mand1 = New System.Data.Sql Client.SqlComma nd
Me.SqlSelectCom mand1 = New System.Data.Sql Client.SqlComma nd
Me.SqlUpdateCom mand1 = New System.Data.Sql Client.SqlComma nd
CType(Me.dsTheC lass, System.Componen tModel.ISupport Initialize).Beg inInit()

I thought I could sneak in the code to set some private strings in the
dataset class right after the "Me.dsclass = New TheClassForm.ds Class" line
of code, but apparently VB wasn't kidding when I read the comment in the
code admonishing me as follows:

'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.

Any code I try to add there gets "eaten" by the IDE. So I've hit the
proverbial brick wall. Anybody tried to tackle this before? Anyone have
any pearls of wisdom that they might share on this topic?

Thanks,

Gary Shell