一个图片文件有若干图片，在更换时把新的图片拷贝到图片文件夹显示新的图片
pice=Filetostr('.\图片\A.png')
THISFORM.image1.PictureVal =pice
这是显示A.PNG 图片
先删除图片文件夹所有文件
Delete File .\图片\*.*
拷贝一个新的图片到图片文件夹
COPY FILE d:\b.png to .\图片\a.png
pice=Filetostr('.\图片\A.png')
THISFORM.image1.PictureVal =pice
有时图片文件下的a.png并没有被删除，不是B.PNG(拷贝后名变为a.png),还是原来的a.png
我甚至先把image1从表单上删除，然后再执行delete图片,再重新加载image1,现象照样有时出现？请问各位老师如何解决？谢谢

应该不需要那么复杂吧，直接将新的图片以同名文件覆盖原来的图片，再刷新一下表单的图像控件就行了。

可能缓存的问题
试试先执行：
CLEAR RESOURCES [ FileName]

版主好，FileName这个是不是具体文件名，可是如果不确定怎么解决？
文件夹下原来的文件都没有删除，新的文件根本没有覆盖，没有拷贝过来

同名就刷新，不同名就重新赋值

CLEAR RESOURCES 后面什么也没加，测试中，暂时能删除

FileName是可选项，具体参考VFP帮助

在我的使用中，有时也发现： thisform.PictureVal =图片字串，在不同的window系统中，这种显示方式并不很牢靠，原因不是很明确。后来改了显示方式，
比如用 thisform.Picture=pfile，pfile 变量代表带路径的图片文件全名。（注：连续显示不同图片时，图片全名不允许重名，可临时变个名称，否则可能不刷新显示），问题最终解决，可试试。

改变 thisform.Picture 之前执行 CLEAR RESOURCES 应该就可以。
为提高运行效率将磁盘文件读入缓存，之后再次打开文件时就从缓存读取。
但遇到不同内容的同名文件时，就可能出现数据没有刷新的感觉，实际上看到的还是保存在缓存原来文件数据。

谢谢各位老师的热情帮助