Nyomógombos számológép pascalabc
Ebben a leckében fogjuk használni a tudás OOP technológia (objektum-orientált programozás

Megtekinthető a számológép fog kinézni:
Így kezdődik
Amint azt a bevezetőben említett, szükségünk van a PFSZ - olyan megközelítés, ami azt jelenti, hogy fogja használni az osztályok és azok példányok.
Ebben az esetben mi fog kapcsolódni a VCL modult. amely felelős létre mindenféle formájú és elemek: gombok, szerkesztés mezők, kapcsolók, szöveges mezők.
Minden egyes ilyen elemek képez VCL egység osztályok már kész, így ellentétben a korábbi cikkben (az alapokat a OOP), van osztályok önmagukban nem teremtenek, és csak létre példányait osztályok.
A változó deklarációt, van, hogy felsorolni a nevét mindezek jövőbeli esetek:
Mi van itt: MainForm - egy példánya a forma, vagyis formájában is - maga a „doboz” alakja a jövőben,
Bsum - egy példányt a gomb osztályban. azaz gombot. Ez az összegzése a gomb,
Braz - másolat különbség gombok
BPR - példányban a munka gomb
Bdel - például Division gombok
Bres - egy példányt a Results gomb
Bclean - Törlés gomb fokon
T1 - másolat adatbeviteli mezők
Is, mi kell egy változót „művelet” - ez tartalmazza a tranzakció számot (ez később nyilvánvalóvá fog válni), változó rint - tárolja értéke következtében változó rr - fogja a valódi működésének eredményeként, x1, x2 - ez operandusok amelyen lesznek számtani.
És most a test maga a program:
Először hozzon létre egy sorozata esetek eredetileg csak azt kell tárgyat a kívánt tulajdonságokkal:

A zárójelben a mintában formákban ukazyny 4 számjegy (x behúzás, a behúzás y, szélesség, magasság), ahol x és y behúzás behúzással - tagolt bal felső sarkában a formában a bal felső sarokban.
Ahhoz, hogy írja be a mezőbe, és másolatait a kulcsokat és padding x francia - ez el van tolva a bal felső sarokban a forma is.
Szóróanyagokat rögtön a kulcsokat a tulajdonságokat „Caption” - főcím, kérdezze meg címkét minden gombot.
Feldolgozás például módszerek
Ebben a programban, akkor használja a módszereket példányainak gomb kattintással - „onClick” - szó szerint fordítva, ha rákattint.
Ha egy esemény „Click” minden esetben felhívjuk eljárás:

Most már csak leírni a 6 leírásában szerepel gyógykezelések:
Kezelhető kattintások Bsum gomb (összegzés)
Ebben az eljárásban azt számoljuk tartalom x1 változó beviteli mezők (egyidejű újradefiniálása string típusú integer), és azonnal törölje a területen. Szintén rendelni egy változó működését összegzése a műveleti kód (ebben az esetben 1).
Kezelhető Braz gombra kattintva (a különbség):
Hasonlóképpen csúszás értéke beviteli mező változó x1, törölje a területen, és így kapjuk a műveleti kódot: 2.
Kezelhető BPR gombra kattintva (a termék):
Hasonlóképpen csúszás értéke beviteli mező változó x1, törölje a területen, és így kapjuk a műveleti kódot: 3.
Kezelhető kattintások Bdel gomb (osztás):
Hasonlóképpen csúszás értéke beviteli mező változó x1, törölje a területen, és így kapjuk a műveleti kódot: 4.
Kezelhető Bres kattintás a gombra (a számítás eredménye):

Ha rákattint a gombra, az „=” változó x2 tolja tartalmát a beviteli mezőbe. Ekkorra a változó x1 előzőleg beírt szám van tárolva, így a további kiszámítja a megadott műveletet. Ha a művelet kód értéke 1, akkor ezzel az összegzés, ha 2, a kivonás, ha 3, szorzás, ha 4, a szétválás. Így az eredmény nem kerül művelet valós változó rr.
De van egy probléma: a szövegmezőbe csak egy string változó. Hogyan lehet átalakítani a számot egy string. Van egy funkció pascal: inttostr (x) - megfordul a egész típusú, hogy egy string. De van valódi eredményeket (mivel a műtét után az eredmény az osztás mindig csak valós). Ezért van, hogy egy ideiglenes fordítást egy valós változó az egész:
rint: = round (rr); - ebben az esetben vették igénybe ezt a szolgáltatást, hogy a kerekítés. Persze ha azt áldozzuk az osztás eredményével, vágás a törtrész. Ez az őszinte hátránya, ez a program, amit megszünteti a következő leckét.
Volt utolsó eljárás - tisztító eljárása a szövegmezőbe.
A feldolgozás Bclean gombra kattintva (tiszta):
A program most már teljes.
Itt van a teljes kód a program:
