大家对不起了，我这篇文章（Pascal写的病毒）是从别人那转载过来的，所以没有编译过就贴上来了，不知道运行的结果，误导了大家，万望大家原谅！