记生平写的第一个病毒!
日前写了一个病毒,Troy.Downloader!
程序很简单,一个Exe,一个DLL,共享VCL.bpl
DLL中导出一个函数:
- Delphi(Pascal) code
function DLLMain: TFormClassbegin Result := TForm;end;
exe中的dpr文件:
- Delphi(Pascal) code
function MetaClass: TFormClass;begin if not Assigned(FMeta) then FMeta := ...; // Get DLL FormClass Result := FMeta;end;var FMeta: TFormClass; // DLL Class FInstance: TForm;begin Application.Initialize; FMeta := MetaClass; if Assigned(FMeta) then Application.CreateForm(FMeta, FInstance); Application.Run; end;
最简单的病毒就这样莫名其妙的产生了,卡巴司机还是挺牛的!
[解决办法]
哈哈~~~
顶一个
[解决办法]
最好的杀毒软件就是不用杀毒软件
[解决办法]
这里怎么用HTML代码
[解决办法]
卡巴确实牛
[解决办法]
接分
[解决办法]
卡得死机也老说我写的程序是病毒
我真想问候卡巴一家
哈哈
[解决办法]
牛人,牛程序了
[解决办法]
可以接铁了
[解决办法]
up
[解决办法]
哈哈,JF
[解决办法]
顶
[解决办法]
卡巴已经被我停用了,开着它金山词霸都用不了。。
[解决办法]
呵呵!