Delphi初学者的一些问题。

Question

7.完成自升程序：一个主程序为升级服务器，当被升级程序启动时先进行升级判断，如发现需要升级时则进行自升级。8.自升级后主程序进入登陆窗口（直接连接数据库），登陆成功后则判断数据库数据版本，如果低于软件指定的版本，
  则屏蔽窗体上的所有操作（除退出操作）;9.建立个类，要让基类和派生类实现的克隆操作

Answer 1

7.例：升级服务程序可以每利用TTimer控件每隔一段时间通过URL请求检查程序或模块是否需要升级，再通过ShellAPI单元中的若干函数对程序或模块进行替换。
8.登录后对数据库中储存版本的表进行查询，例：SELECT ver FROM t_Version取得版本号后和当前程序版本进行比较，如果低于数据库中记录版本号，则使用控件的Enable属性进行控制，Enable属性为False时控件失效。
9.克隆是对对象的操作，不是类。在Delphi里继承自TPersistent的类可以使用Assign或AssignTo方法进行对象的复制。例：
  
  type 
    TFoo = TPersistent
      S: string;
    end  procedure Foo;
  var
    a, b: TFoo;
  begin
    a := TFoo.Create;
    b := TFoo.Create;
    a.S := 'Foo';
    a.AssignTo(b);
    //或 b.Assign(a);
  end