Fórum ..-- Interromper somente o Loop que estou --.. #195387
17/11/2003
0
Tem como eu [b:4d18ca70a2]Interromper somente o Loop que estou[/b:4d18ca70a2], porém [b:4d18ca70a2]sem [/b:4d18ca70a2]imterromper o Loop mais externo e também [b:4d18ca70a2]sem [/b:4d18ca70a2]interromper a procedure.
Grato,
Claudio. :D
Grato,
Claudio. :D
Claudio Sam
Curtir tópico
+ 0
Responder
Posts
17/11/2003
Yankleber
Olá,
Simplesmente insira um comando [b:bdc5e5bf3f]break[/b:bdc5e5bf3f] no ponto de interrupção desejado, assim:
Crie um form e insira um botão e um label no mesmo. No evento click do botão coloque uma chamada para a procedure acima: o loop será interrompido ao atingir o valor 5, e você verá a confirmação disso quando o valor de z for impresso no Label1.
Espero ter ajudado.
Simplesmente insira um comando [b:bdc5e5bf3f]break[/b:bdc5e5bf3f] no ponto de interrupção desejado, assim:
Procedure TForm1.teste; var z: integer; begin for z := 1 to 10 do if (z = 5) then break; Label1.caption := IntToStr(z); end;
Crie um form e insira um botão e um label no mesmo. No evento click do botão coloque uma chamada para a procedure acima: o loop será interrompido ao atingir o valor 5, e você verá a confirmação disso quando o valor de z for impresso no Label1.
Espero ter ajudado.
Responder
Gostei + 0
17/11/2003
Claudio Sam
Grato,
Claudio. :lol:
Claudio. :lol:
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)