《Delphi深度历险》中的源码在Delphi7下不能运行?

Question

我下载了《Delphi深度历险》的源码，编译时提示缺少文件，或那有错误，是不这个源在d7下不能运行？？？？
　　《Delphi深度历险》书是01年出的，难道d7不能运行它？？？
　　有谁运行成功了？比如“足球番”那个程序，看在100分上给我发一份源码吧！
　　Email:[email protected]

Answer 1

>>编译时提示缺少文件，或那有错误至少你应该说是少什么文件，错误提示是什么，
这样人家才能帮到你

Answer 2

to 楼上：源代码在  www.2ccc.com  可下载，而且还有电子书！！！！
　to 老之: 我知道D6可以用，可不会要我再装一个D6吧，一个D7已经几百了！
　文件我已经全部拷过去了，提示还是有错误，可能源代码本身有错吧，不知谁在D6下运行成功过！

Answer 3

把 Unit\下面的15个pas文件复制到 delphi7\lib\ 下面，就大部分都可以运行了。“足球番”那个程序，是代码错误。
单元文件xUtils.pas中有一段程序是这样的:
procedure DoBusy(Busy: Boolean);
const
  Times: Integer = 0;
begin
  if Busy then
  begin
    Inc(Times);
    if Times = 1 then Screen.Cursor := crHourGlass;
  end else...改成:
procedure DoBusy(Busy: Boolean);
var
  Times: Integer;
begin
  Times:=0;
  if Busy then
  begin
    Inc(Times);
    if Times = 1 then Screen.Cursor := crHourGlass;
  end else
就行了 

Answer 4

谢谢"老之",我早上才把这个问题搞清楚了，我当时在找错误时应奇怪：const申明的是常量，而程序中又改变了它的值，那么它应该是变量才对，真是巧合，我们俩程序改的一模一样，一字不差！！！
    而且我已经把菜单改成了GB码，现在正在运这个游戏呢！
　　不过，发现有些窗体上的控件caption是不能改的，改过后还是按Big5码显示！搞不懂啊！!!