作者ieck (杀手)
看板Visual_Basic
标题Re: [.NET] 动态新增控制项於某个container中?
时间Fri Nov 8 14:32:11 2013
想请教各位高手
在TAB里面增加了一个groupbox
想在groupbox里面 动态新增label
而位置就是mouse点下去的位置
但是不知道为什麽 位置老是偏掉 =.=?
这个是写在MOUSE down的动作~
当MOUSE点下去 我就记录(x,y)
然後动态新的label位置 就滑鼠点的那个地方
Private Sub 新增(ByVal X位置$, ByVal Y位置$)
Dim LAB As New Label
groupbox.Controls.Add(LAB)
With LAB
.Location = New Point(X位置, Y位置) '<---可这边都对不起来!!!
.Size = New Size(15, 10)
.Font = New Font("新细明体", 8)
.BackColor = Color.Teal
End With
End sub
※ 引述《NTUHacker (呼~)》之铭言：
: 刚找到解答了
: 自问自答一下
: Dim new_bt As New Button
: With new_bt
: .Location = New Point(10, 10)
: .Width = 50
: .Height = 20
: .Visible = True
: .Text = "TTT"
: End With
: TabPage1.Controls.Add(new_bt)
: ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
: 主要是这行,所有container都是这样动态汇入控制项的
: ※ 引述《NTUHacker (呼~)》之铭言：
: : 请问如果要动态新增一个控制项到某个container中
: : 我该怎麽设定呢?
: : 例如:
: : 要新增一个button到TabControl中
: : 动态新增button没问题
: : 可是要怎麽让这个button跑到TabControl中呢?
: : 谢谢您不吝解惑
: : m(_ _)m
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 211.20.200.82
1F：推 johnpage:元件原点不是你认为的位置，需要移动 11/08 15:01
2F：→ ieck:J大 那请问该怎麽抓取正确的位置呢? 我试过先抓萤幕的位置 11/08 16:11
3F：→ ieck:然後再从萤幕位置转成元件的LOCATION 还是对不到! >< 11/08 16:12
4F：→ mraaa:正好相反，container里面左上角是（0,0) 11/15 10:08