FarPoint.Win アセンブリ > FarPoint.Win 名前空間 > FpCheckBox クラス : TextAlign プロパティ |
'Declaration Public Overridable Property TextAlign As ButtonTextAlign
'使用法 Dim instance As FpCheckBox Dim value As ButtonTextAlign instance.TextAlign = value value = instance.TextAlign
public virtual ButtonTextAlign TextAlign {get; set;}
このプロパティはTextAlign列挙体を使用します。
各状態を表すチェックボックスピクチャを指定するには、Pictureプロパティを使用します。テキストを指定するには、Captionプロパティを使用するか、各状態のテキストを提供する場合はTextIndeterminate、TextFalse、TextTrueの各プロパティを使用します。
内容(テキストとチェックボックスのピクチャ)の配置を指定するには、PictureAlignHプロパティとPictureAlignVプロパティを設定します。
private void Form1_Load(object sender, System.EventArgs e) { control.CheckState = CheckState.Unchecked; control.PictureAlignH=FarPoint.Win.HorizontalAlignment.Center; control.PictureAlignV = FarPoint.Win.VerticalAlignment.Center; control.BackgroundImage = new FarPoint.Win.Picture(Image.FromFile("d:\\mail16a.ico", true), FarPoint.Win.RenderStyle.Normal); } private void control_CheckChanged(object sender, System.EventArgs e) { if (control.CheckState == CheckState.Checked) { control.BackgroundImage = new FarPoint.Win.Picture(Image.FromFile("d:\\mail16a.ico", true), FarPoint.Win.RenderStyle.Normal); control.PictureAlignH = FarPoint.Win.HorizontalAlignment.Center; control.PictureAlignV = FarPoint.Win.VerticalAlignment.Center; control.TextTrue = "Mail's been checked"; } else if (control.CheckState == CheckState.Unchecked) { control.BackgroundImage = new FarPoint.Win.Picture(Image.FromFile("d:\\mail16b.ico", true), FarPoint.Win.RenderStyle.Normal); control.PictureAlignH = FarPoint.Win.HorizontalAlignment.Center; control.PictureAlignV = FarPoint.Win.VerticalAlignment.Center; control.TextFalse = "Mail needs to be checked"; } else { control.CheckState = CheckState.Indeterminate; control.TextIndeterminate = "No mail today"; } }
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load control.Checked = False control.BackgroundImage = New FarPoint.Win.Picture(Image.FromFile("d:\\mail16a.ico", True), FarPoint.Win.RenderStyle.Normal) End Sub Private Sub control_CheckChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles control.CheckChanged If control.CheckState = CheckState.Checked Then control.BackgroundImage = New FarPoint.Win.Picture(Image.FromFile("d:\\mail16a.ico", True), FarPoint.Win.RenderStyle.Normal) control.PictureAlignH = FarPoint.Win.HorizontalAlignment.Center control.PictureAlignV = FarPoint.Win.VerticalAlignment.Center control.TextTrue = "Mail's been checked" ElseIf control.CheckState = CheckState.Unchecked Then control.BackgroundImage = New FarPoint.Win.Picture(Image.FromFile("d:\\mail16b.ico", True), FarPoint.Win.RenderStyle.Normal) control.PictureAlignH = FarPoint.Win.HorizontalAlignment.Center control.PictureAlignV = FarPoint.Win.VerticalAlignment.Center control.TextFalse = "Mail needs to be checked" Else control.CheckState = CheckState.Indeterminate control.TextIndeterminate = "No mail today" End If End Sub