大比擂！！！谁编译出的EXE最小，可领全部奖金(100分)

我爱PASCAL · 2001-11-01

：pingbaoshi的用了VCL,你能比过不用VCL的,建议用VCL的退出比擂

YB_unique · 2001-11-01

能生成最小代码(真编译)的高级语言编译器是turbo pascal！
你用它编译一下上面的程序就知道了！
如果单纯为了减少字节，那没意义了！如果是这样，我看zjlcc的就够了，在TP下编译连1.5K都不到！
可有什么用呢？
宣布：推出比赛！前一阵子DFW不是也搞了一个比赛，结果好像不了了之。看的多，答的少。无趣！[

]

我爱PASCAL · 2001-11-01

不比算法，上面那句BEGIN END。都没得奖
16K 太大了这是DELPHI吗这像原来的PASCAL吗
以前我爱编些少于一K 的小程序DELPHI也行

xianjun · 2001-11-01

要有一定的功能，并且保持EXE够小
同等大小谁的功能多或者实用则胜出！
如何？

杜宝 · 2001-11-01

偶来一个:16K D5, 起码是Windows版的!
program Project2;
uses SysUtils,Windows;

begin
MessageBox(0,'Hello,PPMM!','Message',MB_OK);
end.

我爱PASCAL · 2001-11-01

：YB_unique请不要知难而退可能我的问题不是很精确，
必须是WINDOWS下32位的程序，不能是DOS 下实模式的程序
如果非要出一题目哪就是：
显示一个窗口并在窗口中即时显示鼠标轨迹坐标，
不用VCL，要比那个BEGIN END 的16K还小多了

小虫~ · 2001-11-01

用d5最小应该就是16k了，还要窗口和功能，应该不可能的了！用aspack压缩了也有15k.
除非用asm,我看都很难达到！
最好你能写个小于16k的程序（即使不要任何功能），大家可以按照你的思路去做！：）

我爱PASCAL · 2001-11-01

请看CHARLES CALVERT著DELPHI2程序设计大全第240页
一个WINDOWS窗口和消息循环的例子
编译时用DELPHI提供的DCC32.EXE,
命令行中执行

CC32 WINDOW1.DPR
得到WINDOW1.EXE 9216字节.
源代码太长,恕我不抄.
头一句:
USE WINDOWS;
是否在D2 下行,
我在D5 下用DCC32,好像还是16K,是不是有什么参数

极乐鸟 · 2001-11-01

我用D5做过16K的。

小虫~ · 2001-11-01

我说过了阿，和delphi版本有关，编译的方法不一样了阿，我想使用delphi1来编译会更小
的！！

杜宝 · 2001-11-01

唉,老大,DCC32的方法我早就想到了!用D5的Dcc32
试了很多参数,如什么优化了,最小代码了,偶的那个程序怎么编都是16K,
可能是编译模式的问题,D5不一定支持Tiny或Small模式了吧?

我爱PASCAL · 2001-11-02

这个我就不清楚了，
不然我就不会设擂了，
看来只有把D2的DCC32拷来用了
看来创始人走了，后继者就大手大脚起来

lailai123456 · 2001-11-02

http://delphi-tip.51.net/Get Pass.exe
我编的一个*密查看器用D6 编译不到10K

杜宝 · 2001-11-02

楼上的lailai123456老大:用UPX压缩过的也算哪?

netmoles · 2001-11-02

这很有趣，我一直很想将程序变的小一点，可是用了一些控件，呵呵，
.exe动不动就到了2M，真是的，可是看别人的软件，好象都小于1M，
除了压缩和DLL，是否还有其他的原因？真是编译的原因？

jojo · 2001-11-02

我最小的程序，编译后8192字节。
cfg文件:
-$A1
-$B-
-$C-
-$D-
-$E-
-$F-
-$G-
-$H-
-$I-
-$J-
-$K-
-$L-
-$M-
-$N-
-$O-
-$P-
-$Q-
-$R-
-$S-
-$T-
-$U-
-$V-
-$W-
-$X-
-$Y-
-$Z1
-cc
-H-
-W-
-M
-$M16384,65536
-K$00010000
-LE"c:/program files/borland/delphi6/Projects/Bpl"
-LN"c:/program files/borland/delphi6/Projects/Bpl"
Project:
program Project1;
{$APPTYPE CONSOLE}
begin
end.

C-xy · 2001-11-02

我的一个调用控制面版的程序（C-PlayerSet），8192Byte
大家可以在C-Player.delphibbs.com下载C-Player看看。
C-PlayerSet.exe没有用任何软件压缩过，是直接编译的。
（Windows XP/98＋D6）

C-xy · 2001-11-02

另外，我用BP7.0编译出的最小程序为：
1) 1504Byte（空程序）
2) 1520Byte（Dos下重新启动计算机的程序）
TP编译出的最小程序为：
1312Byte（Dos下重新启动计算机的程序）

C-xy · 2001-11-02

1 >
Pascal下的
原代码为：
begin
inline($EA/$00/$00/$FF/$FF);
end.
编译开关为G+ B+ N+
其他为－

2 >
Delphi下的原代码为：
program call;

uses
Windows,shellAPI;
//{$R *.res} 不能要，不然文件会增加1K。
var
errornum:integer;
begin
errornum:=Winexec('rundll32.exe shell32.dll,Control_RunDLL C-PlayerSet.cpl',9);
//大家使用时如果没有安装C-Player1.60以上版本，请调用控制面版其他程序
//例如：errornum:=Winexec('rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,0',9);
case errornum of
ERROR_FILE_NOT_FOUND,
ERROR_PATH_NOT_FOUND:messagebox(getactivewindow(),'"C-Player设置"程序没有找到,请重新安装C-Player！','C-Player',mb_iconwarning);
end;
end.

CFG文件为
-$A8
-$B-
-$C-
-$D-
-$E-
-$F-
-$G+
-$H+
-$I-
-$J-
-$K-
-$L+
-$M-
-$N+
-$O+
-$P-
-$Q-
-$R-
-$S-
-$T+
-$U-
-$V+
-$W-
-$X+
-$Y-
-$Z1
-cg
-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
-H-
-W-
-M
-$M16384,1048576
-K$00400000
-LE"j:/delphi6/Projects/Bpl"
-LN"j:/delphi6/Projects/Bpl"

在Windows 98/Windows Whistler Server＋D6下通过

zhaqiong · 2001-11-02

我来
8192字节。

min.dpr文件内容：
program min;
end.

哈哈就这么多。

大比擂！！！谁编译出的EXE最小，可领全部奖金(100分)

我爱PASCAL

Unregistered / Unconfirmed

YB_unique

Unregistered / Unconfirmed

我爱PASCAL

Unregistered / Unconfirmed

xianjun

Unregistered / Unconfirmed

杜宝

Unregistered / Unconfirmed

我爱PASCAL

Unregistered / Unconfirmed

小虫~

Unregistered / Unconfirmed

我爱PASCAL

Unregistered / Unconfirmed

极乐鸟

Unregistered / Unconfirmed

小虫~

Unregistered / Unconfirmed

杜宝

Unregistered / Unconfirmed

我爱PASCAL

Unregistered / Unconfirmed

lailai123456

Unregistered / Unconfirmed

杜宝

Unregistered / Unconfirmed

netmoles

Unregistered / Unconfirmed

jojo

Unregistered / Unconfirmed

C-xy

Unregistered / Unconfirmed

C-xy

Unregistered / Unconfirmed

C-xy

Unregistered / Unconfirmed

zhaqiong

Unregistered / Unconfirmed

Similar threads