Программирование в Delphi. Барков И.А - 11 стр.

UptoLike

Составители: 

11
property Strings[Index: Integer]: string;
property Objects[Index: Integer]: TObject;
Первое из них является векторным свойством, принимаемым по умолчанию. Общее количество
пар в списке равно значению свойства:
(Ro'l property Count: Integer;
Класс TStrings также предназначен для хранения пар вида 'параметр=значение', например, в
файлах инициализации (.INI). Эту возможность реализует следующее свойство:
property Values[const Name: string]: string;
При обращении к этому свойству для чтения ищется строка, содержащая подстроку (параметр)
Name и
символ '='. Если она найдена, возвращается то, что находится в этой строке после '='. Если нет,
Values[Name] равно пустой строке. При записи: если строка, содержащая параметр Name, найденаее
значение после '=' заменяется новым значением, если нетстрока добавляется. Если существующему
параметру присваивается пустая строка (Valu-es[Name] := ";), то он удаляется из набора строк.
Методы класса приведены в
таблице:
procedure BeginUpdate; procedure En-
dUpdate;
Пара процедур, которые устанавливают и сбрасывают флаг об-
новления набора. Между ними, для ускорения работы, нужно
заключать все операции по копированию, удалению и т. д.
большого количества элементов.
procedure Clear; Осуществляет полную очистку набора.
p
rocedure Insert(Index: Integer; const S:
string);
Вставляет строку S под индексом Index.
procedure Delete(Index: Integer); Удаляет строку с индексом Index.
function IndexOf(const S: string): Inte-
ger;
Возвращает индекс (номер в наборе) строки S. Если она не
найдена, функция возвращает -1.
function IndexOfObject(AObject: TOb-
ject): Integer;
Возвращает индекс объекта в наборе. В случае неудачи воз-
вращает -1.
function Equals(Strings: TStrings):
Boolean;
Сравнивает строки вызвавшего его объекта со строками объек-
та Strings и возвращает True в случае равенства (сравниваются
число строк и все строки попарно).
function Add(const S: string): Integer- Добавляет строку S в конец набора и в случае успеха возвраща-
ет присвоенный ей индекс (он должен быть равен значению
Count до добавления строки).
function AddObject(const S: string;
AObject: TObject): Integer;
Добавляет строку в паре с объектом. Возвращает то же, что и
метод Add.
procedure Exchange(Indexl, Index2:
Integer);
Меняет местами пары строка+объект с индексами Indexl и
Index2.
procedure Move(Curlndex, Newlndex:
Integer);
Перемещает пару строка+объект с позиции Curlndex в позицию
Newlndex.
procedure InsertObject(Index: Integer;
const S: string; AObject: TObject);
Вставляет объект AObject и соответствующую ему строку S в
набор под индексом Index.
Шесть методов предназначены для экспорта/импорта наборов строк:
а) в поток:
procedure LoadFromStream(Stream: TStream);
procedure SaveToStream(Stream: TStream);
               property Strings[Index: Integer]: string;
               property Objects[Index: Integer]: TObject;
        Первое из них является векторным свойством, принимаемым по умолчанию. Общее количество
пар в списке равно значению свойства:
               (Ro'l property Count: Integer;
        Класс TStrings также предназначен для хранения пар вида 'параметр=значение', например, в
файлах инициализации (.INI). Эту возможность реализует следующее свойство:
               property Values[const Name: string]: string;
        При обращении к этому свойству для чтения ищется строка, содержащая подстроку (параметр)
Name и символ '='. Если она найдена, возвращается то, что находится в этой строке после '='. Если нет,
Values[Name] равно пустой строке. При записи: если строка, содержащая параметр Name, найдена — ее
значение после '=' заменяется новым значением, если нет — строка добавляется. Если существующему
параметру присваивается пустая строка (Valu-es[Name] := ";), то он удаляется из набора строк.
        Методы класса приведены в таблице:
procedure BeginUpdate; procedure En- Пара процедур, которые устанавливают и сбрасывают флаг об-
dUpdate;                                 новления набора. Между ними, для ускорения работы, нужно
                                         заключать все операции по копированию, удалению и т. д.
                                         большого количества элементов.

procedure Clear;                          Осуществляет полную очистку набора.
procedure Insert(Index: Integer; const S: Вставляет строку S под индексом Index.
string);
procedure Delete(Index: Integer);         Удаляет строку с индексом Index.
function IndexOf(const S: string): Inte- Возвращает индекс (номер в наборе) строки S. Если она не
ger;                                     найдена, функция возвращает -1.

function IndexOfObject(AObject: TOb-      Возвращает индекс объекта в наборе. В случае неудачи воз-
ject): Integer;                           вращает -1.
function Equals(Strings: TStrings):       Сравнивает строки вызвавшего его объекта со строками объек-
Boolean;                                  та Strings и возвращает True в случае равенства (сравниваются
                                          число строк и все строки попарно).

function Add(const S: string): Integer-   Добавляет строку S в конец набора и в случае успеха возвраща-
                                          ет присвоенный ей индекс (он должен быть равен значению
                                          Count до добавления строки).
function AddObject(const S: string;       Добавляет строку в паре с объектом. Возвращает то же, что и
AObject: TObject): Integer;               метод Add.
procedure Exchange(Indexl, Index2:        Меняет местами пары строка+объект с индексами Indexl и
Integer);                                 Index2.
procedure Move(Curlndex, Newlndex:        Перемещает пару строка+объект с позиции Curlndex в позицию
Integer);                                 Newlndex.
procedure InsertObject(Index: Integer;    Вставляет объект AObject и соответствующую ему строку S в
const S: string; AObject: TObject);       набор под индексом Index.


       Шесть методов предназначены для экспорта/импорта наборов строк:
       а) в поток:
               procedure LoadFromStream(Stream: TStream);
               procedure SaveToStream(Stream: TStream);



                                                     11