李战：
上面这个只能在DELPHI7以下用，DELPHI 2007运行时出错，要加编译指示，如下：
[阅读: 436] 2007-11-30 11:12:14
program writeme;{$APPTYPE CONSOLE}uses SysUtils;const s='program writeme;{$APPTYPE CONSOLE}uses SysUtils;const s=%s%s%s;begin write(format(s,[#39,s,#39]))end.';begin write(format(s,[#39,s,#39]))end.
李战(leadzen)
| -ICP -IDC -ISP |