ACBrCalculadora - Sugestão

[Bruno Cezar Arcanjo Braga]

Gostaria de sugerir que o display e a memória da calculadora fossem zerados caso o usuário pressione ESC e SairComEsc seja false.

Obrigado.

[Daniel Simoes]

Conseguiria implementar e enviar a Unit modificada ?

[Bruno Cezar Arcanjo Braga]

Boa tarde Daniel.

Segue anexo componente alterado.

Obrigado.

Calculadora.dfm

Calculadora.pas

incCalculadora.pas

[Daniel Simoes]

https://sourceforge.net/p/acbr/code/12474/

Obrigado pela implementação... Adaptei a mesma para Lazarus e CLX.. já no SVN...

 

 

 

[plenustech]

Boa tarde 

Baixei o ACBr dia 10-05-2019 e a Unit ACBrCalculadora.pas

e ao dar um ESC e reabrir a Calculadora o Valor do display permanece.

Gostaria de sugerir que o display e a memória da calculadora fossem zerados

Correção:  

function TACBrCalculadora.Execute: Boolean;
Substituir Linha

FrCalculadora.ValorDisplay := '0'{FloatToStr( FValor ) };

[Juliana Tamizou]

Boa tarde.

Obrigada, alteração adicionada para validação.

Att.

[Daniel Simoes]

Apliquei modificações que devem atender a sugestão...

Mas preservei uma funcionalidade, que acho importante... O programador, poder introduzir um valor na calculadora, antes de Chamar o Execute... Exemplo:

procedure TfrExtenso.Button1Click(Sender: TObject);
begin
  ACBrCalculadora1.Valor := 123;
  ACBrCalculadora1.Execute;
end;   

 

commit: 17052