...
Visual Basic |
Private Sub UpdateBorder()
With
Me.C1TrueDBGrid1.Splits(0).DisplayColumns(Me.C1TrueDBGrid1.Col).Style.Borders
.Color = ColorDialog1.Color
.BorderType = borderType
.Bottom = borderBottom
.Left = borderLeft
.Right = borderRight
.Top = borderTop
End With
End Sub |
To write code in C#
...
...
private void UpdateBorder() |
...
{ C1.Win.C1TrueDBGrid.GridBorders |
...
...
...
...
this.c1TrueDBGrid1.Splits |
...
...
].DisplayColumns(this.c1TrueDBGrid1.Col).Style.Borders; |
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
Visual Basic |
Private Sub ComboBox1_SelectionChangeCommitted(ByVal sender As Object, ByVal e As
System.EventArgs) Handles ComboBox1.SelectionChangeCommitted
Select Case Me.ComboBox1.SelectedItem
Case "Fillet"
Me.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.Fillet
Case "Flat"
Me.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.Flat
Case "Groove"
Me.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.Groove
Case "Inset"
Me.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.Inset
Case "InsetBevel"
Me.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.InsetBevel
Case "None"
Me.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.None
Case "Raised"
Me.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.Raised
Case "RaisedBevel"
Me.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.RaisedBevel
End Select
Me.UpdateBorder()
End Sub
Private Sub ComboBox2_SelectionChangeCommitted(ByVal sender As Object, ByVal e As
System.EventArgs) Handles ComboBox2.SelectionChangeCommitted
Me.borderTop = Me.ComboBox2.SelectedItem
Me.UpdateBorder()
End Sub
Private Sub ComboBox3_SelectionChangeCommitted(ByVal sender As Object, ByVal e As
System.EventArgs) Handles ComboBox3.SelectionChangeCommitted
Me.borderBottom = Me.ComboBox3.SelectedItem
Me.UpdateBorder()
End Sub Private Sub ComboBox4_SelectionChangeCommitted(ByVal sender As Object, ByVal e |
...
As
System.EventArgs) Handles ComboBox4.SelectionChangeCommitted
Me.borderLeft = Me.ComboBox4.SelectedItem
Me.UpdateBorder()
End |
...
Sub
Private Sub ComboBox5_SelectionChangeCommitted(ByVal sender As Object, ByVal e |
...
As
System.EventArgs) Handles ComboBox5.SelectionChangeCommitted
Me.borderRight = Me.ComboBox5.SelectedItem
Me.UpdateBorder()
End Sub |
To write code in C#
C# |
private void ComboBox1_SelectionChangeCommitted(object sender, System.EventArgs e) { switch (this.comboBox1.SelectedItem) {
case "Fillet"; this.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.Fillet; break; case "Flat"; this.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.Flat; break; case "Groove"; this.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.Groove; break; case "Inset"; this.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.Inset; break; case "InsetBevel"; this.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.InsetBevel; break; case "None"; this.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.None; break; case "Raised"; this.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.Raised; break; case "RaisedBevel"; this.borderType = C1.Win.C1TrueDBGrid.BorderTypeEnum.RaisedBevel; break; } this.UpdateBorder(); } private void comboBox2_SelectionChangeCommitted(object sender, System.EventArgs e) { this.borderTop = this.comboBox2.SelectedItem; this.UpdateBorder(); } private void comboBox3_SelectionChangeCommitted(object sender, System.EventArgs e) {
this.borderBottom = this.comboBox3.SelectedItem; this.UpdateBorder(); }
private void comboBox4_SelectionChangeCommitted(object sender, System.EventArgs e) { this.borderLeft = this.comboBox4.SelectedItem; this.UpdateBorder(); } private void comboBox5_SelectionChangeCommitted(object sender, System.EventArgs e) {
this.borderRight = this.comboBox5.SelectedItem; this.UpdateBorder();
} |
13. 最后包括的代码是为了处理复选框和FetchScrollTips 事件以设置当用户滚动时工具提示框的改变：
To write code in Visual Basic
...
C# |
private void checkBox1_Click(object sender, System.EventArgs e) { this.c1TrueDBGrid1.ScrollTips = this.checkBox1.Checked; } private void checkBox2_Click(object sender, System.EventArgs e) {
this.c1TrueDBGrid1.ScrollTrack = this.checkBox2.Checked; }
private void c1TrueDBGrid1_FetchScrollTips(System.object sender,
C1.Win.C1TrueDBGrid.FetchScrollTipsEventArgs e)
{
// Set the ScrollTip depending on which scroll bar was moved. switch (e.ScrollBar) { case C1.Win.C1TrueDBGrid.ScrollBarEnum.Horizontal:
<ac:structured-macro ac:name="unmigrated-wiki-markup" ac:schema-version="1" ac:macro-id="de9dfbf7-4be1-40c1-a7f8-c5f1194a159d"><ac:plain-text-body><![CDATA[ e.ScrollTip = this.c1TrueDBGrid1.Columns[e.ColIndex].Caption; break; case C1.Win.C1TrueDBGrid.ScrollBarEnum.Vertical:
]]></ac:plain-text-body></ac:structured-macro>
<ac:structured-macro ac:name="unmigrated-wiki-markup" ac:schema-version="1" ac:macro-id="e7899a1a-33c9-43ed-9644-521600e74a29"><ac:plain-text-body><![CDATA[
e.ScrollTip = "Record: " + (e.Row + 1).ToString() + " of " + this.dbTable.Rows.Count.ToString() + "\n" + "Company: " + this.dbTable.Rows[e.Row] ["Company"].ToString() + "\n" + "User code: " + this.dbTable.Rows[e.Row] ["UserCode"].ToString(); break; }
]]></ac:plain-text-body></ac:structured-macro>
e.TipStyle.ForeColor = Color.Blue;
} |
...