Главная страница
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.025 c
1-99177
Ospa
2002-12-18 23:03
2002.12.30
Files


6-99229
=alive=
2002-10-31 17:15
2002.12.30
Проверка по имени


3-98966
Kolya
2002-12-10 04:33
2002.12.30
Посоветуйте какую БД использовать?


7-99371
RETAND
2002-10-21 21:00
2002.12.30
Сделать мою форму как рабочий стол


1-99038
Шурик Ш
2002-12-17 18:28
2002.12.30
Выпадающий список в Grid