Главная страница
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.012 c
14-99305
Дмитрий К.К.
2002-12-08 22:16
2002.12.30
Рональдо разыгрался


1-99149
Niko
2002-12-18 16:28
2002.12.30
Как привязать Label к Shape?


1-99158
drin
2002-12-18 00:54
2002.12.30
Создание класса


4-99392
Ольга
2002-11-12 12:43
2002.12.30
CreateThread


8-99203
K.o.Z
2002-08-17 02:12
2002.12.30
вопрос по Bitmaps in OpenGL