50分：简单问题，有点搞笑，领导要我作个程序：打开直接到搜狐

Question

象这样子编译后的EXE文件还有17K，能否再小点？？
program Project2;
uses
  ShellAPi;
begin
      ShellExecute(0,'open','http://www.sohu.com', nil, nil,0);
end.

Answer 1

可以
加壳压缩
http://www.pediy.com/tools/packers.htm

Answer 2

'http://www.sohu.com'   改为  它的IP

Answer 3

Aspack压一下，不会超过10K；你们领导也怪可爱的

Answer 4

偶家的领导是很可爱的，他懂得编程的重要！
所以我用DELPHI小姐给他作了一个，就是她太肥了点，这么点小事居然要17K，主要是因为ShellAPi太大了，不知道大家有无其他办法，当然不是做个快捷方式，要程序，要程序的。

Answer 5

55555555..好感动，多久没见过这么“小巧”的EXE了？？？？

Answer 6

delphi3 10k
 能否再小点

Answer 7

IE默认成sohu就可以了，多少K都省了。

Answer 8

Delphi7 13,824 字节program test;
  function ShellExecute(hWnd: Integer; Operation, FileName, Parameters,
       Directory: PChar; ShowCmd: Integer): HINST; stdcall;  　　　　external 'shell32.dll' name 'ShellExecuteA';begin
  ShellExecute(0,'open','http://www.sohu.com', nil, nil,0)
end.有没有比这个更小的了，在Delphi7下,呵呵