建议:图片保存在memo字段里,不会出现这样的问题
程序代码:
PUBLIC LCSys16,LCNowpath
LCSys16=SYS(16) &&获取当前程序所在的全路径,包括当前运行程序名。
LCNowpath=LEFT(LCsys16,RAT("\",LCSys16,1)) &&获取当前运行程序所在工作目录。
SET DEFAULT TO (LCNowpath) &&程序文件所在的当前路径
程序代码:lj1=LCNowpath+"logo.jpg" lj2=LCNowpath+"mepic.jpg" Thisform.pageframe1.page4.image1.Picture = &lj1 Thisform.pageframe1.page4.image2.Picture = &lj2
[此贴子已经被作者于2023-5-15 22:32编辑过]