StrataFrame Forum » StrataFrame Application Framework - V1 » WinForms (How do I?) » Inserting Code ina subclassed control

RE: Inserting Code ina subclassed control

Dustin Taylor — Thu, 12 Nov 2009 08:47:37 GMT

Woah, weird. I must've had this post up from a couple of days ago and not realised it. Sorry for the redundancy, but glad I got the same answer as everyone else though! :w00t:

Inserting Code ina subclassed control

Ger Cannoll — Thu, 12 Nov 2009 08:47:37 GMT

I have setup a Base Calss library and included a few of the SF controls, got them into a DLL and got them onto the toolbox...so far so good. I now want to put a bit of code into two of them specifically. I realise this is more of a .net thing rather than SF ,but any help would be appreciated. If I can get one or two examples to start me off it would be a great help.

On the DateBox, I want to set the default local to British (or whatever does a DD/MM/YYYY rather than MM/DD/YYYY)

On a textBox, I want to set a BackGround Colour when the control gets focus. This we have on VFP and it is very useful, particulalrly on a form with many controls, to give the user a visual clue as to where they are at.

(I am of the impression that there is now 'Visual' way to change a property in .net but maybe someone could confirm this)

public class DateBox : MicroFour.StrataFrame.UI.Windows.Forms.DateBox
{// Code here to change Date format to british }

public class Textbox : MicroFour.StrataFrame.UI.Windows.Forms.Textbox
{// VFP equivalent --> when enabled this.BackGroundColour = Rgb(255,0,0)}

RE: Inserting Code ina subclassed control

Dustin Taylor — Thu, 12 Nov 2009 08:45:55 GMT

For the DateBox, you don't have to inherit anything, we already have a static method that will handle the date format for you :).

[codesnippet]MicroFour.StrataFrame.UI.Windows.Forms.DateBox.DateFormatOverride = MicroFour.StrataFrame.UI.Windows.Forms.DateFormats.MonthDayYear;[/codesnippet]

Put that in your Program.cs and it will affect the DateFormat of any StrataFrame DateBox that does not have the property explictely set.

For the TextBox, you'll want to inherit our textbox in your own, and override the OnEnter and OnLeave methods:

[codesnippet]using System;
using System.Collections.Generic;
using System.Text;

namespace WindowsApplication1
{
    public class MyTextBox : MicroFour.StrataFrame.UI.Windows.Forms.Textbox
    {
        protected override void OnEnter( EventArgs e )
        {
            this.BackColor = System.Drawing.Color.Gray;

base.OnEnter( e );
}

        protected override void OnLeave( EventArgs e )
        {
            this.BackColor = System.Drawing.Color.White;

            base.OnLeave( e );
        }
    }
}[/codesnippet]

Then if you use your own overriden control rather than our standard one, it will reflect your added functionality.

RE: Inserting Code ina subclassed control

Trent L. Taylor — Tue, 10 Nov 2009 17:27:28 GMT

[quote]Is there a VFP equivalent to RGB()[/quote]

Yes. You will use the Color.FromArgb(A, R, G, B). This allows you to specify an alpha channel as well (opacity). But you can omit it if you need to and just supply the RGB values:

[codesnippet]//-- This will be red and will assume full opacity
Color myColor = Color.FromArgb(255,0,0);

//-- This will be red and will set the opacity to roughly half
Color myColor = Color.FromArgb(128, 255,0,0);[/codesnippet]

RE: Inserting Code ina subclassed control

Ger Cannoll — Tue, 10 Nov 2009 15:07:00 GMT

Hi Greg. Many thanks for your reply which I have found very useful. I have now got Subclass funtionality working which chhnges the Background colour of the text Box in Focus. I include the code below ,and would welcomew any comments on either how this can be improved upon, or in case it will cause any other problems with Windows Text Box or SF Textbox controls

There is one thing I could not do. Is there a VFP equivalent to RGB(). I have used the Color.AColour in this instance

[codesnippet]public class Textbox : MicroFour.StrataFrame.UI.Windows.Forms.Textbox
{
private System.Drawing.Color originalBackgroudColour;

protected override void OnEnter(EventArgs e)
{

//-- Run Base Class Code
base.OnEnter(e);

//-- Save away original background color
this.originalBackgroudColour = this.BackColor;

//-- Define the background color for the control.. maybe extend this to use a property later
this.BackColor = Color.Aqua;
}

protected override void OnLeave(EventArgs e)
{

//-- Run the Base Code for the textbox
base.OnLeave(e);

//-- Reset back color to the default
this.BackColor = this.originalBackgroudColour;
}
} // End textBox[/codesnippet]

RE: Inserting Code ina subclassed control

Greg McGuffey — Tue, 10 Nov 2009 11:34:13 GMT

Give this a try:

[codesnippet]public class DateBox : MicroFour.StrataFrame.UI.Windows.Forms.DateBox
{
  public DateBox : base()
  {
    //-- Set local...no idea how to do this, but I'd do here in constructor :-(
  }
}

public class Textbox : MicroFour.StrataFrame.UI.Windows.Forms.Textbox
{
  public Textbox : base()
  {
    //-- Save away background color
    this.DefaultBackgroundColor = this.BackColor;
  }

  //-- Define the background color when the control
  //   has focus. Static so you can set it for all textboxes in one go.
  //   I'd use a property in real life...
  public static Color FocusColor = Rgb(255,0,0);

  //-- Cache default background color. Use property in real life.
  public Color DefaultBackgroundColor;

  protected override void OnEnter(EventArgs e)
  {
    //-- Set Back color to indicate the control has focus
    this.BackColor = Textbox.FocusColor
  }

  protected override void OnLeave(EventArgs e)
  {
    //-- Reset back color to the default
    this.BackColor = this.DefaultBackgroundColor;
}[/codesnippet]