2,726
社区成员
发帖
与我相关
我的任务
分享如何将EXE文件减肥?
主表单的init里,有下面一段
If Type("Thisform.Image1")<>"O" &&防止添加重复
Thisform.AddObject("image1","image")
Thisform.image1.Width = SCREEN_W
Thisform.image1.Height=SYSMETRIC(22)-SYSMETRIC(11)*3 && SYSMETRIC(22)就是屏幕去掉任务栏后的高度
Thisform.image1.Left = 0
Thisform.image1.Top = 0
Thisform.image1.Visible = .T.
Thisform.image1.stretch = 2 &&图片变比填充
Thisform.image1.picture = "pic\sanjiangdongli.jpg"
ENDIF
上述红色部分,那个文件比较大,有3M.
这样,编译时,就把这个图片编译进去了,编译后的EXE文件也特别大了.
问一下,如何将这个jpg文件,不编译进去呢? 这样,可以对EXE文件进行减肥了
If Type("Thisform.Image1")<>"O" &&防止添加重复
Thisform.AddObject("image1","image")
Thisform.image1.Width = SCREEN_W
Thisform.image1.Height=SYSMETRIC(22)-SYSMETRIC(11)*3 && SYSMETRIC(22)就是屏幕去掉任务栏后的高度
Thisform.image1.Left = 0
Thisform.image1.Top = 0
Thisform.image1.Visible = .T.
Thisform.image1.stretch = 2 &&图片变比填充
Thisform.image1.picture = "pic\sanjiangdongli.jpg"
ENDIF
上述红色部分,那个文件比较大,有3M.
这样,编译时,就把这个图片编译进去了,编译后的EXE文件也特别大了.
问一下,如何将这个jpg文件,不编译进去呢? 这样,可以对EXE文件进行减肥了
...全文
请发表友善的回复…
发表回复
十豆三 2012-07-23
- 打赏
- 举报
还有一个办法，就是用一个很小的同名图片，代替你的比较大的图片（注意备份好原来的比较大的图片）
十豆三 2012-07-23
- 打赏
- 举报
都市夜猫 2012-07-23
- 打赏
- 举报
项目管理器中右击这个图片所在的节点，选择不包含即可
xilaianzxsc 2012-07-23
- 打赏
- 举报
这个贴,给分少了...对不住二位老师了,请见谅.
都市夜猫 2012-07-23
- 打赏
- 举报
除非图片需要可以被替换或更新，否则这种减肥意义不大
用可以压缩 vfp 生成 exe 的软件效果不错，我用 refox 的压缩功能，一般可以将 exe 压缩到只有原来的 25% 左右。
用可以压缩 vfp 生成 exe 的软件效果不错，我用 refox 的压缩功能，一般可以将 exe 压缩到只有原来的 25% 左右。
