Ir para conteúdo
Fórum Script Brasil

Matheus Henrique

Membros
  • Total de itens

    3
  • Registro em

  • Última visita

Sobre Matheus Henrique

Matheus Henrique's Achievements

0

Reputação

  1. Olá pessoal, beleza? sou novo aqui, esse é o meu primeiro tópico. Minha dúvida é a seguinte: criei um layout no photoshop e tem a pagina de login..só que os campos do usuario e senha eu fiz com um quadrado branco no photoshop.. como que eu transformo isso em um campo que a pessoa pode digita algo no dreamweaver? e quando ela clica no botao enviar, fazer o redirecionamento pra outra pagina? Obrigado se puderem me ajudar..
  2. Ola pessoal, queria fazer o seguinte.. o usuario poe cada nota do aluno em cada edit, queria que ao clicar no botão "calcular media" no edit 6 aparecesse a media dele, ex: 7,5 e no edit7 mostrasse se com essa nota ele estaria aprovado, retido ou de exame..pra aparecer a media no edit6 eu já fiz.. o código está abaixo, agora queria que ao mesmo tempo que eu clicasse no botao "calcular media" o edit6 aparecesse a media e no edit7 a situação dele, ou seja, se ele esta aprovado, retido ou de exame.. como faz isso? valeu galera, espero que tenham entendido o meu problema.. aqui está o código já feito: procedure TForm1.botaomediaClick(Sender: TObject); var nota1, nota2,nota3,nota4,media:real; begin nota1 :=strtofloat(Edit2.Text); nota2 :=strtofloat(Edit3.Text); nota3 :=strtofloat(Edit4.Text); nota4 :=strtofloat(Edit5.Text); media :=(nota1+nota2+nota3+nota4)/4; Edit6.Text := floattostr(media); end;
  3. bom pessoal, ai segue o trecho do botão que eu to fazendo, mas quando eu compilo aparece o erro: is not a valid floating point value. quero que quando eu clicar no botao da media, o edit6 receba a media feita das somas dos outros edits, mas da esse erro. alguém pode me ajuda? procedure TForm1.botaomediaClick(Sender: TObject); var nota1, nota2,nota3,nota4,media:real; begin nota1 :=strtofloat(Edit2.Text); nota2 :=strtofloat(Edit3.Text); nota3 :=strtofloat(Edit4.Text); nota4 :=strtofloat(Edit5.Text); media :=(nota1+nota2+nota3+nota4)/4; media :=strtofloat(edit6.Text); end;
×
×
  • Criar Novo...