Como faço?
Tenho um trecho do programa ke faz +- isso;
var
d:integer;
begin
{algumas comparacoes}(desejo voltar aqui)
if d>5 then
begin d=2;
{alguma coisa};
end
else...
{aqui esta a duvida,se d>5 faço uma coisa,se não for quero que vá para a linha inicial do begin,depois do else estou repetindo o codigo inicial}
Como faço para o programa saltar para o inicio do begin?
var
d:integer;
begin
{algumas comparacoes}(desejo voltar aqui)
if d>5 then
begin d=2;
{alguma coisa};
end
else...
{aqui esta a duvida,se d>5 faço uma coisa,se não for quero que vá para a linha inicial do begin,depois do else estou repetindo o codigo inicial}
Como faço para o programa saltar para o inicio do begin?
Kroki
Curtidas 0
Respostas
Obubiba
03/05/2003
while true do
begin
if d>5 then
begin d=2;
{alguma coisa};
end
else...
end;
No momento que quiser sair do While, dê o comando [b:49b13456f2]break;[/b:49b13456f2]
begin
if d>5 then
begin d=2;
{alguma coisa};
end
else...
end;
No momento que quiser sair do While, dê o comando [b:49b13456f2]break;[/b:49b13456f2]
GOSTEI 0