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

Вниз

TStringList invert.   Найти похожие ветки 

 
Soul2   (2002-12-18 05:30) [0]

Посоветуйте быстрый и короткий (в плане кода) способ инвертировать (последний итем на первый итд) TStringList.


 
MBo ©   (2002-12-18 06:31) [1]


with List do
if Count > 0 then
for i := 0 to (Count - 1) div 2 do
Exchange(i, Count - i - 1);


 
MBo ©   (2002-12-18 07:26) [2]

так лучше ;)

with List do
for i := 0 to (Count div 2) -1 do
Exchange(i, Count - i - 1);



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

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

Наверх




Память: 0.46 MB
Время: 0.017 c
1-99086
Yakudza
2002-12-19 18:12
2002.12.30
Как узнать имя компонента на который кликнули.


14-99356
Uran
2002-12-10 16:12
2002.12.30
Программа для чтения этого форума.


1-99168
Error
2002-12-18 15:35
2002.12.30
TListView


14-99297
Best Sniper
2002-12-08 19:15
2002.12.30
Установил Oper у 6.05.......


1-99165
Luke B. Dremlin
2002-12-08 04:44
2002.12.30
Составление слов перебором вариантов букв