TextDecorations プロパティ

GcLabel コントロールのテキストに対する下線、取り消し線、およびテキスト境界線の設定を取得または設定します。

構文

Visual Basic (宣言)
C#

Public Property TextDecorations As TextDecorations

public TextDecorations TextDecorations {get; set;}

プロパティ値

GcLabel コントロールのテキストに対する下線、取り消し線、およびテキスト境界線の設定を表す TextDecorations。デフォルト値は null 参照 (Visual Basicでは Nothing) です。

使用例

次のサンプルコードは、TextDecorations プロパティの使用方法と GcLabel コントロールの作成方法を示します。

C#
Visual Basic

private void GcLabelTextDecorations()
{
    // Create a instance of GcLabel.
    GrapeCity.Win.Buttons.GcLabel gcLabel1 = new GrapeCity.Win.Buttons.GcLabel();

    // Initialize the Name, Location and Size of GcLabel
    gcLabel1.Name = "gcLabel1";
    gcLabel1.Location = new System.Drawing.Point(0, 0);
    gcLabel1.Size = new System.Drawing.Size(200, 50);

    // Set TextDecorations
    gcLabel1.Font = new Font("Microsoft Sans Serif", 18.25f);
    gcLabel1.Text = "0123456789";
    gcLabel1.TextAlign = ContentAlignment.MiddleCenter;
    Buttons.TextDecorations textDecoration = new Buttons.TextDecorations();
    textDecoration.StrikethroughStyle = GrapeCity.Win.Buttons.TextLineStyle.Single;
    textDecoration.StrikethroughColor = Color.Red;
    textDecoration.TextBorderStyle = GrapeCity.Win.Buttons.TextBorderStyle.Single;
    textDecoration.UnderlineStyle = GrapeCity.Win.Buttons.TextLineStyle.Single;
    textDecoration.UnderlineColor = Color.Red;
    gcLabel1.TextDecorations = textDecoration;

    // Add gcLabel1 to the form
    this.Controls.Add(gcLabel1);
}

Private Sub GcLabelTextDecorations()
    ' Create a instance of GcLabel.
    Dim gcLabel1 As New GcLabel()

    ' Initialize the Name, Location and Size of GcLabel
    gcLabel1.Name = "gcLabel1"
    gcLabel1.Location = New System.Drawing.Point(0, 0)
    gcLabel1.Size = New System.Drawing.Size(200, 50)

    ' Set TextDecorations
    gcLabel1.Font = New Font("Microsoft Sans Serif", 18.25F)
    gcLabel1.Text = "0123456789"
    gcLabel1.TextAlign = ContentAlignment.MiddleCenter
    Dim textDecorations As New TextDecorations()
    textDecorations.StrikethroughStyle = TextLineStyle.[Single]
    textDecorations.StrikethroughColor = Color.Red
    textDecorations.TextBorderStyle = TextBorderStyle.[Single]
    textDecorations.UnderlineStyle = TextLineStyle.[Single]
    textDecorations.UnderlineColor = Color.Red
    gcLabel1.TextDecorations = textDecorations

    ' Add gcLabel1 to the form
    Me.Controls.Add(gcLabel1)
End Sub

プラットフォーム

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

参照

GcLabel クラス
 GcLabel メンバ
 TextDecorations クラス