Foxtable(狐表)用户栏目专家坐堂 → [求助]关于绘图板弄的背景 对于不同分辨率 造成背景不全的情况!


  共有13241人关注过本帖树形打印复制链接

主题:[求助]关于绘图板弄的背景 对于不同分辨率 造成背景不全的情况!

帅哥哟,离线,有人找我吗?
gaoyong30000
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1165 积分:9032 威望:0 精华:1 注册:2011/5/25 16:33:00
[求助]关于绘图板弄的背景 对于不同分辨率 造成背景不全的情况!  发帖心情 Post By:2012/2/8 23:08:00 [只看该作者]

1440 x 900下设计的  到1024x768 就变样了

 

最终的背景图是这样的 ,而且可以适应不同的分辨率不会变形


图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看

 

 

案例如下:

 

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

 

请教如何解决?


 回到顶部
帅哥哟,离线,有人找我吗?
gaoyong30000
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1165 积分:9032 威望:0 精华:1 注册:2011/5/25 16:33:00
  发帖心情 Post By:2012/2/8 23:28:00 [只看该作者]

我日 什么情况  下载了300多次

 回到顶部
帅哥哟,离线,有人找我吗?
czy
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33963 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2012/2/8 23:36:00 [只看该作者]

PictureBox控件行嗎?

锚定后将缩放属性设置成StretchImage


 回到顶部
帅哥哟,离线,有人找我吗?
程兴刚
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:7258 积分:40773 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2012/2/8 23:54:00 [只看该作者]

以下是引用czy在2012-2-8 23:36:00的发言:

PictureBox控件行嗎?

锚定后将缩放属性设置成StretchImage

 

应该也可以,绘图板也可以的!


 回到顶部
帅哥哟,离线,有人找我吗?
gaoyong30000
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1165 积分:9032 威望:0 精华:1 注册:2011/5/25 16:33:00
  发帖心情 Post By:2012/2/9 8:46:00 [只看该作者]

绘图板代码如下

 

Dim p As WinForm.Painter = e.Form.Controls("Painter1")
Dim g As Graphics = p.Graphics
g.DrawImage(getImage("系统登录界面.png"),0,0,e.form.Controls("Painter1").BaseControl.Width,e.form.Controls("Painter1").BaseControl.Height)
g.DrawString("欢迎进入",New Font("方正行楷简体",18,FontStyle.Bold Or FontStyle.Italic),Brushes.DarkSlateGray,383,245)
g.DrawString("扬州华泰",New Font("方正行楷简体",26,FontStyle.Bold),Brushes.DarkSlateGray,433,275)
g.DrawString("ERP",New Font("方正行楷简体",30,FontStyle.Bold Or FontStyle.Italic),Brushes.RoyalBlue,574,271)
g.DrawString("信息管理系统",New Font("方正行楷简体",26,FontStyle.Bold),Brushes.DarkSlateGray,654,275)
p.Repaint

 


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/2/9 8:48:00 [只看该作者]

用图形处理软件绘制好图片,将其作为窗口的背景图片,背景布局设置为Stretch

 回到顶部
帅哥哟,离线,有人找我吗?
gaoyong30000
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1165 积分:9032 威望:0 精华:1 注册:2011/5/25 16:33:00
  发帖心情 Post By:2012/2/9 8:48:00 [只看该作者]

 貌似绘图板不可以拉伸

Dim pbx AS WinForm.painter

pbx = Forms("窗口1").Controls("painter1")
pbx.SizeMode = ImageSizeMode.Zoom

 

 

说painter 不存在 sizemode


 

[此贴子已经被作者于2012-2-9 8:48:44编辑过]

 回到顶部