004 8

private

{ Private declarations } public

{ Public declarations } end;

var

Forml: TForml; liczbaidoubie;

Wprowadzacie Siczb

1. Klikamy dwukrotnie na przycisk z jedynką. W oknie kodu wpisujemy procedurę TForml .bCyfralClick(Sender: TObject);

2. To samo dla 2,3,4,5,6,7,8,9,0, tyle że zmieniamy liczbę w apostrofach. To samo dla przecinka zmieniając liczbę w apostrofach na przecinek. Dzięki przecinkowi możemy wprowadzać liczby z częścią dziesiętną.

procedurę TForml .bPrzecinekClick(Sender: TObject);

3. Kompilujemy i uruchamiamy program, sprawdzamy czy wszystko działa poprawnie. Wykonywanie działań

Zastanówmy się, co powinno się dziać po naciśnięciu jednego z przycisków działań? Niewątpliwie musimy wykonać wówczas kilka czynności.

Dokonać konwwersji liczby na wyświetlaczu z postaci tekstowej na postać liczbową Jeżeli jest to nowe działanie, przypisać wynik konwersji do zmiennej liczba Jeżeli jest to kontynuuacja działania, wykonać poprzednie działanie (jego rodzaj jest zapisany w zmiennej działanie)

Wyzerować wyświetlacz

Zapamiętać, który przycisk został wciśnięty.

Do zapamiętania który przycisk został wciśnięty wykorzystamy dodatkową zmienną

Będzie ona zawierała ciąg znaków opisując . Niezbędna foedzie również

rozpoczęliśmy nowe działanie i bedzie zawierać dag znaków

1. deklarujemy zmienną działanie oraz NoweBzialanie typu string

private

{ Private declarations } public

{ Public declarations }

Wyszukiwarka

Podobne podstrony:
5 UN DEBAT : LES mentalitEs collectwes 561 Tower in Bucharest to crush. Few private or public b
class Punkt{ private int x, y; public void Przesuń(int dx, int dy){ x += dx; y += dy;} public Punkt(
Rodzaje dóbr • Dobra prywatne (privategoods) • Dobra publiczne
public class ShopBrowser { private static Document
19 p07 #include <stdio.h> class próba{ private: int *pi_Dane; public: próba(); -próba()
19 p08 #include <stdio.h> class próba { private: int *pi_Dane; public: próba(); -próba()
skanuj0012 Romanae spectat, privatum quod ad singulorum utilitatem") rozróżnienie prawa publicz
w1rys2 public class Person { private Strine name: VVVVVVVVVW WWWWA pńvate Strinę
KlasyPo class Napis { private: const int m_cchTest; public: Napis(void) : m_cchTest(10){}}; Zgodnie
Po class Uwaga { private: int m_nLicznik; public: Uwaga(void) : m_nLicznik(1){} void UstawLicznik(in
class Okręg : public Figura{ private: void Rysuj(int x1, int y1, int x2, int y2){ cout «
}}; class NiePochodna{ private: int m_i; float m_f1; float m_f2; public: NiePochodnaO :
145 TIF private: BYTE* m_pbMtabl; public: void * PvDołącz(void * pv, long lcElem=1); void * PvPrzy(l

więcej podobnych podstron