[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