以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]怎么动态生成Label控件，并且是透明状态的？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=159934)
--  作者：mxko
--  发布时间：2021/1/14 12:41:00
--  [求助]怎么动态生成Label控件，并且是透明状态的？
如题。
用下面代码生成的，不但不透明，边框还是黑色的，请高人指点，谢谢！
Dim lbl As WinForm.Label
lbl = frm.CreateControl(ln, ControlTypeEnum.Label)
lbl.BorderStyle = BorderStyle.FixedSingle
lbl.TextAlign = ContentAlignment.MiddleCenter
lbl.BorderColor = Color.Red
lbl.BackColor = Color.Transparent
lbl.Text = "1"
e.Form.AddControl(lbl)
--  作者：有点蓝
--  发布时间：2021/1/14 13:39:00
--  
默认就是透明的，不要另外设置。不过注意控件背景透明仅针对包含控件的容器，对于容器外的其他控件和窗口就不是透明的。
--  作者：mxko
--  发布时间：2021/1/15 10:49:00
--  
但是，我如果，拖动的控件又可以哦
如图设置：

图片点击可在新窗口打开查看此主题相关图片如下：11111.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2021/1/15 11:05:36编辑过]
--  作者：有点蓝
--  发布时间：2021/1/15 10:55:00
--  
背景使用的是图片控件吧，图片控件本身也是一个容器，直接拖的控件的是添加到图片控件里的：http://www.foxtable.com/webhelp/topics/2766.htm

代码添加控件的时候加入图片框，而不是加入窗口
--  作者：mxko
--  发布时间：2021/1/15 11:05:00
--  
已经OK了，非常感谢
--  作者：mxko
--  发布时间：2021/1/15 11:08:00
--  
lbl.BorderColor = Color.Red
还有个小问题，为什么边框不变为红色？
[此贴子已经被作者于2021/1/15 11:09:16编辑过]
--  作者：有点蓝
--  发布时间：2021/1/15 11:40:00
--  
是有问题，我反馈一下
--  作者：逛逛
--  发布时间：2021/1/15 12:08:00
--  
你没有设置边框样式吧。
--  作者：mxko
--  发布时间：2021/1/15 13:46:00
--  
以下是引用逛逛在2021/1/15 12:08:00的发言：
你没有设置边框样式吧。

引用过了： 
 lbl = frm.CreateControl(LableName, ControlTypeEnum.Label) 
 lbl.AutoSize = False 
 lbl.BorderStyle = BorderStyle.FixedSingle 
 lbl.TextAlign = ContentAlignment.MiddleCenter 
 lbl.BackColor = Color.Transparent 
 lbl.BorderColor = Color.Blue 
 lbl.BaseControl.Cursor = System.Windows.Forms.Cursors.Hand 
 lbl.SetBounds(mX, mY, mWidth, mHeight) 
 pb1.AddControl(lbl)