Public
Class
Form1
Private
Sub
Form1_Load(sender
As
System.
Object
, e
As
System.EventArgs)
Handles
MyBase
.Load
Me
.KeyPreview =
True
Dim
x
As
Boolean
x = LogIntoSQL()
If
x =
True
Then
Try
myList =
New
BindingList(Of CompanyHistory)()
LoadNewCompanyHistory()
RadGridView1.DataSource = myList
Catch
ex
As
Exception
MsgBox(ex.Message)
End
Try
End
If
End
Sub
Private
tbSubscribed
As
Boolean
=
False
Private
Sub
radGridView1_CellEditorInitialized(
ByVal
sender
As
Object
,
ByVal
e
As
Telerik.WinControls.UI.GridViewCellEventArgs)
Dim
tbEditor
As
RadTextBoxEditor = TryCast(
Me
.RadGridView1.ActiveEditor, RadTextBoxEditor)
If
Not
tbEditor
Is
Nothing
Then
If
(
Not
tbSubscribed)
Then
tbSubscribed =
True
Dim
tbElement
As
RadTextBoxEditorElement =
CType
(tbEditor.EditorElement, RadTextBoxEditorElement)
AddHandler
tbElement.KeyDown,
AddressOf
tbElement_KeyDown
End
If
End
If
End
Sub
Private
Sub
tbElement_KeyDown(
ByVal
sender
As
Object
,
ByVal
e
As
KeyEventArgs)
If
e.Control
Then
If
e.KeyCode = Keys.F1
Then
CType
(sender, RadTextBoxEditorElement).Text =
"F1"
End
If
If
e.KeyCode = Keys.F2
Then
CType
(sender, RadTextBoxEditorElement).Text =
"F2"
End
If
If
e.KeyCode = Keys.L
Then
CType
(sender, RadTextBoxEditorElement).Text =
"LLLL"
End
If
End
If
End
Sub
Public
Sub
New
()
' This call is required by the designer.
InitializeComponent()
' Add any initialization after the InitializeComponent() call.
AddHandler
RadGridView1.CellEditorInitialized,
AddressOf
radGridView1_CellEditorInitialized
End
Sub
End
Class
Dim RadRibbonBarGroup_Main = New RadRibbonBarGroup()
Dim RadRibbonBarButtonGroup_Main = New RadRibbonBarButtonGroup
Dim btnExtract As New RadButtonElement()
RadRibbonBarGroup_Main.Items.AddRange(
New Telerik.WinControls.RadItem() {RadRibbonBarButtonGroup_Main})
RadRibbonBarGroup_Main.Name =
"RadRibbonBarGroup_Main"
RadRibbonBarGroup_Main.Text =
"Extract Data"
RadRibbonBarGroup_Main.Alignment =
ContentAlignment.TopCenter
btnExtract.Name =
"btnExtract"
btnExtract.Text =
"Extract"
btnExtract.Class =
"ButtonElement"
btnExtract.Image =
Global.culminTelFormLib.My.Resources.Resources.Database_export_32()
btnExtract.ImageAlignment = System.Drawing.
ContentAlignment.MiddleCenter
btnExtract.TextImageRelation = System.Windows.Forms.
TextImageRelation.ImageAboveText
RadRibbonBarButtonGroup_Main.Items.AddRange(
New Telerik.WinControls.RadItem() {btnExtract})
RadRibbonBarButtonGroup_Main.Name =
"RadRibbonBarButtonGroup_Main"
RadRibbonBarButtonGroup_Main.Text =
"RadRibbonBarButtonGroup_Main"
RadRibbonBarButtonGroup_Main.Alignment =
ContentAlignment.TopCenter
Me.tabHome.Items.Insert(0, RadRibbonBarGroup_Main)
Public WithEvents btnExtract As Telerik.WinControls.UI.RadButtonElement
Protected Sub btnExtract_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExtract.Click
If IsNothing(frmLoad) Then
frmLoad =
New frmTaxSageLoad
frmLoad.Show()
frmLoad.WindowState =
FormWindowState.Maximized
Else
frmLoad.BringToFront()
End If
End Sub
myNode.TreeViewElement.ItemHeight = 30;
AddHandler RadGridView1.DefaultValuesNeeded, AddressOf radGridView1_DefaultValuesNeeded
This works fine when the user clicks on "Click here to add a new row" message. It assigns the default values as specified in the radGridView1_DefaultValuesNeeded sub. But it doesn't work when I do that programmatically by calling the RadGridView1.Rows.AddNew method. How can I programmatically mimic the user clicking on "Click here to add a new row"?
public
partial
class
RadForm1 : Telerik.WinControls.UI.RadForm
{
List<A> glist;
public
RadForm1()
{
InitializeComponent();
glist =
new
List<A>();
A objA =
new
A();
objA.B = 10;
objA.L.Add(
new
B(
"asdf1"
));
objA.L.Add(
new
B(
"asdf2"
));
objA.L.Add(
new
B(
"asdf3"
));
objA.L.Add(
new
B(
"asdf4"
));
A objB =
new
A();
objB.B = 20;
objB.L.Add(
new
B(
"f1"
));
objB.L.Add(
new
B(
"f2"
));
objB.L.Add(
new
B(
"f3"
));
objB.L.Add(
new
B(
"F4"
));
glist.Add(objA);
glist.Add(objB);
gv.DataSource = glist;
gv.AutoGenerateHierarchy =
true
;
gv.Columns[
"L"
].IsVisible =
false
;
}
class
A
{
List<B> list;
int
b;
int
c;
public
A()
{
list =
new
List<B>();
}
public
List<B> L
{
get
{
return
this
.list; }
set
{
this
.list = value; }
}
public
int
B
{
get
{
return
this
.b;}
set
{
this
.b = value;
this
.c = value * 5;
foreach
(B bb
in
L)
bb.a = value;
}
}
public
int
C
{
get
{
return
this
.c; }
}
}
class
B
{
int
_a;
string
_b;
public
B()
{ }
public
B(
string
stringparam)
{
b = stringparam;
}
public
int
a
{
get
{
return
this
._a; }
set
{
this
._a = value; }
}
public
string
b
{
get
{
return
this
._b; }
set
{
this
._b = value; }
}
}
}