PR� BLACK
APROVEITAR OFERTA

F髍um Muito Simples (EXIT) #192986

05/11/2003

0

procedure ChamaCadImpPPP;
begin

while DBLookupComboBox2.Text = 创 do begin
tbResponsavel2.Next;
if tbResponsavel2.Eof then
exit;
end;
while DBLookupComboBox1.Text = 创 do begin
tbResponsavel.Next;
if tbResponsavel.Eof then
exit;
end;


end;

No primeiro WHILE, quando ele entra no EXIT, ele sa� de toda a fun玢o, mas eu quero q ele saia apenas do primeiro WHILE e entre no segundo WHILE


Thoor Cobain

Thoor Cobain

Responder

Posts

05/11/2003

Leanribas

neste caso vc pode fazer assim:


procedure ChamaCadImpPPP;
begin

while DBLookupComboBox2.Text = 创 do
begin
tbResponsavel2.Next;
if tbResponsavel2.Eof then
break;
end;

while DBLookupComboBox1.Text = 创 do
begin
tbResponsavel.Next;
if tbResponsavel.Eof then
break;
end;


end;

o exit � usado para vc sair da fun玢o, o break e usado para vc sair de um laco for, ou While

Falou
Leandro


Responder

Gostei + 0

05/11/2003

Thoor Cobain

Deu certo, eu n鉶 conhecia o Break... Muito Obrigado...


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experi阯cia para nossos usu醨ios, consulte nossa pol韙ica de privacidade.

Aceitar