[firebase-br] RES: RES: usando a condição if ou else no Delphi

José Otávio Lussari tavinhol em gmail.com
Qui Mar 24 10:59:40 -03 2011


exato...
 
atenciosamente,

[ ]’s
José Otávio Lussari
Analista de Sistemas
Bel. em Sistemas de Informação

> -----Mensagem original-----
> De: lista-bounces em firebase.com.br [mailto:lista-bounces em firebase.com.br]
Em
> nome de Tecnobyte Informática
> Enviada em: quinta-feira, 24 de março de 2011 10:40
> Para: FireBase
> Assunto: Re: [firebase-br] RES: usando a condição if ou else no Delphi
> 
> Bom dia
> 
> BEGIN..END deve ser usado sempre que houver duas ou mais instruções (e não
> linhas) dependentes do comando IF em questão.
> 
> Neste caso abaixo, por exemplo, temos 3 linhas dentro do contexto do IF,
mas
> trata-se de apenas uma instrução. Portanto neste caso NÃO é obrigatório o
> uso de BEGIN..END, embora seja permitido.
> 
> if Condicao then
>   ChamadaDeFuncao(
>      Parametro1,
>      Parametro2);
> 
> Já no exemplo abaixo, temos uma única linha, mas são duas instruções.
> Portanto o uso de BEGIN..END é obrigatório para que as duas instruções
> fiquem dependentes do comando IF em questão.
> 
> if Condicao then
> begin
>   X := 2; Y := 3;  { Temos duas instruções em uma única linha! }
> end;
> 
> Conclusão
> 
> Usa-se BEGIN..END quando desejar agrupar duas ou mais instruções de modo
> que
> todas fiquem dentro do mesmo escopo/contexto no fluxo de execução do
> programa.
> 
> 
> Daniel P. Guimarães
> Tecnobyte Informática
> www.tecnobyte.com.br
> 
> 
> ----- Original Message -----
> From: "José Otávio Lussari" <tavinhol em gmail.com>
> To: "'FireBase'" <lista em firebase.com.br>
> Sent: Thursday, March 24, 2011 8:33 AM
> Subject: [firebase-br] RES: usando a condição if ou else no Delphi
> 
> 
> completando o que o Ronaldo disse:
> 
> Toda vez que tiver mais do que uma linha dentro do if, vc tera que colocar
> entre o Begin ... end;
> 
> if  label1.Caption = '' then begin
>    LINHA1;
>    LINHA2;
>    ...
>    LINHA N;
> end
> Else Begin
>    LINHA1;
>    LINHA2;
>    ...
>    LINHA N;
> end
> 
> atenciosamente,
> 
> [ ]'s
> José Otávio Lussari
> Analista de Sistemas
> Bel. em Sistemas de Informação
> 
> > -----Mensagem original-----
> > De: lista-bounces em firebase.com.br [mailto:lista-bounces em firebase.com.br]
> Em
> > nome de Ronaldo Souza
> > Enviada em: quinta-feira, 24 de março de 2011 09:28
> > Para: FireBase
> > Assunto: Re: [firebase-br] usando a condição if ou else no Delphi
> >
> > O correto é:
> >
> > begin
> >  if  label1.Caption = '' then
> >  begin
> >     label1.Caption := 'meu sistema';
> >     label1.WordWrap := False;
> >  end Else
> >  begin
> >      label1.Caption := edit1.text;
> >      label.WordWrap := True;
> >  end;
> >
> > Sucesso
> > Ronaldo Alves de Souza
> > AtonWare Ltda
> >
> > Em 24 de março de 2011 09:24, Nilton Oliveira
> <nillgolv em bol.com.br>escreveu:
> >
> > > bom dia pessoal,,
> > >
> > > gostaria que me esclarecesse uma duvida, onde que está o erro, pois
não
> > > consigo compilar.
> > >
> > > se o label caption estiver vazio receba a frase "meu sistema", se não
> label
> > > caption receba do edit.text
> > >
> > > no evento onclic
> > >
> > > begin
> > >  if  label1.Caption = '' then
> > >     label1.Caption := 'meu sistema';
> > >     label1.WordWrap := False;
> > >
> > >  end Else
> > >
> > >  label1.Caption := edit1.text;
> > >  label.WordWrap := True;
> > > end;
> > >
> > > Grato
> > >
> > > Nilton Oliveira
> 
> 
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa





Mais detalhes sobre a lista de discussão lista