[求助]关于绘图板弄的背景对于不同分辨率造成背景不全的情况！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

共有11860人关注过本帖树形打印复制链接主题：[求助]关于绘图板弄的背景对于不同分辨率造成背景不全的情况！

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 积分：33945 威望：0 精华：10 注册：2008/8/31 20:56:00

Post By：2012/2/8 23:36:00 [只看该作者]

用PictureBox控件行嗎？

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

程兴刚

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：7235 积分：40556 威望：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