专家坐堂-图片位置Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  图片位置  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=66263)

--  作者：blsu33
--  发布时间：2015/4/2 10:12:00
--  图片位置
老师，
窗口的Click命令的确指定背景的图片：g.DrawImage(getImage("down03.png"),e.Sender.Left,e.Sender.Top,84,86) 84*86 和pane_按钮中按钮的大小一致，可是，结果还是如下，背景灰色down03.png的位置不对：

此主题相关图片如下：窗口中的图片.png

弄了好久，没看出门道，不知道为什么，老师能否帮忙看下，麻烦您了。

下载信息  [文件大小：   下载次数： ]
点击浏览该文件:图片位置调整.rar

--  作者：有点甜
--  发布时间：2015/4/2 11:06:00
--

完全搞不懂你想表达什么

If e.Sender.Name.Contains("icon_") Then
    e.Form.Controls(e.sender.name).basecontrol.BackgroundImage = getImage("down03.png")
    e.Form.Controls(e.sender.name).BaseControl.BackgroundImageLayout = ImageLayout.Stretch
    Application.DoEvents
End If

[此贴子已经被作者于2015/4/2 11:06:26编辑过]

--  作者：blsu33
--  发布时间：2015/4/2 11:22:00
--

o 在商业版中能正确显示，这个是效果

此主题相关图片如下：qq图片20150402112410.png

[此贴子已经被作者于2015/4/2 11:24:52编辑过]

--  作者：有点甜
--  发布时间：2015/4/2 11:24:00
--

那就是代码没有问题。

直接说你想做什么效果

--  作者：blsu33
--  发布时间：2015/4/2 11:32:00
--

效果就是 down03.png 这个图片灰色的部分怎么会显示成这样

此主题相关图片如下：灰色的部分.png

怎么设置才能成为这样呢没看出来怎么弄得

此主题相关图片如下：灰色应显示成与图片相同的大小.png

--  作者：有点甜
--  发布时间：2015/4/2 11:53:00
--

测试了一下，代码没问题，你三个大小必须一致。 afterload事件设置一下

e.Form.Controls("pane_down").Left = e.Form.Controls("pane_按钮").left
e.Form.Controls("pane_down").Top = e.Form.Controls("pane_按钮").Top
e.Form.Controls("pane_down").width = e.Form.Controls("pane_按钮").width
e.Form.Controls("pane_down").height = e.Form.Controls("pane_按钮").height

e.Form.Controls("Painter1").Left = e.Form.Controls("pane_按钮").left
e.Form.Controls("Painter1").Top = e.Form.Controls("pane_按钮").Top
e.Form.Controls("Painter1").width = e.Form.Controls("pane_按钮").width
e.Form.Controls("Painter1").height = e.Form.Controls("pane_按钮").height