Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.25;
Скачать: CL | DM;

Вниз

Взаимодействие нескольких TStringList   Найти похожие ветки 

 
Ne_Vaszno   (2004-04-07 17:04) [0]

Мастера! Помогите-ееее!!! При сортировке в TStringList необходимо перстроить соответствующим образом другой TStringList (т.е. во втором перставить строки в таком же порядке, как было отсортированно в первом), чтобы было вроде таблицы. Как мне быть? Прошу учесть, что в TStringList около 15000 записей. Поэтому код необходим более компактный, может есть какое-нибудь событие вроде OnExchange


 
Digitman ©   (2004-04-07 17:07) [1]

нашута нужны два списка ? достаточно одного, imho


 
Тимохов ©   (2004-04-07 17:09) [2]

согласен с Digitman - держите все в одном.
держите recordы в списке objects.
или одну строку в списке строк, а другую в objects или еще как - вариантов масса.


 
Тимохов ©   (2004-04-07 17:11) [3]

если же все таки нужно сделать именно как вы говорите, то
(пусть сортируем список 1 (с1))
1. перед сортировкой в с1 в objects занесите порядковые номера строк.
2. отсотрируйте с1.
3. создайте с3
4. бегите по с1
5. берете номер из objects
6. в с3 копируете строку из с2 с найденными в п5 номером.
7. удалите с2


 
Ne_Vaszno   (2004-04-07 17:40) [4]

Дело в том, что Objects"ы заняты под иконки, а количкство стобцов в таблице должно изменяться динамически.
  А как держать всё в одном? Делить строку определённым символом? Или есть варианты?


 
Гаврила   (2004-04-07 17:46) [5]

Иконки держать в объектах, объекты держать в Objects" ах


 
Ne_Vaszno   (2004-04-07 17:53) [6]

В исходнике TStringList в привате есть функция QuickSort, там можно отловить этот момент, её нельзя как-нибудь переопределить в потомке?



Страницы: 1 вся ветка

Текущий архив: 2004.04.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.023 c
14-1080622115
Dmitriy O.
2004-03-30 08:48
2004.04.25
Набираю команду кодеров.


3-1080547404
Yura_2
2004-03-29 12:03
2004.04.25
По использованию SQL-DMO для разработки приложения


1-1081529914
White
2004-04-09 20:58
2004.04.25
Подскажите какой тип заменит короткое вещественное 2байта?


8-1073496651
The xXx
2004-01-07 20:30
2004.04.25
Media Player


8-1074750944
DNS
2004-01-22 08:55
2004.04.25
EXE (RAD Video Tools) + Delphi???