PROBLEMA COM POWER BAR

RATOPD9 07/09/2009 12:53:54
#322202
Gente, fiz uma calculadora editada para um jogo aqui, no final do calculo ela da dois resultados de força e desvio.
No caso, o resultado da força seria entre 80% e 100%, até ai tudo bem... só que, depois que coloquei uma barra que simula a propria barra de força do jogo, esta dando um erro quando o resultado da força da menos que 80%.



na imagem onde esta 84,01 seria a força em % para altura negativa + barra abaixo
onde esta 96,91 seria a força em % para altura positiva + a barra acima.

problema é que quando vou usar a força para altura positiva e o resultado da força para altura negativa da menos que 80%, ela da um erro...



aqui nesse 2° exemplo, usei uma altura maior e deu erro por causa do resultado da força para altura negativa = 78,62%

ja quando da mais que 100%, não da erro nenhum.

=======================
mais uma duvida.
usei esse comando para salvar os valores que altero na calculadora..

Private Sub Form_Load()
mx1.Text = GetSetting([Ô]Conf[Ô], [Ô]Conf1[Ô], [Ô]txt[Ô]).

Private Sub Form_Unload(Cancel As Integer)
SaveSetting [Ô]Conf[Ô], [Ô]Conf1[Ô], [Ô]txt[Ô], mx1.Text

no caso seria para o botão mx1.Text (tem mais uns 50 botões)
tah funcionando normal, mas e depois que eu formata meu pc por exemplo
os valores vão continuar salvos? ou em outro pc os valores tb continuarão salvos?

obrigado!
MARCELO.TREZE 07/09/2009 13:56:43
#322203
Resposta escolhida
o ideal seria vc postar o trecho do código que faz este calculo, somente com os dados acima não é possivel saber o que pode estar acontecendo.
TECLA 07/09/2009 15:36:03
#322206
Pergunta básica:
[txt-size=2]Onde está o código fonte?[/txt-size]
[S93]
RATOPD9 07/09/2009 17:48:53
#322219
desculpa gente.. o codigo que fiz é esse.. (obs: acho que tah meio confuso pq não sei mexer muito bem nesse programa)


ffap.Text = Format(rp2b.Text, [Ô]0.##[Ô])
ffan.Text = Format(rn2b.Text, [Ô]0.##[Ô])


Image5.Width = ((((ffap.Text) - 80) * 2250) / 20) * 1.01
Image2.Width = ((((ffan.Text) - 80) * 2250) / 20) * 1.01

[ô]Timer1.Enabled = True[ô]
End Sub [/c]

esse código ai é oq esta no botão calcular
TECLA 07/09/2009 18:48:27
#322222
Você está usando um PROGRESS BAR?

Se sim, este erro ocorre com este controle quando você tentar passar um valor DECIMAL para a propriedade VALUE.
é só pegar a parte inteira com Int(Valor) e passar para a propriedade.
RATOPD9 07/09/2009 19:57:15
#322225
Citação:

TECLA escreveu:
Você está usando um PROGRESS BAR?

Se sim, este erro ocorre com este controle quando você tentar passar um valor DECIMAL para a propriedade VALUE.
é só pegar a parte inteira com Int(Valor) e passar para a propriedade.



não entendi tecla
não estou usando um progress bar
TECLA 07/09/2009 20:22:23
#322228
Qual é o controle que faz o papel de PROGRESS BAR?
Poste o mesmo aqui.
RATOPD9 07/09/2009 22:20:04
#322239
Citação:

TECLA escreveu:
Qual é o controle que faz o papel de PROGRESS BAR?
Poste o mesmo aqui.



dfap.Text = Format(10 * (0.61 * CDbl(rp8.Text)), [Ô]0.##[Ô])
dfan.Text = Format(10 * (0.61 * CDbl(rn8.Text)), [Ô]0.##[Ô])
ffap.Text = Format(rp2b.Text, [Ô]0.##[Ô])
ffan.Text = Format(rn2b.Text, [Ô]0.##[Ô])


Image5.Width = ((((ffap.Text) - 80) * 2250) / 20) * 1.01
Image2.Width = ((((ffan.Text) - 80) * 2250) / 20) * 1.01


nao seria isso?
image5 é a barra de cima (pega o valor de ffap.text [força final altura positiva]resultado em vberde na calculadora)
image2 é a barro de baixo (pega o valor de ffan.text [força final altura negativa] resultado em vermelho na calculadora)

RATOPD9 08/09/2009 09:57:52
#322257
Citação:

RCMRO valores negativos passem a ser convertidos em ZERO



era isso mesmo que eu queria ^^
mas como posso fazer isso?
Tópico encerrado , respostas não são mais permitidas