Delphi初学者的一些问题。

[浮游的精彩]

7.完成自升程序：一个主程序为升级服务器，当被升级程序启动时先进行升级判断，如发现需要升级时则进行自升级。

8.自升级后主程序进入登陆窗口（直接连接数据库），登陆成功后则判断数据库数据版本，如果低于软件指定的版本，
则屏蔽窗体上的所有操作（除退出操作）;

9.建立个类，要让基类和派生类实现的克隆操作

[yaowz27]

引用

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

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
  

[lyhoo163]

升级服务程序，一般设置在登录时，搜索新旧文件的修改时间值，之后下载新的文件，即可。