好久没有共享贴了，过来发个Delphi梦魇的
其实也不是什么新鲜玩意，早该发了，就是因为我懒，没发出来，sysconst病毒（也就是Delphi梦魇）的原理性分析，大多是翻译自E文，也有自己的一点研究，欢迎大家拍砖。
进入正题，病毒会通过注册表搜索Delphi的安装目录，然后查找sysconst.bak文件，以此判断文件是否感染，如果未被感染，则打开sysconst.pas文件，写入病毒代码，把原来的sysconst.scu改成sysconst.bak，之后调用dcc32.exe编译生成sysconst.dcu文件，并且同步时间戳，最后删除更改过的pas文件。
而大家都知道，dcu是Delphi IDE生成的二进制映像文件，里面有保存的pas代码信息，很多控件为了避免开源，都用dcu格式发布自己的第三方控件，使得其他人无法得到源代码。如此说来，dcu是可以被编译进EXE文件的，病毒利用了这一点邪恶了编译器。
关于病毒的流程这里就不多说了，大家可以去看我的上一篇文章关于sysconst病毒的一点分析
既然我们知道了，sysconst.dcu是由sysconst.pas编译而来，那么病毒在pas文件中做了什么，那就是很重要的一个步骤了，我们也知道，pas当中包含了各种常量的定义，比如：
SUnknown = '<unknown>';
SInvalidInteger = '''%s'' is not a valid integer value';
SInvalidFloat = '''%s'' is not a valid floating point value';
SInvalidCurrency = '''%s'' is not a valid currency value';
SInvalidDate = '''%s'' is not a valid date';
SInvalidTime = '''%s'' is not a valid time';
一个程序不可能没有常量（Consts），因为这个缘故，所有进行编译的EXE都要引用这个单元，这样就正中病毒作者的下怀。当然这里大家可能会有一个疑问，既然Pas没有被感染（Pas被感染后就被病毒删除了，留下的是干净的pas），生成的EXE为什么会被感染�
相关问答：
我本来在学校是弄的J2EE
昨天去了长沙一家公司应聘 说是有一个项目 delphi的
实习期一个月 四天半的delphi培训 后面25天给你一个设计文档自己做一个项目
走后不久打电话过来叫我星期一去报到
看到delphi� ......
大家好：
我目前要开发一个ERP中的BOM工时汇总程序，在ORACLE中，BOM表的结构是传统的 父件 子件 式的，工时在另一个表中，可以用left outer join来关联，可以认为，关联后的表结构为 [父件] [ ......
delphi隐藏运行QQ程序
可以实现隐藏登录！但必须是2008年以前的版本。09及以后自动登录有些难度。
可以实现 不过分太少
可以实现的呀
顶
你到底要干什么,� ......
函数原型：
function ReadIC_GRBH(port: SmallInt; baud: LongInt; out_data: PChar): LongInt;
对应的java是什么？重点在out_data: PChar
Char
引用
Char
错了，应该是String
用JNative去调dll的时候out ......
function myfun:integer;
var b:pointer;
begin
b:=pointer($6Bc3C6);
asm
mov eax,[eax]
xor eax,[ecx+4]
cmp eax,0
je @b
end;
这样写编译不过去。请问如何� ......
