Объектно-ориентированное программирование на С++ - eDrive

48
ремещение строк внутри списка выполняется методом Move. Удалением
строки занимается метод Delete, а Clear очищает список:
void StringLists3 () {
TStringList *tsl = new TStringList;
tsl–>Add (“Раз”);
tsl–>Add (“Два”);
ShowMessage (tsl–>Count);
ShowStr (tsl);
// Раз Два
tsl–>Insert (1, “Полтора”); ShowStr (tsl); // Раз Полтора Два
tsl–>Move (0, 2); ShowStr (tsl); // Полтора Два Раз
tsl–>Exchange (0, 1); ShowStr (tsl); // Два Полтора Раз
tsl–>Delete (1); ShowStr (tsl);
// Два Раз
tsl–>Sort (); ShowStr (tsl);
// Два Раз
int index; if (tsl–>Find (“Раз”, index)) ShowMessage (index); // 0
tsl–>Clear (); ShowStr (tsl);
TStringList *temp = new TStringList;
temp–>Assign (tsl); ShowStr (temp); // Два Раз
delete temp;
Memo1–>Lines–>Assign (tsl);
RichEdit1–>Lines–>Assign (tsl);
tsl–>Assign (Memo1–>Lines);
TStrings *ml = Memo1–>Lines;
ml–>Add (“Три”);
ShowMessage (ml–>Count);
ml–>Move (0, 1);
ml–>Insert (1, “Четыре”);
ml–>Delete (1);
ml–>Clear ();
ComboBox1–>Items–>AddStrings (tsl);
TStrings *lb = ListBox1–>Items;
lb–>AddStrings (tsl);
lb–>Add (“Три”);
lb–>Append (“Четыре”);
ShowMessage (lb–>Count);
lb–>Insert (2, “Пять”);
lb–>Move (0, 1);
lb–>Exchange (0, 1);
lb–>Delete (1);
lb–>SaveToFile (“1.txt”);
lb–>Clear ();