Vyriešte úlohy

Pozrite si pomôcky základných grafických príkazov
 Napíšte program, ktorý na stlačenie niektorého tlačidla vytvorí vo formulári nasledujúce efekty:
 
  1. vypíše čísla 1..20 na uhlopriečku zadefinovanej grafickej plochy:
  1. vypíše čísla 1..100 do riadkov a stĺpcov týmito dvoma spôsobmi:

  1. na každé stlačenie tlačidla napíše na náhodnej pozícii modré slovo Pascal a červené Delphi. Náhodné číslo získate pomocou funkcie random(HornáHranica) -- jeho použitie si pozrite v Helpe. Na začiatku programu, napr. pri vytváraní formulára, použite procedúru randomize, lebo inak sa program správa stále rovnako, t.j. slová sa vždy po spustení programu vypisujú na rovnakých pozíciách.
  1. vypíše modré slová 'I love Delphi' so sivým tieňom. Vytvorte konštantu const veta = 'I love Delphi'; nezabudnite urobiť priesvitné pozadie písmen.

    2.  
  1. vytvorí štvorcovú sieť NxN štvorčekov s veľkosťou štvorčeka a. Obe tieto číslo vytvorte ako konštanty. Obrázok vznikol pre deklaráciu

    2. const a = 20; N = 5;
    Obrázok vytvorte najprv pomocou príkazov MoveTo a LineTo, potom dvorma príkazmi Rectangle v cykle a nakoniec jedným príkazom 
    v dvoch v sebe vnorených cykloch. Pri poslednom spôsobe môžeme zároveň nastaviť farbu všetkých štvorčekov.
    a) Upravte predchádzajúci príklad tak, že na sieti vytvoríte šachovnicový efekt.

  1. nakreslí z trojuholníkov nasledujúcu pyramídu. Pyramída vznikla pre konštanty const a = 20; N = 4;
  1. Pozrime sa na nový príkaz Polygon

    2. Polygon([Point(x,y),Point(x,y),Point(x,y),...]);
    slovo Point si nemusíme veľmi všímať, stačí vedieť, že zo zadaných súradníc vytvorí bod, ktorý chápu Delphi. Príkaz Polygon potom pospája body a vyplní útvar zadanou farbou. Všimnime si ešte, že vytvorené body musíme dať do hranatých zátvoriek.

    Napr.
    begin
      g.Brush.Color := clRed;
      g.Polygon([Point(50,50),Point(150,50),Point(100,150),Point(250,150)]);
    end;
     
  1. Nakreslite trojuholník a potom farebnú pyramídu z malých trojuholníkov. Počet trojuholníkov v dolnom rade a veľkosť strany malého trojuholníka zvoľte opäť ako konštanty: const a = 20; N = 5;
  1. Po stlačení tlačidla na náhodných pozíciách, ale v štvorcovej sieti určenej veľkosťou konštanty a – strany štvorca, trojuholníka a polomeru kružnice, vykresľujte červený štvorec, žltý trojuholník a modrú kružnicu.
  1. Nakreslite sústredné kružnice. Uvedomte si, čo znamená, že kružnice sú vyplnené. Vymyslite taký spôsob kreslenia, aby to nevadilo a nakreslite ich tak, aby bola každá z nich rôznej farby. Zopakujte si pritom príkaz downto.
  1. Nakresliete priebeh funkcie sin(x).

    2. a) Nakreslite sin(x) aj pomocou modrých čiar k y-ovej súradnici: 
  1. pomocou funkcií sin(x) a cos(x) nakreslite kružnicu.

    2. a) Využitím tých istých funkcií nakreslite nasledujúce obrázky:
  1. Pomocou príkazu Polygon nakreslite obrázok: 
  1. ktorý vykreslí na obrazovku 100 kruhov náhodnej farby – obvod aj výplň majú rovnaké, ale náhodne vybrané farby, kruhy majú veľkosti 1 až 100:
  1. ktorý nakreslí na náhodnom mieste plochy špirálu z 10 čiar:
 

Monika Tomcsányiová