Creating a LinkLabel Programmaticall y

[Terrance]

Can someone please help with a problem that I'm having? I'm trying to create
a linklabel in VB.NET 2003 at runtime when a user clicks a button. The app
looks in a path for .doc and .pdf files and creates a linklabel for each file
name. When running the app the first name is being created but only portions
of the string is showing; and also it looks like the remaining is being
created but I can't see them it's like their cut off. Here is the code from
the button's click event:

Dim strPath As String = txtDirectory.Te xt.ToString()
Dim strTemp, strFile As String
Const intX As Integer = 16
Dim intY As Integer = 8
Const intHeight As Integer = 16
Const intWidth As Integer = 100
Dim intX2 As Integer = 0
Dim i As Integer

For Each strFile In Directory.GetFi les(strPath)
If Path.GetExtensi on(strFile).ToL ower = ".doc" Or
Path.GetExtensi on(strFile).ToL ower = ".pdf" Then
strTemp = Path.GetFileNam e(strFile)

Dim myLinkLabel As New LinkLabel
With myLinkLabel
.Name = "lnkLabel_" & i.ToString()
.Visible = True
.ActiveLinkColo r = Color.Red
.DisabledLinkCo lor = Color.Blue
.LinkColor = Color.Blue
.VisitedLinkCol or = Color.Purple
.Text = strTemp
End With
plMain.Controls .Add(myLinkLabe l)

End If
i += 1
Next

I'm trying to set the Location.X for each created LinkLabels but VB is not
liking it. It's telling me that an integer can not be a system.drawing. point
type. What am I doing wrong?

--
TC

[Cerebrus]

Hi,

When running the app the first name is being created but only portions
of the string is showing; and also it looks like the remaining is being
created but I can't see them it's like their cut off.
I was working on a similar app sometime back and was facing similar
problems. Seemed to work fine, when I set the AutoSize and LinkArea
properties correctly. (Set AutoSize to True.)
I'm trying to set the Location.X for each created LinkLabels but VB is not
liking it. It's telling me that an integer can not be a system.drawing. point
type.

You mustn't try to set the X or Y properties of the Location Property
(See "Control.Locati on" in MSDN help for the explanation). Instead set
it's Location to a new Point() as :

myLinkLabel.Loc ation = New Point(intX * i, intY * i)

where i can be incremented with each label.

Hope this helps,

Regards,

Cerebrus.

[Terrance]

Thanks Cerebrus for the help.
--
TC
"Cerebrus" wrote:

Hi,

When running the app the first name is being created but only portions
of the string is showing; and also it looks like the remaining is being
created but I can't see them it's like their cut off.
I was working on a similar app sometime back and was facing similar
problems. Seemed to work fine, when I set the AutoSize and LinkArea
properties correctly. (Set AutoSize to True.)
I'm trying to set the Location.X for each created LinkLabels but VB is not
liking it. It's telling me that an integer can not be a system.drawing. point
type.

You mustn't try to set the X or Y properties of the Location Property
(See "Control.Locati on" in MSDN help for the explanation). Instead set
it's Location to a new Point() as :

myLinkLabel.Loc ation = New Point(intX * i, intY * i)

where i can be incremented with each label.

Hope this helps,

Regards,

Cerebrus.