Begin , end , if , then. (Iniciante delphi 7)

[Slash.- 1]

Todo programa vai ter o Begin e o End, o begin entra no começo do codigo.Assim:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

E como voces podem ver o end fica no final do codigo. Com piquenas exceçoes sempre ao final da linha de programaçao tem um ; que e um ponto e virgula.

 

Ja o if e o then e quando voce vai adicionar um comando com uma excesao

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

O codigo acima diz que quando o button1 for apertado o Capition do Edit1 vai mudar para Boa conseguii.

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Neste codigo diz que se o edit 1 estiver escrito 1 abrira uma mensage boa man e se nao estiver escrito isto abrira uma mensage escrito merda(nao veio nada a cabeça).

 

Note que Showmessage nao esta com ponto e virgulano final , tbm nao sei pq .

 

E so o que sei. Ja ja vou postar mas coisa para mais iniciantes que eu.

 

 

[DragonBoss 8]

Hum, a iniciativa foi boa, mas há pequenos equivocos ai... vou tentar explicar alguns:

 

Begin

if Button1.Enabled= true then

Edit1.Text:= 'boa conseguil';

End;

O codigo acima diz que quando o button1 for apertado o Capition do Edit1 vai mudar para Boa conseguii.

 

Não... Enabled é a propriedade que define se o objeto esta 'ativado', ou seja... no caso do botao, se ele pode ser clicado.

 

_____________________________

Begin

IF Edit1.Text= '1' then

Showmessage ('boa man')

Else

Showmessage ('merda')

end;

 

Nessa situação, não há a utilização de ponto e virgula, porque se houvesse a necessidade de multiplas linhas de codigo, colocariamos em blocos ( mais a frente do exemplo ), e quando nao colocamos, ele faz somente a primeira linha seguindo a condição, ou seja:

 

Begin

IF Edit1.Text= '1' then // se edit1.text for igual a '1' entao...

Showmessage ('boa man') // apenas mostre essa mensagem

Else // se não for....

Showmessage ('merda') // apenas mostre essa outra mensagem

end; // final do begin...

 

Utilizando bloco de codigo ( then begin /end /else begin) temos:

 

Begin

IF Edit1.Text= '1' then BEGIN

Showmessage ('umaa linha de codigooo');

Showmessage ('outraa linha de codigo =D');

end // sem o ponto e virgula, porque apos esse end tem um Else

Else BEGIN // se não... e vamos começar mais um bloco...

Showmessage ('umaa linha de codigooo');

Showmessage ('outraa linha de codigo =D');

Showmessage ('quantas linhas forem necessario x.x');

end; // finaliza o begin do else...

end ; // finaliza o primeiro begin ^^

 

 

 

Qualquer duvida, fala ae...

 

flw, abraços

[Slash.- 1]

Po mano errei feio tenho muitas duvidas,mas nao sei explicar dragon me adminro muito em voce e sempre quis ser voce um dia ne quem sabe.

 

E olha so se voce pudesse criar um topio esplicando as variaveis , matrix e outras paradas cria ai pf (coisas de iniciantes como eu).

[DragonBoss 8]

Comentarios assim que me dao animo pra ser geek.

Sério, é uma droga ver todo dia uns 3~5 tópicos de coisas sobre hacks de gc ( na maioria "duvidas" de pessoas que querem tudo pronto )....

 

Pode deixar, assim que eu tiver um tempo, vo criar um topico dando uma boa explicação sobre operadores de decisão e variaveis aqui.

 

Pois bem, espero que a minha explicação simples sobre bloco de comandos tenha lhe sido util...

 

flw, abraços...

 

Obs: Deixarei o tópico em aberto para se alguem quiser contribuir sobre o assunto ^^'

[Drakar~ 0]

Como o Dragon já disse, Boa Iniciativa. Parabéns.

[Zaphey 2]

Muito bom cara,

Sua inciativa foi perfeita!

Apenas teve os erros que o Dragon citou,

concordo com ele, todos estão cansados de pessoas que só querem programar hacks,

eles tem que aprender primeiro e você está 'colaborando' para isso!

 

Abraços!

 

OFF: Obrigado por me apoiar (L)

[..:Hankey:.. 0]

Erros São Comuns,Pois Sei Que é Bem Dificil.

Mais Vi Que Você é Iniciante,E Aprenderá Muito A Cadá Dia.

Bela Iniciativa.

Parabéns.

Never Say Never.

[Slash.- 1]

Obrigado hankey vou estudar muito para alcançar Greek

[Mestre_Vator 0]

vou estudar muito para alcançar Greek

 

Você quer viajar à Grécia?

Haha,meu sonho de criança era ir à Alemanha ;)

Quanto ao estudo,é sim realmente necessário estudar,e aprender o idioma.Eu iria por negócios,se fosse o caso.

Grego é muito difícil,na minha opinião.

 

, todos estão cansados de pessoas que só querem programar hacks,

eles tem que aprender primeiro e você está 'colaborando' para isso!

 

 

Não têm que aprender primeiro antes de criar essas merdas.

Não devem os criar.Se for pra colaborar à criação de hacks,nem precisa fazer tutoriais,é tempo jogado na porra do lixo.

 

@Tópico:

 

Muito bom,parabéns.Continue assim que você vai longe.

Não acabe com sua vida fazendo hacks idiotas,pelo amor que você tem à vida.

Ah,corrija os erros,pra não confundir mais alguém.