Usando links em aplicações Windows no Visual Studio 2005
Na Toolbox do Visual Studio 2005, temos um controle muito interessante chamado LinkLabel que permite criar em um formulário Windows um botão de comando em forma de link, semelhante aos links que acessamos diariamente na Web.
Nesta dica, mostrarei como implementar um link para uma página Web usando esse controle e também como simular um link de imagem clicável através de um controle PictureBox. Para testar, crie um novo projeto do tipo Windows Application e adicione ao formulário:
· um controle LinkLabel
· um controle Label
· um controle PictureBox
· um controle Tooltip
Na propriedade Text do controle LinkLabel, insira “O mundo é cada dia mais .NET!” e na propriedade Tooltip on Tooltip1, escreva “Blog do autor Cláudio Ralha”. Execute um duplo clique sobre o controle e entre com o código para o evento LinkClicked:
Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
LinkLabel1.LinkVisited = True
System.Diagnostics.Process.Start("http://thespoke.net/blogs/claudioralha/default.aspx")
End Sub
Com isso terminamos o código necessário para o controle LinkLabel. Para o controle PictureBox, especificaremos primeiro uma imagem clicando no botão elipse na propriedade Image. A caixa de diálogo Select Resource será exibida e nos permitirá localizar a imagem desejada através do botão Import. Após escolhê-la, clique em OK para confirmar.
Figura 1.
Em SizeMode, selecione AutoSize. A seguir, altere a propriedade Cursor para Hand, para simularmos a mãozinha de criança que fica apontando o tempo todo. Para terminar o seu trabalho na caixa de propriedades, altere a propriedade Tooltip on tooltip1 do controle PictureBox para “Conheça a comunidade mundial TheSpoke!”.
Feito isso, execute um duplo clique sobre a PictureBox para entrar com o código a seguir:
Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click
System.Diagnostics.Process.Start("http://br.thespoke.net/")
End Sub
Tecle F5 para testar! Na imagem a seguir, você poderá conferir o resultado:
Figura 2.
Viu como é fácil? É por essas e outras que eu gosto tanto da plataforma .NET.
Cláudio Ralha (claudioralha@hotmail.com)
