加茂屋株式会社 - ソフトウェアー - KsGrid.dll - 簡単!! 実践KSグリッド

KsGridコントロールのデフォルトのデザインや動作は、開発するソフトウェアーの目的によって変更する必要があります。

例えば、グリッドの罫線の色をライトグレーに変更する場合は、

Me.KsGrid1.DefaultCell.AllFrameStyle.Color = Color.LightGray

と書きます。

また、フォーカスの枠線の色を赤にする場合は、

Me.KsGrid1.Focusing.FlameColor = Color.Red

と書きます。

KsGridコントロールは、その他、色々な設定が可能です。

一つのフォームに複数のKsGridコントロールを張り付けた場合や、複数のフォームで、KsGridコントロールを使用する場合、全てのKsGridコントロールに毎回、デフォルトを設定するのは、大変ですので、デフォルトを設定するプロシージャーを作りましょう。

Imports System
Imports System.Drawing
Imports KamoyaSolutions.KsGrid

Public Class Form1

  Private Sub Form1_Load(ByVal sender As Object,ByVal e As System.EventArgs) Handles Me.Load

    SetDefault(Me.KsGrid1)
    SetDefault(Me.KsGrid2)

    Me.KsGrid1.Values.ValueString(1, 1) = "KsGrid1"
    Me.KsGrid2.Values.ValueString(1, 1) = "KsGrid2"
    Me.KsGrid1.Draw()
    Me.KsGrid2.Draw()

  End Sub

  Friend Sub SetDefault(ByRef kg As KsGrid)

    kg.DefaultCell.AllFrameStyle.Color = Color.LightGray
    kg.Focusing.FlameColor = Color.Red
    kg.DefaultCell.TextStyle.Alignment = StringAlignmentHV.CenterCenter

  End Sub
End Class

この例では、Friend Sub SetDefault を作り、KsGridを参照渡ししています。

その中で、グリッドの罫線色、フォーカスの枠線の色、文字のアライメントを設定しています。

フォームのロードイベントの中で、SetDefault(Me.KsGrid1) 等、各KsGridコントロールに設定を適用しています。

これで、複数のKsGridコントロールの配色等をそろえるのは簡単ですね。

Microsoft Visual Basic 2005　での使用方法を解説しています。