Ajuda com porcentagem

Delphi

25/07/2006

Galera,

Estou precisando de ajuda urgente ...

Estou desenvolvendo um projeto tpo Show do Milhão de Perguntas e Respostas.. são 100 perguntas.

Como posso fazer pra ele mostrar a porcentagem tipo ´60 ¬´ em um Edit depois de responder todas as pergunta?

Informações:

no projeto temos as variaveis:

Correto : integer; //recebe o numero de resposta corretas
Incorreto : integer; //recebe o numero de respostas incorretas

São 100 Perguntas.

Se alguem puder ajudar...


Delphitotal

Delphitotal

Curtidas 0

Respostas

Rjun

Rjun

25/07/2006

Não sei se é bem isso que você quer. Tá parecendo pegadinha...

var
  Certo, Total: integer;
begin
  Certo := 60;
  Total := 100;

  Edit1.Text := FloatToStr(Certo/Total * 100) + ´¬´ ;
end;



GOSTEI 0
Delphitotal

Delphitotal

25/07/2006

kkkk cara não entendi nada... não é isso que eu quero.

No Projeto temos as variaveis

Correto : integer; //Quantidade de respostas corretas
Incorreto : integer; //Quantidade respostas incorretas

São 100 Perguntas .. vamos supor que a variavel Correto recebeu o valor 50 de respostas corretas e incorreto recebeu 50.

Correto := 50;

e

Incorreto := 50;

Dai fazer a porcentagem de 100 Perguntas daria:

Edit1.Text := ´50 ¬´;

to querendo isso mais não sei fazer..


GOSTEI 0
Rjun

Rjun

25/07/2006

Você não esta sabendo calcular a porcentagem? É isso?

Se for, você deve pegar o número de acertos ou erros, dividir pelo total de perguntas e multiplicar por 100. O código que te passei faz isso.


GOSTEI 0
Delphitotal

Delphitotal

25/07/2006

Vlw!!! Rjun ..

Consegui.


GOSTEI 0
POSTAR