LinkLabel.ActiveLinkColor プロパティ
アクティブなリンクを表示するために使用する色を取得または設定します。
Public Property ActiveLinkColor As Color
[C#]
public Color ActiveLinkColor {get; set;}
[C++]
public: __property Color get_ActiveLinkColor();public: __property void set_ActiveLinkColor(Color);
[JScript]
public function get ActiveLinkColor() : Color;public function set ActiveLinkColor(Color);
プロパティ値
アクティブなリンクを表示するために使用する色を表す Color 。既定の色はシステムで指定されている色であり、通常は Color.Red です。
解説
アクティブなリンクとは、クリックされている最中のリンクです。この状態は、 Button コントロールを押し下げた状態に似ています。このプロパティを使用すると、クリックされている最中のリンクを表示するときの色を指定できます。
リンクに関連付けられる色は多数あります。 LinkColor は、 LinkLabel コントロールに表示されるすべてのリンクの色を指定します。 VisitedLinkColor プロパティを使用して、ユーザーがリンク先に移動したことのあるリンクの色を指定できます。リンクが無効な場合、無効なリンクであることを示すために DisabledLinkColor が使用されます。
メモ このプロパティを設定するときは、プロパティに設定する色がコントロールの背景色と競合しないように注意してください。競合する色を設定すると、テキストが正常に表示されません。たとえば、コントロールの背景色が Color.Red の場合に、このプロパティを Color.Red に設定すると、クリックされている最中のリンクのテキストは適切には表示されません。
使用例
LinkBehavior 列挙体を使用して LinkBehavior プロパティを設定する例を次に示します。 ActiveLinkColor プロパティ、 Text プロパティおよび LinkVisited プロパティの設定例も示します。この例を実行するには、空のフォームにこのコードを配置して、フォームのコンストラクタまたは Load メソッドから InitializeLinkLabel を呼び出します。
[SampleID='System.Windows.Forms.LinkLabelExample' SnippetID='1']
--------- Languages displayed= cs, vb ---------
--------- cs ---------
--------- Snippet 1 ---------
// Declare the LinkLabel object.
internal System.Windows.Forms.LinkLabel LinkLabel1;
// Declare keywords array to identify links
string[] keywords;
private void InitializeLinkLabel()
{
this.LinkLabel1 = new System.Windows.Forms.LinkLabel();
// Set the location, name and size.
this.LinkLabel1.Location = new System.Drawing.Point(10, 20);
this.LinkLabel1.Name = "CompanyLinks";
this.LinkLabel1.Size = new System.Drawing.Size(104, 150);
// Set the LinkBehavior property to show underline when mouse
// hovers over the links.
this.LinkLabel1.LinkBehavior = System.Windows.Forms.LinkBehavior.HoverUnderline;
string textString = "For more information see our" +
" company website or the research page at Contoso Ltd. ";
// Set the text property.
this.LinkLabel1.Text = textString;
// Set the color of the links to black, unless the mouse
// is hovering over a link.
this.LinkLabel1.LinkColor = System.Drawing.Color.Black;
this.LinkLabel1.ActiveLinkColor = System.Drawing.Color.Blue;
// Associate the event-handling method with the LinkClicked
// event.
this.LinkLabel1.LinkClicked +=
new LinkLabelLinkClickedEventHandler(LinkLabel1_LinkClicked);
// Add links to the LinkCollection using starting index and
// length of keywords.
keywords = new string[]{"company", "research"};
foreach ( string keyword in keywords )
{
this.LinkLabel1.Links.Add(textString.IndexOf(keyword), keyword.Length);
}
// Add the label to the form.
this.Controls.Add(this.LinkLabel1);
}
private void LinkLabel1_LinkClicked(object sender, LinkLabelLinkClickedEventArgs e)
{
string url = "";
// Determine which link was clicked and set the appropriate url.
switch(LinkLabel1.Links.IndexOf(e.Link))
{
case 0:
url = "www.microsoft.com";
break;
case 1:
url = "www.contoso.com/research";
break;
}
// Set the visited property to True. This will change
// the color of the link.
e.Link.Visited = true;
// Open Internet Explorer to the correct url.
System.Diagnostics.Process.Start("IExplore.exe", url);
}
--------- vb ---------
--------- Snippet 1 ---------
' Declare the LinkLabel object.
Friend WithEvents LinkLabel1 As System.Windows.Forms.LinkLabel
' Declare keywords array to identify links
Dim keywords() As String
Private Sub InitializeLinkLabel()
Me.LinkLabel1 = New System.Windows.Forms.LinkLabel
' Set the location, name and size.
Me.LinkLabel1.Location = New System.Drawing.Point(10, 20)
Me.LinkLabel1.Name = "CompanyLinks"
Me.LinkLabel1.Size = New System.Drawing.Size(104, 150)
' Set the LinkBehavior property to show underline when mouse
' hovers over the links.
Me.LinkLabel1.LinkBehavior = _
System.Windows.Forms.LinkBehavior.HoverUnderline
Dim textString As String = "For more information see our" & _
" company website or the research page at Contoso Ltd. "
' Set the text property.
Me.LinkLabel1.Text = textString
' Set the color of the links to black, unless the mouse
' is hovering over a link.
Me.LinkLabel1.LinkColor = System.Drawing.Color.Black
Me.LinkLabel1.ActiveLinkColor = System.Drawing.Color.Blue
' Add links to the LinkCollection using starting index and
' length of keywords.
keywords = New String() {"company", "research"}
Dim keyword As String
For Each keyword In keywords
Me.LinkLabel1.Links.Add(textString.IndexOf(keyword), keyword.Length)
Next
' Add the label to the form.
Me.Controls.Add(Me.LinkLabel1)
End Sub
Private Sub LinkLabel1_LinkClicked(ByVal sender As Object,
ByVal e As LinkLabelLinkClickedEventArgs)
Handles LinkLabel1.LinkClicked
Dim url As String
' Determine which link was clicked and set the appropriate url.
Select Case LinkLabel1.Links.IndexOf(e.Link)
Case 0
url = "www.microsoft.com"
Case 1
url = "www.contoso.com/research"
End Select
' Set the visited property to True. This will change
' the color of the link.
e.Link.Visited = True
' Open Internet Explorer to the correct url.
System.Diagnostics.Process.Start("IExplore.exe", url)
End Sub
必要条件
プラットフォーム: Windows 98, Windows NT 4.0, Windows Millennium Edition, Windows 2000, Windows XP Home Edition, Windows XP Professional, Windows Server 2003 ファミリ
参照
LinkLabel クラス | LinkLabel メンバ | System.Windows.Forms 名前空間 | Color | DisabledLinkColor | LinkColor | VisitedLinkColor