LINUXSOFT.cz Přeskoč levou lištu
Uživatel: Heslo:  
   CZUKPL

> Lazarus-Míny(2)

Zdravím čitateľov takže dnes dokončíme Míny ktoré sme začali v minulom dieli kto je mimo obraz môže si článok pozrieť tu Míny(1). Doplníme zdrojové kódy upravíme jemne vzhľad programu a môžeme hrať.

29.4.2010 00:00 | Sebastián Kunec | Články autora | přečteno 4551×

Na konci článku si môžete nájsť link s celým projektom míny.
V predošlej časti sme skončili s projektom ktorý vyzeral pred a po spustení následovňe:

Úprava formulára

Aby sa náš program podobal programu míny musíme si ho najprv vzhľadovo upraviť. Možte to urobiť aj podľa seba poprehadzujte objekty vo formulári alebo použite nižšie uvedený návod.
V inšpektorovy objektov kliknite na form1 a vykonajte nasledujúce úpravy.
  • width=188
  • height=256
  • BorderStyle=bsSingle

  • V inšpektorovy objektov kliknite na image1 a vykonajte nasledujúce úpravy.
  • width=180
  • height=180
  • left=0
  • top=72

  • V inšpektorovy objektov kliknite na image2 a vykonajte nasledujúce úpravy.
  • width=57
  • height=33
  • left=112
  • top=8

  • V inšpektorovy objektov kliknite na image3 a vykonajte nasledujúce úpravy.
  • width=41
  • height=33
  • left=0
  • top=8

  • V inšpektorovy objektov kliknite na label a vykonajte nasledujúce úpravy.
  • font->size=14
  • caption='s'
  • left=176
  • top=8

  • V inšpektorovy objektov kliknite na bitbtn a vykonajte nasledujúce úpravy.
  • caption=''
  • width=60
  • height=60
  • left=48
  • top=8

  • V inšpektorovy objektov kliknite na timer1 a vykonajte nasledujúce úpravy.
  • Enabled=false

  • Môžete vidieť že už to začína mať tie črty. Náš formulár pred a po spustení by mal vyzerať nejak takto:

    Události/Events

    Teraz musíme nastaviť aby v prípade kliknutia na image1 náš projekt zaregistroval že sa niečo deje a podľa toho aj konal. V inšpektorovy objektov kliknite na image1 a potom Events/Události.
    Nájdeme možnosti:
  • OnMouseDown
  • OnMouseUp
  • Na obidve dvakrát kliknemne čo spôsobí že sa v zdrojovom kóde vytvoria hlavičky týchto objektov.
    Do nich vložte nasledujúci kód malo by to vyzerať takto:



    To isté spravíme aj s tlačidlom BitBtn. Dvakrát klikneme vo formulári na toto tlačidlo vo formulári sa vytvorí hlavička a donej vložíme kód ako v predošlom príklade. V kóde sú odkomentované funkcie ktoré ešte nepoužívame v prípade že ich zadefinujeme môžte ich odkomentovať, prípadne vás na to prekladač upozorní.

    Final step

    Už sa blížime k záveru a teda vložíme drvivú vetšinu kódu ktorá je nezbytná k fungovaniu nášho projektu. V zdrojovom kóde nájdete aj jemné vysvetlenie fungovania kódu. Ako môžete vidieť hoci je to pomerne malý projekt vytvorenie nakódenie a ladenie trvá určite nezanedbateľnú časovú jednotku.
    Medzi Implementation a FormCreate vložíme nasledujúci kód:

    Záver

    Po spustení by hra mala vyzerať takto:

    Tak čo dodať dúfam že sa vám hra páči a že vás veľa nového naučila. Ak sa vám tam niečo nepozdáva len smelo do upravovania zlepšovania a rozvíjania mín. Tak ako v každom programe aj tu sa môže vyskytovať niekoľko chýb. A nakoniec sľubovaný link s funkčným projektom.Miny.tar.gz

    Verze pro tisk

    pridej.cz

     

    DISKUZE

    widle 29.4.2010 19:36 Radim Kolář
      L Re: widle 6.5.2010 02:14 Aleš Hakl




    Příspívat do diskuze mohou pouze registrovaní uživatelé.
    > Vyhledávání software
    > Vyhledávání článků

    1.12.2016 22:13 /František Kučera
    Máš rád svobodný software a hardware nebo se o nich chceš něco dozvědět? Přijď na sraz spolku OpenAlt, který se bude konat ve čtvrtek 8. prosince od 18:00 v Radegastovně Perón (Stroupežnického 20, Praha 5). Sraz bude tentokrát tématický. Bude retro! K vidění budou přístroje jako Psion 5mx nebo Palm Z22. Ze svobodného hardwaru pak Openmoko nebo čtečka WikiReader. Přijďte se i vy pochlubit svými legendami, nebo alespoň na pivo. Moderní hardware má vstup samozřejmě také povolen.
    Komentářů: 1

    4.9.2016 20:13 /Pavel `Goldenfish' Kysilka
    PR: Dne 22.9.2016 proběhne v Praze konference Cloud computing v praxi. Tématy bude např. nejnovější trendy v oblasti cloudu a cloudových řešení, provozování ERP v cloudu, o hostování různých typů softwaru, ale třeba i o zálohování dat nabízeném podnikům formou služby.
    Přidat komentář

    1.9.2016 11:27 /Honza Javorek
    Česká konference o Pythonu, PyCon CZ, stále hledá přednášející skrz dobrovolné přihlášky. Máte-li zajímavé téma, neváhejte a zkuste jej přihlásit, uzávěrka je již 12. září. Konference letos přijímá i přednášky v češtině a nabízí pomoc s přípravou začínajícím speakerům. Řečníci mají navíc vstup zadarmo! Více na webu.
    Přidat komentář

    27.8.2016 8:55 /Delujek
    Dnes po 4 letech komunitního vývoje vyšla diaspora 0.6.0.0
    diaspora* je open-source, distribuovaná sociální síť s důrazem na soukromý
    Více v oficiálním blog-postu
    Přidat komentář

    24.8.2016 6:44 /Ondřej Čečák
    Poslední týden CFP LinuxDays 2016; pokud byste rádi přednášeli na LinuxDays 2016 8. a 9. října v Praze, můžete svůj příspěvek přihlásit, následovat bude veřejné hlasování.
    Přidat komentář

    9.8.2016 22:56 /Petr Ježek
    Zařazení souborového systému reiser4 do jádra 4.7 znamená konečně konec patchování jádra jen kvůli možnosti použít reiser4.
    Přidat komentář

    12.7.2016 13:14 /František Kučera
    Spolek OpenAlt zve na 130. distribuovaný sraz příznivců svobodného softwaru a otevřených technologií (hardware, 3D tisk, SDR, DIY, makers…), který se bude konat ve čtvrtek 21. července od 18:00 v Radegastovně Perón (Stroupežnického 20, Praha 5).
    Přidat komentář

    11.7.2016 16:53 /Redakce Linuxsoft.cz
    Konference LinuxDays hledá přednášející. Přihlášky poběží do konce prázdnin, v září bude hlasování a program. Více na https://www.linuxdays.cz/2016/cfp/.
    Přidat komentář

       Více ...   Přidat zprávičku

    > Poslední diskuze

    4.12.2016 22:54 / František Kučera
    Dárek

    9.11.2016 7:42 / Mane
    hardwood floor waxing

    8.11.2016 13:38 / Mira
    Konfigurace maldet na Centos serveru

    2.11.2016 11:06 / Warlock
    Odkaz v PHP

    20.10.2016 0:13 / Jan Kuba
    Re: Basic

    Více ...

    ISSN 1801-3805 | Provozovatel: Pavel Kysilka, IČ: 72868490 (2003-2016) | mail at linuxsoft dot cz | Design: www.megadesign.cz | Textová verze