Паскаль програмалау тілі туралы түсінік


Қазақстан Республикасы Білім және Ғылым министрлігі

Ақтөбе гуманитарлық колледжі

КУРСТЫҚ ЖҰМЫС

(Алгоритмдеу және бағдарламалау негіздері пәні бойынша)

Ғылыми жетекшісі Жазымова М. С.

Информатика пәні оқытушысы

Қорғауға жіберілді(жіберілмеді) .

Информатика және ақпараттық жүйелер

пәндер бірлестігінің жетекшісі

А. Ж. Бөрібай

қолы

« » 2010ж

Ақтөбе 2010ж.

Мазмұны

Кіріспе . . . 3

1 Турбо Паскаль програмалау тілі туралы түсінік . . . 4

1. 1. Программа туралы түсінік . . . 4

1. 2. Турбо Паскаль программалау тілінің негізгі элементтері . . . 4

1. 3. Турбо Паскаль программалау тілінің құрылымы . . . 6

2. Турбо Паскаль праграммалау тіліндегі графиктік режим . . . 8

2. 1. Graph модулі . . . 8

2. 2. Экранды басқаратын процедуралар . . . 16

2. 3. Графиктік режимде қолданылатын процедуралар мен функциялар . . . 19

3. Турбо Паскальда графикалық обьектілерді қозғалту . . . 24

3. 1. Обьектілерді қозғалту . . . 24

Қорытынды . . . 27 Пайдаланылған дерек көздер тізімі . . . 29

Практикалық бөлім . . . 30

Кіріспе

Тақырыптың өзектілігі: Бүгінгі менің курстық жұмысымның тақырыбы « Турбо Паскальда обьектілерді қозғалту » . Бұл кадрларды қозғалтуда мен арнайы объектілерді қозғалтуға арналған Turbo Pascal атымен аталатын программалау тілін қолдандым. Бұл програмалау тілінінің соңғы версиясын пайдаланған өте тиімді деп ойлаймын. Себебі Turbo Pascal арқылы экран бетіне тек әріптік- сандық мәліметтерді шығарып қана қоймай, сонымен бірге графиктік мәліметтерді, мысалы схемалармен сызбаларды шығаруға болады.

Graph модулінде қолданылатын процедуралар мен функциялар графиктік режимде негіз болып табылады.

Қазіргі ғылыми-техникалық даму кезеңінде инженерлік, экономикалық, басқару, ғылыми және басқа түрлі есептерді тиімді түрде шешу, медициналық болжам қою және т. б зерттеу нәтижелерін жоғары дәлдікпен анықтауды сонымен қатар объектілерді, кадрларды және де басқа графикалық схемаларды сызуда арнайы электронды-есептеуіш машиналарынсыз ұйымдастырып, қолданып нәтижесін алу мүмкін емес. Өйткені барлық деңгейдегі мамандар, студенттер өз білімін одан әрі тереңдетуге жыл сайын дамып отырған электронды -есептеуіш машинасымен жүзеге асыруда. Соңғы жылдары есептеуіш техниканың қарқындап дамуына байланысты, осы курстық жұмысқа Турбо Паскальдың соңғы версиясы тікелей қатысты.

Курстық жұмысымның тақырыбы: « Турбо Паскальда обьектілерді қозғалту » . Курстық жұмысым кіріспеден, 3бөлімнен, қорытындыдан, және пайдаланылған дерек көздер тізімінен, практикалық бөлімнен тұрады.

Зерттеу мақсаты: Студенттерге Graph модулінің мүмкіншіліктерін, графиктік режимде жұмыс жасап, түрлі сызбалар, нүктелер, обьектілерді құрып, оларды қозғалтуға болатыны туралы мағұлмат беріп таныстыру.

Міндеттері:

  • Турбо Паскаль програмасын оқыту;
  • Графикалық мүмкіншіліктерімен танысу;
  • Процедуралар мен функцияларды қолдана отырып есептер шығару;

Зерттеу обьектісі:Алия Молдағұлова атындағы Актөбе гуманитарлық колледжінің компьютер классында өткізілді.

Зерттеудің ғылыми болжамы: Паскаль тілінің оңайлығы оның алгаритмдік тілге ұқсастығында. Бұл тілде программа жазуды оңайлататын көптеген стандарт модульдері мен библиотекалары бар. Жәнеде қолданушы өз модульдерін жазып оларды библиотекаларға біріктіре алады. Паскаль тілі берілгендерді динамикалық түрде де көрсетуге мүмкіндік береді.

Кез келген программист жүйемен практикалық жұмысқа кірісуде, алдымен Турбо Паскаль ортасымен соқтығысады. Себебі, жоғарыда айтып кеткендей, Паскаль тілі кез-келген саладағы күрделі есептері шешу үшін пайдалануға болатын кең таралған стандартты программалау тіліне айналды.

Зерттеу әдістері: Турбо Паскальда әр түрлі граф бейнелерді салыстыру арқылы қарастырдым. Талдау, практикалық, қорытындылау.

1. Турбо Паскаль програмалау тілі туралы түсінік.

1. 1. Программа туралы түсінік.

Программа құруға ыңғайлы тамаша тілдердің бірі- Паскаль тілі. Оны оқып үйрену, түсіну және логикалық ойлау өте қара- пайым, әрі жеңіл. Паскаль программалаудың структуралық тәртібін және программалаудың басқа тілдерге қарағанда мысалы, Бейсик тіліне қарағанда әлдеқайда жақсы дамығанын айқындады. Оның қызықты рекурсивтік мүмкіндіктері, сонымен қатар әділ жөн сілтеу технологиясы да қолдау жасап отыр.

Енді бірер ауыз сөз тілдің тарихына тоқталатын болсақ алгоритімдік тіл АЛГОЛ 1950-1960 жылдары өңделді. Паскаль АЛГОЛ-дың ұрпағы болып саналады. Оны өңдеген швециялық, жоғары техникалық училищесінің профессоры Никлаус Вирт болды. Ол бұл тілді дүние жүзінде алғаш есептеу машинасын жасаған ұлы француз ғалымы Блез Паскальдың құрметіне «Паскаль» деп атаған. Паскальдың туған уақыты 70 жылдардың басы болатын. АЛГОЛ-мен салыстырғанда Паскаль түсінікті әрі өте жеңіл. АЛГОЛ-да жоқ болған нәрселердің барлығы Паскальда бар. Онда көптеген жақсы өңделген мәліметтер және қорытылып жаңа үлгіде тұрғызылған процедуралары бар.

Турбо Паскаль Borland фирмасының кеңейтілген стандартты тілі болып табылады, сонымен қатар интегралдау ортасын жеңілдету және тездету процесінде өңдеу программасын қалыпты сақтайды. Турбо Паскаль 7. 0 пайда болғанша, бұл программалық өнім жеті версиядан өтті.

1. 2. Турбо Паскаль программалау тілінің негізгі элементтері.

Программалау ортасында негізгі жұмыс пернетақтасы немесе маус көмегімен, меню жүйесі және сұхбат терезелер арқылы жүзеге асады.

Паскаль интерфейсі

Паскаль интерфейсі - келесі терезе элементтерінен құрылады:

  • Меню қатары
  • Терезе номері
  • Программаны редакторлеу терезесі
  • Қалып күй қатары.

Меню қатары

ТУРБО ПАСКАЛЬ жүйелік меню жүйесі келесі бөлімдерден тұрады: File, Edit, Search, Run, Compile, Debug, Tools, Options, Windows, Help.

Fail(файл) ішкі менюі

New, Open, Save, Save аs, Save all, Change dir, Change Director, Revert, Help, Print, Printer setup, Dos shell, Exit.

.

Edit(түзету) ішкі менюі

Undo, Redo, Cut, Paste, Copy, Clear, Show clipboard.

Search ішкі менюі.

Find, Direction, Forward, Backward, Scope, From curso, Entire scope, Replace, Search again, Go to line number, Show last compiler error, Find error, Find procedure.

Run (орындау) ішкі менюі

Run, Step over, Trace into, Go to cursor, Program reset, Parameters.

Compile ішкі менюі

Compile, Make, Build, Destination, Primary file, Clear primary file, Information.

Debug (реттеу) ішкі менюі

Breakpoints, Call stack, Register, Watch, Output, User screen, Evaluate/modify Expression, Result, New value, Add watch, Add breakpoint Condition, Pass count

File name, Line number.

Tools ішкі менюі

Messages, Go to next, Go to previous, Grep.

Options (опциялар) ішкі менюі

Code generation, Run-time errors, Syntax options, Debugger, Symbols, Integrated debugging/browsing, Standalone debugging, Display swapping, None, Smart, Always, Directories, EXE & TPU directory, Include directories, Unit directories, Object directories, Tools, Environment, Preferences, Screen sized, Source tracking, Auto save, Options, Disktor file, Editor, Create backup files, Insert mode, Auto indent mode, Use tab characters, Optimal fill, Backspace unindents, Cursor through tabs, Group Undo, Persistent blocks, Overwrite blocks, Colors, Open .

Windows ішкі менюі

Tile, Cascad, Close all, Refresh display, Size/Move, Zoom, Next, Previous, Close, List.

Help (көмек) ішкі менюі

Help (көмек) менюі жұмыс барысында Turbo Pascal туралы (командалар, меню, программалау және т. б) ақпараттар алу қажет болғанда қолданылады.

Терезе номері

Терезенің оң жақ жоғарғы жетінде орналасады және File менюіндегі New командасынан жаңа терезе ашылған сайын NONNAME00. PAS аттауында көрсетілген «00» орнына реттелген сандарда бірге өзгеріп отырады.

Программаны редакторлеу терезесі

Программаны редакторлеу терезесінде Turbo Pascal тілінде құрылған программаны жазылып редакторлеуге болады.

Қалып күй қатары.

Қалып күй қатарында F1 Help, F2 Save, Ғ3 Open, Alt+F9, Compile F9 Make Alt+F10 Local menu командалары орналасқан.

1. 3. Турбо Паскаль программалау тілінің құрылымы.

Программа программаның тақырыбынан және программа денесінен құрылады.

Программа тақырыбы: program кілттік сөзінен және қолайлы тізімді программа файылынан (input output)

Программа денесі (блок) алты бөліктен құрылады:

  • белгілерді сипаттау бөлімі;
  • тұрақтыларды сипаттау бөлімі;
  • мәліметтер типін сипаттау бөлімі;
  • айнымалыларды сипаттау бөлімі;
  • процедуралар және функцияларды сипаттау бөлімі;
  • операторларды сипаттау бөлімі.

Бөліктердің орналасу орнын өзгертуге болмайды. Кез-келген бөліктер (оператордан басқасы) жоқ бола алады.

Белгілерді сипаттау бөлімі

label (қызметші сөзі) бөлімінде белгілер үтір арқылы ажыратылып жазылады.

Мысалы label 3, 11, 48, 2;

Тұрақтыларды сипаттау бөлімі

const (қызметші сөзі)

Әрбір тұрақтыны анықтау үшін қандайда бір тұрақты мәнді белгілейтін идентификатор енгізіледі.

Мысалы: e=2, 718281828;

z=’8 Б класс’;

Мәліметтер типін сипаттау бөлімі

tupe (қызметші сөзі)

Жұмыс барысында мәліметтердің стандартты типі жие қолданылады:

byte - бүтін (0-ден 255-дейін)

integer - бүтін (32768-ден 32767-дейін)

longint - (2147483648-ден 2147483647-дейін)

real - нақты (2, 9Е-39 дан 1, 7Е+38-дейін)

char - символьдық (кез-келген символ. Мысалы: f немесе №)

string - жолдық тип (кез-келген мәтін 0 ден бастап 255 символ)

boolean - логикалық тип {екі мәнді қабылдайды: FALSE (жалған) және TRUE (ақиқат) }

Айнымалыларды сипаттау бөлімі

var (қызметші сөзі)

Осы бөлімде программада берілетін барлық типі көрсетілген айнымалылар болу керек. Бірдей типтегі айнымалылар идентификаторы үтір арқылы жазылады.

i, kl, l: integer;

a, b: real;

hobidaus: seasans

Процедуралар және функцияларды сипаттау бөлімі

Бөлімде бірнеше процедуралар және функциялар болуы мүмкін. Бірақ әрбір процедура Procedure, әрбір функция Function сөзінен басталады. .

Процедура және функцияның құрылымы өзінше бір программаға ұқсас.

Операторларды сипаттау бөлімі

begin

программа денесі

end.

2. Турбо Паскаль праграммалау тіліндегі графиктік режим.

2. 1. Graph модулі

Ол процедуралар мен функцияларды графиктік режим орнату үшін программаның басында келесі амалдар орындау қажет:

USES қызметші сөзінде GRAPH модулі жазылады:

USES Graph;

VAR

d1, d2:Integer;
BEGIN

dl:=Detect;
I nitGraph(d1, d2, 'C:\Turbo\Graph') ;

мұндағы:

InitGraph - графикалық режимді орнату процедурасы,

d1- графиктік режим драйверініңтипін,

d2 - видеоадаптердің жұмыс режимінің нөмірін анықтайтын тұрақтылар.

Бұл шамалар монитор мен видеадаптер типтеріне байланысты болады. Егер программада графиктік режим драйверінің типіне Detect стандартты тұрақты шамасы берілсе, онда InitGraph процедурасы автоматты түрде өзіне керекті графиктік драйвердің типін және монитор мен видеоадаптердің типтеріне сәйкес келетін графиктік жұмыс режимін анықтап алады. Апострофтардың ішінде орналасқан үшінші параметр Graph. tpu файлының дискіде орналасқан жолын көрсетеді. Егер ол Turbo Pascal терезесін ашқан Turbo. Ехе файлымен бірге бір каталогта орналасатын болса, онда Graph. tpu файлының орналасқан жолы орнына бос екі апостроф қойылып кетеді.

Компьютерлерде экран үшін негізінен екі жұмыс режимі пайдаланылады: текстік (символдық) және графиктик . Компьютерді жұмысқа қосқан кезде экран текстік режимде жұмыс жасап тұрады. Компьютердің графиктік мүмкіндіктерін пайдаланып жұмыс істейтін программалар жазу үшін, дисплей адаптерін графиктік режимде жұмыс істеуге даярлау керек.

Адаптерді дисплейдің графикалық режимде жұмыс істеуді қамтамасыз ететін құрылғысы деп қарастырсақ, бұл құрылғыны іске қосу үшін арнаулы программалар қажет. Мұндай программаларды графиктік драйверлер деп атайды. Адаптерлер әр түрлі болады, мысалы CGA - адаптері, ЕGA- адаптері, VGA- адаптері және т. б., сол себепті әрбір адаптерге сәйкес өзінің драйвері болады. Әдетте бұл драйверлер BGI каталогында жинақталады да және BGI кеңеймелі файл түрінде сақталады. Адаптердің түріне байланысты графиктік режимдегі экранның мүмкіндіктері де түрліше болады, мысалы CGA - адаптер болған жағдайда графиктік экранның өлшемдері 320*200 (палитрасы үш түстен тұрады) немесе 640*200(палитрасы екі түстен тұрады), ал EGA- адаптер CGA- адаптердің барлық мүмкіндіктерін қамтиды және тағы да басқа режимдерді /(640*200, палитра-16 түс, 4 беті бар ), (640*350, палитра-16 түс, 1 беті бар ) / бере алады.

Экранды графиктік режимде жұмыс істеуге даярлау

  • Uses GRAPH бұл сөйлем міндетті түрде программа тақырыбынан

кейін жазылады және стандарт модульдер кітапханасындағы GRAPH модулінің ашылғандығын білдіреді.

  • Init Graph процедурасы- адаптер жұмысындағы графиктік режимді

тағайындайды, процедура тақырыбының жазылуы:

Procedure InitGraph ( var Driver, Mode: integer; Path: String) ; Айталық, драйверлер D: дискісінің BP/BGI каталогында сақталған деп есептесек, онда драйвер типін автоматты түрде анықтауды жүзеге асыратын программа фрагменті төмендегідей болады:

USES CRAPH;

VAR

DRIVER, MODE:INTEGER;

BEGIN

DRIVER:=DETECT;

INITGRAPH(DRIVER, MODE, `C:/BP/BGI`) ;

  • Close Graph процедурасы адаптердің графиктік режиміндегі жұмысын аяқтап текстік режимді қалпына келтіреді. Жазылуы: Procedure Close Graph;
  • Graph Result процедурасы соңғы пайдаланған графиктік процедуралар жұмыстары нәтижесін integer типті кодын береді. Егер нәтиже қате болмаса, онда бұл функцияның мәні 0-ге тең болады да, ал қалған (қатесі бар жағдайларда) -1 мен 14-аралығындағы бүтін теріс сандардың біріне тең болады, және олардың әрқайсысына сәйкес төмендегідей мағынада тексттер тағайындалған.

CONST

Grok =0; {қате жоқ}

GrintGraph= -1 ; {графиктік режим тағайындалмаған}

GrNotDetect =-2 ; {драйвер типі анықталмаған }

GrFileFind= -3; {графиктік драйвер табылмады}

GrInvalidDriver=-4; {драйвер типі дұрыс емес}

GrNoLoadMem=-5; {драйверді орналастыруға жады жетпейді}

GrNoScanMem=-6; {облысты қарауға жады жетпейді}

GrNoFloodMem=-7; {облысты бояуға жады жетпейді}

Gr onNotFound= -8 ; {шрифт са0тал5ан файл табылмады}

GrNotFondMem= -9 { шрифт орналастыруға жады жетпейді }

GrInvalidMode= -10 { грфиктік режим дұрыс емес}

GrError= -11; {жалпы қате}

GrloError = -12 ; {енгізу-шығаруда қате бар}

GrInvalidFond = -13; {шрифт форматы дұрыс емес}

GrInvalidFontNum= -14; {шрифт номері дұрыс емес}

  • GraphErrorMsg функциясы көрсетілген кодқа сәйкес тексті қамтитын STRING типті мән береді, тақырыбы: Function GraphErrorMsg (Code:Integer ) :String:Міне, осыған байланысты графиктік объектілермен жұмыс жасайтын программаларда төмендегідей фрагменттің болғаны дұрыс:

USES GRAPH;

VAR

DRIVER, MODE:INTEGER ;

BEGIN

DRIVER=DETECT; {}

INITGRAPH (DRIVER, MODE, ’ \BP\BGI’) ;

Error:= Graph Result; {Нәтиженің кодын алу}

If Error < > Grok Then {Қатенің бар жоғын тексеру}

Begin

Writeln (GraphErrorMsg (Error) ) ( Қате туралы хабарлау

. . .

End

Else {қате жоқ, программа әрі қарай жалғаса береді}

. . .

Графикалық режимді инициализациялау

Турбо Паскальда графикамен жұмыс істеу үшін графиктік операторларды (Uses), драйверлерді (GraphDrіver), модульдерді (Crt, Graph), режимдерді (GraphMode, CloseGraph) қосуымыз қажет.

Графикалық тәртіп инициализациясы Init процедурасы және CloseGraph жабылу процедурасымен орындалады. InitGraph процедура тақырыбы мынадай түрде болады:

InitGraph (Драйвер : Integer; Режим :Integer; драйвер файлына жолдаиа :String) ;

Бірінші екі параметр тұрақтылармен, келтірілген графиктік драйверлермен және режимдермен анықталады. Автоматты драйвер және тәртіппен графикалық режимді инициализациялау үшін, Detect немесе 0 тұрақтысына жауапты өзгергішті иелену жеткілікті. Иемдену қандай жағдайда болмасын осы жағдайда өзгертуді талап етпейді. Үшінші параметр String типі Ms-Dos- пен, жол каталогіне, графикалық драйверлердің файлдарында өзімен синтаксистікте болатын мағына алуы тиіс.

Турбо Паскальда графикалық бейнелерді салу үшін стандартты кітапханалық Graph модулі арналған. Ол әр түрлі адаптерлі дисплейлерде графикалық режимдерді толығымен басқаруды қамтамасыз ететін программалардың кітапханасы. Ал Crt модулі экранға информацияларды шығаруды, пернетақтадан берілгендерді енгізуді, сол сияқты терезелермен жұмыс істеуді, дыбыстық сигналдар мен түрлі-түсті текстік жолдарды экранға шығаруды қамтамасыз етеді.

Рrogram Сурет;

Uses Graph, Crt;

Var GraphDrіver, {Графикалықдрайвер}

Graphmode: іnteger; {Графикалық режим}

Begіn

Clrscr; {Экранды тазалау}

GraphDrіver := 0; {Графикалық драйверді ашу} ІnіtGraph (GraphDrіver, GraphMode, ‘ ‘) ; {Графикалық жүйені нициализация жасайды және аппаратураны графикалық режимге ауыстырады}

Іf GraphResult <> 0 then {Қате пайда болды}

Begіn

Wrіteln; {Графика қатесінің нициализациясы}

Wrіteln; {Программа жұмысын тоқтату}

Halt; {Тоқтату}

End;

{Осы жолдан бастап графикалық әрекеттерді орындау процесі басталады } Readln; {Enter түймесіне басқанға дейін суретті

экранда көрсетіп тұру} CloseGraph; {Графикалық режимді жабу}

End.

GraphDrіver сөзін (G) деп, ал GraphMode сөзін (RGM) деп қысқартып алуға болады.

Program InitDemo;

Uses Graph; {Graph модулін қолдану }

Var

GraphDriver, { Графикалық драйвер}

GraphMode : Integer ; (Графикалық режим)

Begin

GraphDriver := Detect; {драйвердің автоайырылуы}

{ Gm параметрін құру}

{ мұндай жағдайда қабылданбайды}

InitGraph := (GraphDriver, GraphMode, ‘C:\BP\BGI’) ;

{ Графикалық драйверлер орналасады}

{ BP каталогының BGI каталогында}

{С: дискісінде}

{Графикалық әрекет}

Line (0, 0, GetMaxX, GetMaxY) ;

Readln; {Экранда соңғы суреттің кідіруі}

CloseGraph ; {графикалық режимнің жабылуы}

End.

Инициализациялау қателері және олардың өңделуі

Графикалық тәртіпті инициализациялаған кезде қате болса, онда Turbo Pasсal

Графиканың қате тұрақтылары

Қателер

коды

Қате туралы жаупты хабаршы
Графиканың қате тұрақтылары:

grOk

grNoInitGraph

grNotDetected

grFileNotFound

grInvalid Driver

grNoLoadMem

grNoScanMem

grFloodMem

grFontNotFound

grNoFontMem

grInvalidMode

grError

grIOError

grInvalidFont

grInvalidFontNum

Қателеркоды:

0

-1

-2

-3

-4

-5

-6

-7

-8

-9

-10

-11

-12

-13

-14

Қате туралы жаупты хабаршы:

Қателері жоқ

Графика инициализацияланбаған

Графикалық құралдар табылмаған

Файл табылмаған

Мүмкінсіз драйвер

Драйвер толтырылмаған

Жад қарғандағы қате

Бояу кезіндегі қате

Қаріп табылмаған

Қаріп жадқа толтырылмаған

Мүмкінсіз режим

Графика қателері

Графиканың енгізу-шығару қателері

Қаріптің мүмкінсізфайлы

Қаріптің мүмкінсіз нөмірі

Program Graph InitDemo;

Uses Graph; { Графикалық модульді қолдану }

Var GraphDriver, { Графикалық драйвер }

GraphMode : Integer { Графикалық режим}

ErrorCode := Integer { Қате коды }

Procedure MyGraphInit

Begin

GraphDriver:= Detect; {автоайырылу}

InitGraph (GraphDriver, GraphMode, ‘C:\BP\BGI’ ) ;

ErrorCode := GraphResult; { Инициализация нәтижесі }

If ErrorCode <> grOk then { Қатенің кетуі }

Begin

Writeln (‘ графикалық инициализацияның қатесі: ‘, GraphErrorMsg (ErrorCode) ) ;

Writeln(‘Бағдарламамен жұмыс үзілген ‘) ;

Halt (1) ;

End;

End;

Begin

MyGraphInit;

{}

Line () ;

Readln;

CloseGraph;

Graph Result функциясымен келетін қателер кодын генерациялайды. Графикалық модульде код қателеріне мынадай тұрақтылар енгізілген: Графиканы инициализациялауды- қателердің өңделуімен көрсетіп өтейін. Графикалық процесті инициализациялауда-оның әрбір графикалық программада жеке-жеке ашылу үшін, оны MyGraph Init процедурасымен әзірлеу ыңғайлы.

Қарапайым графикалық пішім

Бірінші үлгі- геометриялық пішіндердің және ағымдағы сызық түсін құратын

процедурасымен көрсетіледі.

Program SimpleFigureDemo;

Uses Graph; {Graph модулін қолдану}

Var

GraphDriver, {Графикалық драйвер}

GraphMode, {Графикалық режим}

ErrorCode :Integer; {Қате коды}

Procedure MyGraphInit;

Begin

GraphDriver := Detect {автоайырылу }

InitGraph (GraphDriver, GraphMode, `D:\BP\BGI`) ;

ErrorCоde :=GraphResult; {Инициализация нәтижесі}

If ErrorCode < > grOK then { Қатенің кетуі}

Begin

Writeln (`графикалық инициализацияның қатесі : ‘,

GraphErrorMsg(ErrorCode) ) ;

Writeln (`Бағдарламамен жұмыс үзілген`) ;

Halt (1) ;

end;

end;

Алдын ала анықталған тұрақтылар

Графикалық режимдегі жұмыс алдын ала анықталған тұрақтылармен, типтермен, процедуралармен және Graph модулінің стандартты функцияларымен орындалады. Graph модуліндегі тұрақтының түсі Crt модуліндегідей атаулармен және кодтардан тұрады.

Сызықтардың тұрақтылар типі және олардың жуандықтары

Тұрақты
Мағына
Ескерту
Тұрақты:

SolidLn

DottedLn

CenterLn

DasedLn

UsesBitLn

Мағына:

0

1

2

3

4

Ескерту:

Жаппай сызық

Нүктелі сызық

Жіңішке-пунктир сызық

Пунктир сызық

Бағдарламашымен анықталатын сызық үлгісі

Тұрақты:

Norm Widt

Thick Width

Мағына:

1

3

Ескерту:

Жуандығы жәй сызық

Қалың сызық

Бұл тұрақтылар GetLineSettings және SetLineStyle процедураларымен қолданылады.

Бояу үлгілерінің тұрақтылары

Тұрақты
Мағына
Ескерту
Тұрақты:

EmptyFill

SolidFill

LineFill

ItSlash Fill

SlashFill

BkSlashFill

LtBkSlashFill

HatchFill

XHatchFill

InterleaveFill

WideDotFill

CloseDotFill

UserFill

Мағына:

0

1

2

3

4

5

6

7

8

9

10

11

12

Ескерту:

Бір түспен облыс бояу

Облысты жайпаң бояу

Сызықтармен бояу

Cызықтармен бояу

Қалың сызықпен бояу///

Қалың сызықпен бояу\\\

Сызықтармен бояу

Сирек штрихпен бояу

Жиі штрихпен бояу

Үзілмелі сызықпен бояу

Сирек нүкте сызықпен бояу

Жиі нүкте сызықпен бояу

Бағдарламашымен анықталған бояу

Бұл тұрақтылар GetFillSettings және SetFillStyle- мен қолданылады.

Қаріп үлгі тұрақтылары және мәтін текстеуі

Тұрақты
Мағынасы
Ескерту
Тұрақты:

DefaultFont

TripLexFont

SmallFont

SansSerifFont

GothicFont

Мағынасы:

0

1

2

3

4

Ескерту:

8*8 растрлық қаріп

Штрих қаріп

Штрих қаріп

Штрих қаріп

Штрих қаріп

Тұрақты:

HorizDir

VertDir

Мағынасы:

0

1

Ескерту:

Солға оңға нұсқау

Төмен жоғары нұсқау

Тұрақты: UserCharSize
Мағынасы: 0
Ескерту: Символдардың, бағдарламашы анықталғандардың өлшемі

Бұл константалар SetTextStyle және GetTextSetting процедураларымен қолданылады.

Горизонтальмен мәтін тегістеу тұрақтылары

Тұрақты
Мағынасы
Ескерту
Тұрақты:

LeftText

CenterText

TopText

Мағынасы:

0

1

2

Ескерту:

Сол жақ шетімен

Ортамен

Оң жақ шетімен

... жалғасы

Сіз бұл жұмысты біздің қосымшамыз арқылы толығымен тегін көре аласыз.
Ұқсас жұмыстар
Турбо Паскальдағы қосалқы программалар, функциялар мен процедуралар
Жиындар
Паскаль-программалау тілі туралы ақпарат
Turbo Pascal тілінде циклдармен жұмыс
Delphi ортасында жұмыс
Мектеп журналының электрондык түрі
Турбо – Паскаль программа дайындалу жоспары
Програмистің библотекасын ұйымдастыру технологиясы
Мамандардың мәліметті өңдеудің машиналық құралдарына максималды жақындығы
Turbo Pascal тілінде программа дайындау жолдары
Пәндер



Реферат Курстық жұмыс Диплом Материал Диссертация Практика Презентация Сабақ жоспары Мақал-мәтелдер 1‑10 бет 11‑20 бет 21‑30 бет 31‑60 бет 61+ бет Негізгі Бет саны Қосымша Іздеу Ештеңе табылмады :( Соңғы қаралған жұмыстар Қаралған жұмыстар табылмады Тапсырыс Антиплагиат Қаралған жұмыстар kz