易语言怎么将做好的程序压缩，使编译出的程序体检更小

可以把编译出来的程序用WinRAR、好压、360压缩。压缩程序

或者用如弯加壳软件把程序加壳就好了，通用的就是UPX壳

如果我回答的好，就选我为满意答案吧!

另外宣传一下知道团队:大汉帝国。

欢迎各饥氏路神仙加烂橡散入!

程序写好以后，首先点编译——然后点静态编译——然后选择路径、及程序名称——点击配或保存（如果有请问需要将此程序。。。。直接点写出）——培型伍选中所有此程序的文件——添租滚加压缩。。。就OK了

'以下代码非原创

但可行

觉得拷贝无聊者请忽略

'代码定义了两个子程序一个解压一个压缩

.版本

2

.子程序

压缩_WinRAR_压缩,

文本型,

公开,

本命令需要安装WinRAR

.参数

被压缩的文件,

文本型,

数组,

文件和文件夹都可以

.参数

压缩到文件,

文本型,

,

全路径和rar\zip文件名

.参数

WinRAR地址,

文本型,

可空,

如果注册表内没有WinRAR的信息。但是安装了的。就需要写

例：C:\Program

Files\WinRAR\WinRAR.exe

.局部变基橡量

易团俊,

整数型

.局部变量

被压缩信息搏尘旁,

文本型

易团俊

＝

0

被压缩信息

＝

“”

.如果真

(是否为空

(WinRAR地址))

WinRAR地址

＝

取文本注册项

(#本地机器,

“SOFTWARE\Microsoft\Windows\CurrentVersion\App

Paths\WinRAR.exe\”,

)

.如果真结束

.如果真

(WinRAR地址

＝

“”)

返回兄尘

(“找不到WinRAR目录”)

.如果真结束

.计次循环首

(取数组成员数

(被压缩的文件),

易团俊)

被压缩信息

＝

被压缩信息

＋

“

”

＋

被压缩的文件

[易团俊]

.计次循环尾

()

运行

(WinRAR地址

＋

“

a

-ep1

-scul

-r0

-iext

”

＋

压缩到文件

＋

被压缩信息,

真,

)

返回

(“”)

.子程序

压缩_WinRAR_解压,

文本型,

公开,

本命令需要安装WinRAR

.参数

压缩文件,

文本型,

,

全路径和rar\zip文件名

.参数

解压到文件夹,

文本型,

,

文件夹全路径

.参数

WinRAR地址,

文本型,

可空,

如果注册表内没有WinRAR的信息。但是安装了的。就需要写

例：C:\Program

Files\WinRAR\WinRAR.exe

.如果真

(是否为空

(WinRAR地址))

WinRAR地址

＝

取文本注册项

(#本地机器,

“SOFTWARE\Microsoft\Windows\CurrentVersion\App

Paths\WinRAR.exe\”,

)

.如果真结束

.如果真

(WinRAR地址

＝

“”)

返回

(“找不到WinRAR目录”)

.如果真结束

运行

(WinRAR地址

＋

“

x

-iext

-ow

-er

”

＋

压缩文件

＋

“

”

＋

解压到文件夹,

真,

)

返回

(“”)

---