DownTo

DownTo

Предшествует переменной цикла в декрементном цикле for

for Variable := Integer Expression downto Integer Expression do Statement;
for Variable := Char Expression downto Char Expression do Statement;
for Variable := Enum Expression downto Enum Expression do Statement;

Описание:

    Ключевое слово DownTo предшествует переменной цикла Expression(Выражение) в цикле for.

     Выражение может быть целым, символьным или перечислимым типом.

     См. ключевое слово For для подробного объяснения. Пример иллюстрирует три типа выражения.

Пример кода:

var
   i : Integer;

begin
   // Loop 5 times
   for i := (10 div 2) DownTo 1 do
      ShowMessage('i = '+IntToStr(i));
end;

Результат выполнения:

i = 5
i = 4
i = 3
i = 2
i = 1

Пример кода:

var
   c : char;
begin
   // Loop 5 times
   for c := 'E' DownTo 'A' do
     ShowMessage('c = '+c);
end;

Результат выполнения:

c = E
c = D
c = C
c = B
c = A

Пример кода:

var
   suit : (Hearts, Clubs, Diamonds, Spades);
begin
   // Loop 3 times
   for suit := Diamonds DownTo Hearts do
     ShowMessage('Suit = '+IntToStr(Ord(suit)));
end;

Результат выполнения:

Suit = 2
Suit = 1
Suit = 0

Клуб программистов

Delphi programming

Описание:

Пример кода:

Результат выполнения:

Пример кода:

Результат выполнения:

Пример кода:

Результат выполнения: