Fórum Nova Ajuda [ C A L C U L A D O R A ] #375855

10/10/2009

0

Minha calc cientifica está praticamente pronta!
Mas to querendo dar alguns ajustes!

É o seguinte:

Ao digitar o Valor1 (ex: 10) este fica armazenado no Visor (tudo bem)
[____10]

Depois aperto a operação (ex: +) - (Era pra continuar o Valor1 até que eu digite o Valor2)
[______]

Digito o Valor2 (ex: 20) (OK
[____20]

Aperto Igual e tudo certo.
[____30]


Eu queria que o Valor1 não desaparecesse, apenas saisse quando um novo valor fosse digitado. O meu Valor1 some quando digito a OPERAÇÃO.

   Valor1 := StrToFloat(Visor.Caption);
   Operacao := ´+´;
   Visor.Caption := ´´;


Eu atualizei o código, mas ai o Valor1 é jogado pro lado esquerdo.. Concatenando.

   Valor1 := StrToFloat(Visor.Caption);
   Operacao := ´+´;
   Visor.Caption := FloatToStr(Valor1);


Acontece assim:
Valor1 (10)
[____10]
SOMA
[____10]
Valor2 (20)
[__1020]
Igual
[__1030]

HELPPPP


Annubiss

Annubiss

Responder

Posts

11/10/2009

Annubiss

Será que ninguem pode ajudar!?




=(


Ja tentei de tudo, mas até agora nd!

Por favor..


Responder

Gostei + 0

11/10/2009

Adilsond

No evento OnKeyPress

     if Key in [´+´,´-´,´/´,´*´,´=´] then
        begin
          Operador := Key;
          Key := 0;
        end



Responder

Gostei + 0

12/10/2009

Annubiss

Fiz isso, mas não mudou nd!


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar