请问：有什么办法让顶层表单编译后仍可更换背景图片

请教：有什么办法让顶层表单编译后仍可更换背景图片？
请教：有什么办法让顶层表单编译后仍可更换背景图片，并以最后更新图片为背景？

------解决方案--------------------
1.把背景图片存入table
2.表单的背景动态抓table中和图片
3.程序中设一个菜单来更换背景图,更换后把图存入table
------解决方案--------------------
新建一个表 tpic

该表只有一个字段,filepath

类型为C 或备注

如果为C 

设置字段长度为 250

该字段的作用是用来保存顶层表单背景图片的地址

假设表单上有一个按钮

其功能用来更换表单背景图片

代码为

lcpath = sys(5) + sys(2003)
lcPicFile = Getpict()
if !empty(lcPicFile)
thisform.picture = lcPicFile
if used('tpic')
select tpic
else
use tpic
endif 
repl filepath with lcPicFile
endif
set defa to (lcpath)
------解决方案--------------------
直接更改表单的 Picture 属姓即可。

如果更用的图片是同名的，更改前先
CLEAR RESOURCES 图片文件名
------解决方案--------------------
如果网络版的程序，建议采取把图片存入数据库或存入Ftp路径。