以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]背景图片大过容器的时候如何居中显示  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=101800)

--  作者:zwjfx
--  发布时间:2017/6/7 11:46:00
--  [求助]背景图片大过容器的时候如何居中显示
背景图片大过容器的时候如何居中显示,不缩放
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.foxdb

[此贴子已经被作者于2017/6/7 12:41:56编辑过]

--  作者:有点色
--  发布时间:2017/6/7 12:08:00
--  

参考代码

 

Dim lj As String = "g:\\test.jpg"
Dim pan As WinForm.Panel = e.Form.Controls("me")
Dim bmp As new bitmap(pan.width, pan.height)
Dim g = graphics.fromimage(bmp)
Dim img = getimage(lj)
Dim x As Integer = (img.width - pan.width) / 2
Dim y As Integer = (img.height - pan.height) / 2
Dim w As Integer = pan.width
Dim h As Integer = pan.height
g.DrawImage(img, new Rectangle(0, 0, w, h), new Rectangle(x, y, w, h), GraphicsUnit.Pixel)

e.Form.Controls("me").BaseControl.BackgroundImage = bmp


--  作者:zwjfx
--  发布时间:2017/6/7 12:21:00
--  
目的是随着窗口调整不同而显示不同,看来只有加在SizeChanged里了,谢谢
--  作者:grmsmdbl
--  发布时间:2018/8/8 19:22:00
--  
我有一个背景图片是A4纸张大小   想搞票据套打,将背景图片和电脑的DPI都调整到了100(笔记本最低的就是100)加入后不能显示整张背景图片   是什么问题啊,有谁能帮帮我啊 
图片点击可在新窗口打开查看此主题相关图片如下:种植险投保单扫描件100.jpg
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2018/8/8 20:39:00
--  

1、你图片的dpi必须和你电脑的dpi一致,要用专业图片软件修改图片dpi。

 

2、你的窗口大小必须设置足够大(A4纸那么大)才行,如果不够,请设置成自动滚动,然后加入textbox把它撑大到可以看到所有图片。