Embarcadero Delphi
For 루프
수색…
통사론
- OrdinalVariable : = LowerOrdinalValue to UpperOrdinalValue do begin {loop-body} end;
- OrdinalVariable : = UpperOrdinalValue downto LowerOrdinalValue do begin {loop-body} end;
- Collection의 EnumerableVariable에 대해 begin begin {loop-body} end;
비고
- 델파이
for
-loop 구문에서 단계 금액을 변경 아무것도 제공하지 않는1
다른 값으로한다. - 변수 서수 값 (예 :
Integer
유형의 로컬 변수)을 사용하여 루핑 할 때, 위 및 아래 값은 한 번만 결정됩니다. 이러한 변수에 대한 변경 사항은 루프 반복 횟수에 영향을 미치지 않습니다.
단순 루프
for
루프는 시작 값에서 종료 값까지 반복합니다.
program SimpleForLoop;
{$APPTYPE CONSOLE}
var
i : Integer;
begin
for i := 1 to 10 do
WriteLn(i);
end.
산출:
1
2
삼
4
5
6
7
8
9
10
문자열의 문자 반복
2005 년
다음은 문자열 s
의 문자를 반복합니다. 루프 제어 변수 (이 예에서 c
)의 유형이 반복되는 값의 요소 유형과 일치하는 한 배열 또는 세트의 요소를 루핑하는 경우에도 유사하게 작동합니다.
program ForLoopOnString;
{$APPTYPE CONSOLE}
var
s : string;
c : Char;
begin
s := 'Example';
for c in s do
WriteLn(c);
end.
산출:
이자형
엑스
에이
엠
피
엘
이자형
루프 반대 방향
for
루프는 시작 값에서 종료 값까지를 "카운트 다운"예제로 반복합니다.
program CountDown;
{$APPTYPE CONSOLE}
var
i : Integer;
begin
for i := 10 downto 0 do
WriteLn(i);
end.
산출:
10
9
8
7
6
5
4
삼
2
1
0
열거 형을 사용하는 루프의 경우
for
루프는 열거 형의 항목을 반복합니다.
program EnumLoop;
uses
TypInfo;
type
TWeekdays = (Sunday, Monday, Tuesday, Wednesday, Thursday, Friday, Saturday);
var
wd : TWeekdays;
begin
for wd in TWeekdays do
WriteLn(GetEnumName(TypeInfo(TWeekdays), Ord(wd)));
end.
산출:
일요일
월요일
화요일
수요일
목요일
금요일
토요일
배열의 경우
for
루프는 배열의 항목을 반복합니다.
program ArrayLoop;
{$APPTYPE CONSOLE}
const a : array[1..3] of real = ( 1.1, 2.2, 3.3 );
var f : real;
begin
for f in a do
WriteLn( f );
end.
산출:
1,1
2,2
3,3
Modified text is an extract of the original Stack Overflow Documentation
아래 라이선스 CC BY-SA 3.0
와 제휴하지 않음 Stack Overflow