TXMLResString

type TXMLResString = class

protected

  FFileName: string;

  FStringRes: TStringList;

public

  constructor Create();

  destructor Destroy; override;

  procedure Open();

  procedure Save;

  function Add();

  function FindByName();

  procedure Delete();

  property Count: Integer; [r]

  property Saved: Boolean; [r]

  property ValueFromIndex []: string; [rw]

  property NameFromIndex []: string; [rw]

end;

TXMLResString

TObject