Referatai

Turbo Paskalio grafika

10   (1 atsiliepimai)
Turbo Paskalio grafika 1 puslapis
Turbo Paskalio grafika 2 puslapis
Turbo Paskalio grafika 3 puslapis
Turbo Paskalio grafika 4 puslapis
Turbo Paskalio grafika 5 puslapis
Turbo Paskalio grafika 6 puslapis
Turbo Paskalio grafika 7 puslapis
Turbo Paskalio grafika 8 puslapis
Turbo Paskalio grafika 9 puslapis
Turbo Paskalio grafika 10 puslapis
www.nemoku.lt
www.nemoku.lt
Aukščiau pateiktos peržiūros nuotraukos yra sumažintos kokybės. Norėdami matyti visą darbą, spustelkite peržiūrėti darbą.
Ištrauka

7. Fragmentai......................................................................................................................6
8. Langai.............................................................................................................................7
Literatūra........................................................................................................................8
1
1. Taškai. Grafinio ekrano paruošimas darbui
Turbo Paskalio kalbos struktūros, skirtos grafiniam ekrano režimui valdyti ir duomenims i ekrane esančią atmintį persiųsti, yra sukauptos pagalbinėje bibliotekoje (Unit) Graph. Jomis vartotojas gali keisti ekrano darbo režimą ir projektuoti grafinius vaizdus paprastomis komandomis, kurių argumentai yra grafinių vaizdų parametrai ir koordinatės ekrane.
Prieš naudojant grafinės bibliotekos priemones, reikia inicializuoti grafinio ekrano tvarkykle. Paruošimo veiksmus patogu apiforminti atskira procedura, kurią galima naudoti visose programose. Čia siūloma tokia procedūra Ekranas. Proceduroje InitGraph turi būti nurodytas kelias iki katalogo, kur saugomi ekrano tvarkymo failai *.bgi, tai gali būti pvz.: C:\...\bgi.

Procedure Ekranas ( var dx, dy: integer);
var gd, gm: integer;
begin
gd := Detect;
InitGraph(gd, gm, ' ');
if GraphResult <> grOK then
begin
Writeln('Paleisti neimanoma!');
Halt(1);
end;
dx := GetMaxX;
dy := GetMaxY;
end;

Kai programoje grafinės priemonės nebevartojamos, grafinį režimą rekomenduojama išjungti parametrų neturinčia procedūra CloseGraph, kuri išlaisvina tvarkyklės užimtą atmintį.

Projektuojant grafinius vaizdus, ekranas yra laikomas dvimate koordinačių plokštuma, kurios pradžios taškas yra viršutiniame kairiajame kampe. Ekrane vaizduojamų taškų skaičius yra apibūdinamas dydžiu Xmax*Ymax, kuris priklauso nuo kompiuteryje vartojamo vaizduoklio tipo ir jo darbo režimo.

Paprasčiausi elementai, iš kurių galima sudaryti visus grafinius vaizdus, yra taškai. Tiesiog tašku yra vadinima koordinatėmis aprašoma vieta ekrane. Jeigu ši vieta yra parengta spalvotam taškui arba kitokiam grafiniam objektui žymėti, taškas vadinamas aktyviu arba grafiniu kursoriumi. Ekrane jis nerodomas. Aktyvaus Taško koordinatės tikrinamos funkcijomis:

Function GetX: integer;
Function GetY: integer;
Aktyvaus taško spalvą tikrina funkcija:
Function GetPixel(x, y: integer): word;

Matomo taško vieta ir spalva aprašomos procedūra:
2

Procedure PutPixel(x, y, spalva:integer);
2. Apskritimas ir kitos figūros
Įjungus grafinį režimą procedura InitGraph, ekranas yra išvalomas ir jam parenkamos standartinės fono, linijų ir kitų grafinio darbo režimo parametrų reikšmės. Fono ir linijų spalvos aprašomos procedūromis, kurių parametrai nurodo spalvų kodus:

SetBgColor (spalva:integer); - nurodo fono spalvą
SetColor (spalva:integer); - nurodo linijų spalvą

Pagrindinės linijų piešimo procedūros:

Arc (x, y: integer; a1, a2, r:word) - apskritimos lankas, kur R - spindulys, (X, Y) - centras, A1,...

Daugiau informacijos...

Šį darbą sudaro 1622 žodžiai, tikrai rasi tai, ko ieškai!

★ Klientai rekomenduoja


Šį rašto darbą rekomenduoja mūsų klientai. Ką tai reiškia?

Mūsų svetainėje pateikiama dešimtys tūkstančių skirtingų rašto darbų, kuriuos įkėlė daugybė moksleivių ir studentų su skirtingais gabumais. Būtent šis rašto darbas yra patikrintas specialistų ir rekomenduojamas kitų klientų, kurie po atsisiuntimo įvertino šį mokslo darbą teigiamai. Todėl galite būti tikri, kad šis pasirinkimas geriausias!

Detali informacija
Darbo tipas
Lygis
Mokyklinis
Failo tipas
Word failas (.doc)
Apimtis
10 psl., (1622 ž.)
Darbo duomenys
  • Programų referatas
  • 10 psl., (1622 ž.)
  • Word failas 89 KB
  • Lygis: Mokyklinis
www.nemoku.lt Atsisiųsti šį referatą

www.nemoku.lt Panašūs darbai

Turbo Pascalio pradmenys. Modulis Crt

Turbo Pascalio pradmenys. Modulis Crt Programos
Peržiūrėti darbą

Inžinerinė ir kompiuterinė grafika (2)

Inžinerinė ir kompiuterinė grafika (2) Programos
Peržiūrėti darbą

Kompiuterio grafika

Kompiuterio grafika Programos
Peržiūrėti darbą

Inžinerinė ir kompiuterinė grafika

Inžinerinė ir kompiuterinė grafika Programos
Peržiūrėti darbą
Privalumai
Pakeitimo garantija Darbo pakeitimo garantija

Atsisiuntei rašto darbą ir neradai jame reikalingos informacijos? Pakeisime jį kitu nemokamai.

Sutaupyk 25% pirkdamas daugiau Gauk 25% nuolaidą

Pirkdamas daugiau nei vieną darbą, nuo sekančių darbų gausi 25% nuolaidą.

Greitas aptarnavimas Greitas aptarnavimas

Išsirink norimus rašto darbus ir gauk juos akimirksniu po sėkmingo apmokėjimo!

Atsiliepimai
www.nemoku.lt
Dainius Studentas
Naudojuosi nuo pirmo kurso ir visad randu tai, ko reikia. O ypač smagu, kad įdėjęs darbą gaunu bet kurį nemokamai. Geras puslapis.
www.nemoku.lt
Aurimas Studentas
Puiki svetainė, refleksija pilnai pateisino visus lūkesčius.
www.nemoku.lt
Greta Moksleivė
Pirkau rašto darbą, viskas gerai.
www.nemoku.lt
Skaistė Studentė
Užmačiau šią svetainę kursiokės kompiuteryje. :D Ką galiu pasakyti, iš kitur ir nebesisiunčiu, kai čia yra viskas ko reikia.