以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]动态加入的控件如何设定锚定?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=157305)

--  作者:新福星
--  发布时间:2020/10/12 3:53:00
--  [求助]动态加入的控件如何设定锚定?
见题
--  作者:有点蓝
--  发布时间:2020/10/12 8:35:00
--  
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=124251&skin=0

dock是停靠,Anchor 是锚定

--  作者:新福星
--  发布时间:2020/10/12 14:46:00
--  
这个锚定是不是相对窗口的?如果是相对窗口里的容器该怎么写?谢谢
--  作者:有点蓝
--  发布时间:2020/10/12 15:11:00
--  
都是相对容器的,如果没有容器就是相对窗口
--  作者:新福星
--  发布时间:2020/10/12 17:34:00
--  

Dim leftwz  As Integer=200
Dim Topwz As Integer=10
Dim anmc() As String={"新增","修改","删除","撤销","提交","保存","退出"}
Dim kjzc() As String={"A","U","D","R","T","S","Q"}
For i As Integer =0 To  anmc.Length-1
    but= e.Form.CreateControl(anmc(i), ControlTypeEnum.Button)
    but.Text = anmc(i) & "(" & kjzc(i) & ")"
   but.Left = leftwz
    but.Top = Topwz
    but.Height=25
    but.FlatStyle   =FlatStyle.flat
    but.VisualStyle = VisualStyle.Office2010Blue


    but.Anchor = CType((System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)    


     but.Anchor  = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)

    but.Anchor  = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)

    sp2.Panel1.AddControl(but)
    leftwz+=76
Next
上面三种写法哪个对?锚定右面怎么设定基准点?

--  作者:有点蓝
--  发布时间:2020/10/12 20:19:00
--  
直接这样即可

but.Anchor  = System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right

控件左边距+控件宽度=控件右边距
but.Left+but.width

--  作者:新福星
--  发布时间:2020/10/13 6:24:00
--  
怎么都调整不到右侧,请老师看看问题出在哪里?

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20201013061719.png
图片点击可在新窗口打开查看

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目7.rar


--  作者:有点蓝
--  发布时间:2020/10/13 8:42:00
--  
放到最右边?

控件.left = 容器.width - 控件.width - 控件右边其它控件的left