[Delphi] Tabuada

[Owner 7]

Olá galera,

Eu tava olhando minha apostila de Delphi, e vi uma coisa muito interrasante, que é uma tabuada por looping While.

Porisso resolvi postar !

O lógica é simples:

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

• Entre
• ou
• Cadastre-se

• X - Variavel integer
  
• Y - Até o numero da tabuada que quiser, exemplo: 100. A tabuada vai até 100.

Então vamos a obra ...

Adicione os componentes:

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

• Entre
• ou
• Cadastre-se

Coloque no button:

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

• Entre
• ou
• Cadastre-se

Só isto, o número que esta no edit1, multiplica ate o Y ( no caso 10 ).

Qualquer coisa só avisar !

[owner. 0]

Eu não consegui fazer, este código ai é para adicionar entre ( begin e end; ) ou entre ( var e end; ) ??

[Owner 7]

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

• Entre
• ou
• Cadastre-se

Se tem var ( variavel ) você tem que apagar o begin e colar este codigo, ou digitar !

Vou explicar o que o codigo faz:

Se no edit1 tiver um número inteiro, e quando apertado no botão, ele pega a váriavel mult faz multiplicação do edit1 com a váriavel i, que no final do looping, é somado mais um, assim fazendo a tabuada, até o 10 (No meu Caso).

[DragonBoss 8]

tem um tuto meu que ensina a fazer um eskema parecido, porém em C# e console =X

enfim, dica legal owner'... mas, acho que concatenando a linha fica mais legalzin >..<

 

algo assim:

 

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

• Entre
• ou
• Cadastre-se

 

ae a linha aparece assim no listbox (exemplo): 5 x 4 = 20

 

flw, abraços

[Owner 7]

DragonBoss

Legal também sua ideia, talvez alguem tenha preguiça de contar se o 9º é o 9. Que tosco -q

E esqueci de colocar a linha de código de limpar o listbox. basta adicionar em baixo do begin:

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

• Entre
• ou
• Cadastre-se

[Hero 7]

SE o Edit estiver vazio ele dá um erro.

 

Então adaptei aqui:

 

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

• Entre
• ou
• Cadastre-se