首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

VFP中关于屏幕背景图片设置的

2012-06-06 
VFP中关于屏幕背景图片设置的求助“主程序.prg”中部分代码如下:_SCREEN.picture901537.jpg&& 屏幕中加入

VFP中关于屏幕背景图片设置的求助
“主程序.prg”中部分代码如下:
_SCREEN.picture="901537.jpg" && 屏幕中加入背景图片
zoom window screen max && 主窗口最大化

问题请教:主窗口最大化后,设置的背景图片就如xp系统的桌面背景设置成“平铺”时的效果一样,很不美观。那么,如何才能使其中的背景图片达到xp系统桌面背景设置中的“拉伸”效果(即变比填充)呢?
(我指的是如何利用顶层表单技术以外的方法实现)

[解决办法]
Screen.Picture 没有伸缩属性可设置,只能在 Screen 上加一个 image 控件来显示图片:

_Screen.AddObject('background', 'Image')
_Screen.background.Picture = Getpic() && 或者写你自己的图片文件名
_Screen.background.Visible = .T.
_Screen.background.Stretch = 2 && 不想变形就设为 1
_Screen.background.Move(0,0,_Screen.Width,_Screen.Height)

[解决办法]
1、在表单设置里,把图片先设置成与表单大小。
2、把图片的Anchor属性设置成:15
这样,图片就能自动随表单变化了。

热点排行