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

Вниз

Цикл for ... to ... do снизу вверх :-)   Найти похожие ветки 

 
delpher_gray ©   (2002-08-28 09:24) [0]

Привет Делфер ! Подскажи если знаешь как можно цикл for ... to ... do произвести снизу вверх ? Вот программа:

program List;

{$APPTYPE CONSOLE}

uses
SysUtils,
Classes;

var
Str: TStringList;
i: integer;
begin
Str := TStringList.Create;
for i := 0 to 5 do
Str.Add(IntToStr(i));
Str.Free;
end.


Как я монгу записать в Str текст:
5
4
3
2
1
0

То есть наоборот не с 0 до 5, а с 5 до 0. Кто знает, подскажите плииизззз.
Т


 
Dimich1978 ©   (2002-08-28 09:26) [1]

downto не пробовал


 
777 ©   (2002-08-28 09:26) [2]

for i:=0 downto 5 do


 
777 ©   (2002-08-28 09:27) [3]

извиняюсь
for i:=5 downto 0 do


 
Kaban ©   (2002-08-28 09:28) [4]

да, последний ответ прямо в точку


 
Dimich1978 ©   (2002-08-28 09:28) [5]

Что с Байконура ракеты запускать собрался:)))


 
Dimich1978 ©   (2002-08-28 09:30) [6]

a еще можно так
i=5;
repeat
i:=i-1;
.....
until i=0;


 
Anatoly Podgoretsky ©   (2002-08-28 09:32) [7]

Dimich1978 © (28.08.02 09:28)
У ткх отсчет с 9, это индийский космодром


 
ЮЮ ©   (2002-08-28 09:37) [8]

for i := 0 to 5 do
Str.Add(IntToStr (5-i));


 
Dimich1978 ©   (2002-08-28 09:42) [9]

Ну, а вообще это ведь символически, на самом деле там стоит комп который сам все делает. И ключа на старт тоже уже как бы нет, он есть но символически тоже.


 
Dimich1978 ©   (2002-08-28 09:45) [10]

ЮЮ>>
Это частный случай...ну мы тут на легкий вопрос дебаты развели, как будто как я уже выше сказал, в космос ракету собрались запускать. Видимо у всех времени много. Ладно займемся делом .


 
ЮЮ ©   (2002-08-28 09:46) [11]

>там стоит комп который сам все делает
Комп сам ничего не сделает. Без delpher_gray © :-)


 
Dimich1978 ©   (2002-08-28 09:51) [12]

Про этот комп скажешь что туда уже лет сто ни кто не лазил...на автороство не претендую(Петросян)



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

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

Наверх




Память: 0.49 MB
Время: 0.01 c
14-27165
velk
2002-08-13 14:37
2002.09.09
Подскажите где взять компоненты для доступа к MySQL


8-27129
Dy-Ty
2002-05-07 13:38
2002.09.09
Проблема с TCanvas


1-27012
Дмитрий Баранов
2002-08-29 19:23
2002.09.09
Получение переменных окружения в СПИСОК


1-26975
IL-2
2002-08-29 15:08
2002.09.09
ShellList


1-27063
Сайбрекс
2002-08-28 02:40
2002.09.09
Какие возможности Delphi?