fechar uma procedure dentro de outra?confira porfavor.

22/05/2003

2

olá amigos o problema é o seguinte:

Dentro de um procedure eu estou chamando outra procedure que eu criei
só que eu quero o seguinte que dentro dessa procedure que eu criei ela feche a outra procedure.
ou seja eu quero dentro de uma procedure fechar outra procedure?
isso é possivel?

eu sei que o comando Exit sai da procedure correto?

porfavor amigos me dem uma luz , valeu amigos


Responder

Posts

22/05/2003

Juan Basso

Use uma funcao na chamada, ou seja, dentro da sua procedure chame uma funcao que retorne valores conhecidos e coloque isto dentro do if, exemplo:

function OI (Texto: String): Integer;
begin
if Length(Texto) > 0 then
Result := 1
else
Result := 0;
end;

procedure Blah;
begin
if (OI(´Alow´)) then
// Continuar funcao
end;


Isto eh uma saida.

PS: Desculpe a falta de acentos e do eh. Ete computador onde estou apresenta falhas no teclado.


Responder

22/05/2003

Rafael Heise

Bom.. existem duas maneiras de fazer isso .. a primeira, já foi citada...
ao invés de você chamar uma procedure, chame uma função, e dependendo do resultado da função, você continua ou não
procedure
begin
...
if not funcao then
exit;
...
end;

ou você pode usar ´abort;´, é uma função do delphi, que cancela TODO o processo em questão, ou seja, se você estiver no 1º, no 2º ou no 5º nível de procedures adentro, voce saira de TUDO ao chamar abort;. Isso é perigoso pois faz com que pare todo o processo em questão e espere uma nova ação do usuário.
é isso ae... mas se você estiver certo do que está fazendo, abort é uma outra saida.... mas eu usuaria a função ;-)
abraços....


Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira