delphi – 创建类集合的最佳方法

发布时间：2020-12-15 09:41:23 所属栏目：大数据来源：网络整理

导读：我正在尝试创建一些类,允许我检索和操作我的应用程序将创建和管理的一组备份. 我已经提出了以下代码(尚未测试),但我不确定它是否是实现此目标的最佳方式,或者是否有更简单/更好的方法.我正在使用Delphi 2010. 我有一个包含备份详细信息的类(TBackupItem),然

我正在尝试创建一些类,允许我检索和操作我的应用程序将创建和管理的一组备份.

我已经提出了以下代码(尚未测试),但我不确定它是否是实现此目标的最佳方式,或者是否有更简单/更好的方法.我正在使用Delphi 2010.

我有一个包含备份详细信息的类(TBackupItem),然后我需要一个包含TBackupItem集合的类,最后我将有一个类来管理备份的读取和写入,并且还公开了一个访问的属性TBackupItem的集合.

type
  TBackupItem = class
  private
    FBackupProgram: string;
    FBackupProgramVersion: string;
    // There are more variables and properties but for the sake of simplicity I've listed only two
  public
    property BackupProgram: string read FBackupProgram write FBackupProgram;
    property BackupProgramVersion: string read FBackupProgramVersion write FBackupProgramVersion;
  end;

  TBackupsList = class(???)
  private
    // This class will hold a list of TBackupItem. What should I use to accomplish this?
  end;

  TBackupsManager = class(TObject)
  private
    FBackups: TBackupsList;
  public
    property Backups: TBackupsList read FBackups write FBackups;
  end;

你们对完成这项工作的最佳方式有什么评论和/或例子吗？

谢谢！

解决方法

在Delphi 2010中,最好的方法是使用泛型.

使用此代替您的自定义类TBackupsList：

TBackupsManager = class
private
  FBackups: TObjectList<TBackupItem>;

(你必须包括Generics.Collections).

如果您的集合需要更多方法,您可以保留TBackupsList并从TObjectList< TBackupItem>继承它：

TBackupsList = class(TObjectList<TBackupItem>)      
public 
  function MyAdditionalMethod: Integer;
end;

编辑：如果要使用自定义TBackupsList,但不希望拥有TObjectList所具有的所有公共方法,则不能使用继承.相反,你必须使用组合：

TBackupsList = class
private
  FItems: TObjectList<TBackupItem>
public 
  //Duplicates of the original TObjectList public methods accessing FItems.
end;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!