뭐 c는 어떤지 모르겠지만....이렇게 하심 됩니다.

홀수일때만 메세지를 보여줍니다.



procedure TForm1.Button1Click(Sender: TObject);

var

i : integer;

begin

for i:=1 to 10 do begin

button1.Caption := inttostr(i);

if (i mod 2) = 1 then

ShowMessage('홀수네요');

end;

end;





한근수 wrote:

> For i= 1 to 10 do

> begin

> .....

> end;

>

> 위와 같은 기본적인 for문은 i가 1에서 10이 될 때까지 총

> 10번을 반복합니다.

>

> 제가 알고 싶은 것은 i가 1,3,5,7,9와 같이 홀수이거나 짝수 혹은 일정한 조건이

> 만족할 때만 문장을 실행하게 하고 싶습니다.

> (C에서는 stepto(?)라는 것을 쓰면 되는 걸로 아는데, 델파이는 어떻게 해야

> 하나요?)

>

한근수 wrote:

> For i= 1 to 10 do

> begin

> .....

> end;

>

> 위와 같은 기본적인 for문은 i가 1에서 10이 될 때까지 총

> 10번을 반복합니다.

>

> 제가 알고 싶은 것은 i가 1,3,5,7,9와 같이 홀수이거나 짝수 혹은 일정한 조건이

> 만족할 때만 문장을 실행하게 하고 싶습니다.

> (C에서는 stepto(?)라는 것을 쓰면 되는 걸로 아는데, 델파이는 어떻게 해야

> 하나요?)

>

파스칼 에서는 근수님이 원하는 결과를 출력하고 싶으면 While문을

쓰셔야 합니다.

예)

i := 1; //초기값

while i < 10 do

begin

Memo1.Lines.Add(IntToStr(i));

i := i + 2; //또는 Inc(i,2);

end;

좋은 하루 되십시오.

for, while 등 loop수행도중 다시 loop의 처음으로 가고자 할때는 continue;

For i=1 to 10 do begin

if odd(i) then continue; # 홀수면 수행하지 않고 다음 loop 수행

if even(i) then continue; # 짝수면 수행하지 않고 다음 loop 수행

......

end;



for, while 등 loop를 빠져나올때는 break;

For i=1 to 10 do begin

if odd(i) then break; # 홀수면 수행하지 않고 loop 빠져나감

if even(i) then break; # 짝수면 수행하지 않고 loop 빠져나감

......

end;





한근수 wrote:

> For i= 1 to 10 do

> begin

> .....

> end;

>

> 위와 같은 기본적인 for문은 i가 1에서 10이 될 때까지 총

> 10번을 반복합니다.

>

> 제가 알고 싶은 것은 i가 1,3,5,7,9와 같이 홀수이거나 짝수 혹은 일정한 조건이

> 만족할 때만 문장을 실행하게 하고 싶습니다.

> (C에서는 stepto(?)라는 것을 쓰면 되는 걸로 아는데, 델파이는 어떻게 해야

> 하나요?)

>