Standard User Interface

[Roey]

I used the following code in VB6 to make sure that when buttons where clicked within my application that a consistant look and feel was given.

 

The following code was inside a module

Public Sub CancelClicked(frmCaller As Form)

   frmCaller.cmdNew.Visible = True
   frmCaller.cmdSave.Visible = True
   frmCaller.cmdSave.Enabled = False
   frmCaller.cmdDelete.Visible = True
   frmCaller.cmdDelete.Enabled = False
   frmCaller.cmdModify.Visible = True
   frmCaller.cmdCancel.Visible = False
  
End Sub

Public Sub DeleteClicked(frmCaller As Form)

   frmCaller.cmdNew.Visible = True
   frmCaller.cmdSave.Visible = True
   frmCaller.cmdSave.Enabled = False
   frmCaller.cmdDelete.Visible = True
   frmCaller.cmdModify.Visible = True
   frmCaller.cmdModify.Enabled = True
   frmCaller.cmdCancel.Visible = False
  
End Sub

Public Sub FormLoad(frmCaller As Form)

   frmCaller.cmdNew.Enabled = True
   frmCaller.cmdSave.Enabled = False
   frmCaller.cmdModify.Enabled = False
   frmCaller.cmdDelete.Enabled = False
   frmCaller.cmdCancel.Visible = False

and the calling forms used code such as:

 

Call ModifyClicked(Me)

 

 

Not sure how this would be implemented in .Net, I don't think that form inheritance would work as all of the forms are significantly different. However I feel that there must be a new and exciting way of doing this.....

 

Thanks

Edited June 30, 2003 by Robby

[hog]

I use this approach:

 

Public Sub EnableButtons(ByVal frmCaller As Form, ByVal blnEnable as Boolean )

   frmCaller.cmdNew.Visible = blnEnable
   frmCaller.cmdSave.Visible = blnEnable
   frmCaller.cmdSave.Enabled = blnEnable
   frmCaller.cmdDelete.Visible = blnEnable
   frmCaller.cmdModify.Visible = blnEnable
   frmCaller.cmdModify.Enabled = blnEnable
   frmCaller.cmdCancel.Visible = blnEnable
  
End Sub

 

This way you only need one proc