Odejmowanie w delphi przy jednym komponencie Edit

0

Cześć!

Mam pewien problem, otóż zacząłem tak dla rozrywki bawić się w delphi z jakimiś nie za bardzo wymagającymi programami, ale trafiłem na problem, nad którym główkuję od godziny ale zero rezultatów. Otóż przy jednym komponencie Edit chciałbym, by liczby były od siebie odejmowane, niestety tak się nie dzieje ( funkcje odejmowanie wywołuję tuż po wciśnięciu guzika, przez co mam taki efekt:

// Początek programu
Wynik := 0;
// ....
// Procedura odejmowanieClick
tmp := StrToFloat(Edit1.Text); 
Wynik := Wynik - tmp;

I wynik zawsze jest podawany przez to błędnie, bo przy pierwszym wprowadzeniu liczby zostanie już ona automatycznie odjęta od mojego aktualnego wyniku.

Czy mogę prosić o jakąś radę, jak sobie z tym dać radę? :P Myślałem coś z Booleanem, ale niestety próbowałem na kilka sposobów - zerowe efekty.
Dzięki serdecznie i pozdrawiam!

@Edit, w załączniku podaję, wygląd mojego "kalkulatorka"

domknięcie znacznika <code class="delphi"> - @furious programming

0

Dodaj sobie do klasy składową znak operacji, domyślnie niech będzie spacja (czyli brak)
Po naciśnięciu odejmowania:

  1. sprawdzasz jaki jest znak operacji jeżeli nie spacja to wykonujesz tą zapamiętaną operacje
  2. wyświetlasz wynik
  3. zmieniasz tą zapamiętaną na znak '-'

1 użytkowników online, w tym zalogowanych: 0, gości: 1