Видеопрокат жүйесін құру

КІРІСПЕ
1 ЕСЕПТІҢ ҚОЙЫЛЫМЫ
2 ЕСЕПТІҢ АЛГОРИТМІ
3 Теориялық бөлім
3.1 BDE Administrator
3.2 Database Desktop
3.3 Компоненттер палитрасы
4 Программаның баяндалуы
4.1 Жалпы мағлұматтар
4.2 Функционалдық тағайындалуы
4.3 Логикалық құрылымның баяндалуы
4.4 Шақыру және жүктеу
4.5 Қажетті техникалық жабдықтар
4.6 Кіріс мәліметтер
4.7 Шығыс мәліметтер
5 Бақылау мысалдарын баяндау
ҚОРЫТЫНДЫ
ҚОЛДАНЫЛҒАН ӘДЕБИЕТТЕР ТІЗІМІ
Қосымша материалдар
МББЖ дегеніміз бағдарламалық қамтама. Бұның арқасында қолданушылар деректер базасын (ДБ) анықтай, құрай және қолдай алады, сонымен қатар оған қатынасты бақылай алады.
Аппараттық қамтама. МББЖ мен жұмыс істеу үшін кейбір аппараттық қамтама керек. Ол өте кең шектрде вариациялана алады – дара дербес компьютерден және көп компьютерлерден тұратын желілерге дейін. Қолданылып жатқан аппараттық қамтама қолданылып жатқан МББЖ-ға және организацияның талаптарына тәуелді. Кейбір МББЖ-лер тек қана нақты аппараттық қамтамаға немесе құралға орналған, ал басқалары кең ауқымды аппараттық қамтамалармен және ОЖ-мен жұмыс істей алады. МББЖ мен жұмыс істеу үшін әдетте минимум оперативтік және дискілік жады жеткілікті болады (бірақ ол жүйенің керекті өнімділігіне жеткізе алмайды).
Бағдарламалық қамтама. Бұл компонент МББЖ-ң өзінің бағдарламалық қамтамасын және қолданбалы программаларды қамтиды. Әдетте қосымшалар С, COBOL, Fortran, Ada немесе Pascal деген сияқты үшінші буынды тілдерде немесе SQL сияқты 4-ші буынды тілдерде құрылады. Дегенмен, МББЖ өзі 4-ші буынды құрал-саймандарға ие бола алады. Олардың арқасында ол өзі қосымшаларды тез жасай алады.
МӘЛІМЕТТЕР. МББЖ ортасының ең маңызды компонеттернің бірі – мәліметтер болып табылады. Мәліметтер компьютер мен адамның арасындағы көпірдің рөлін ойнайды. ДБ жұмыс мәліметтерін сақтау мен қатар мәліметтерді де сақтайды, яғни «мәліметтер туралы мәліметтер».
Процедуралар. Процедураларға нұсқаулар мен тәртіптер қатысты. Олар ДБ қолданған және құрастырғанда мәнге алыну керек.
Қолданушылар. Қолданушылар ДБ-ң клиенттері болып келеді. Өйткені ДБ-сы олардың ақпараттық мұқтаждығын күтуі үшін құрылады, проектеледі және қуатталады.
Әртүрлі ұйымдардың табысты жұмыс жасауы үшін ақпаратты жүйенің дамығанын талап етеді. Сонда сол деректермен автоматтандырылған жинауды, өңдеуді және монипуляциялауды іске асырады.
1. В.В.Фаронов DELPHI 5 . Руководство программиста.
Издательство «Нолидж», Москва 2001
2. В.Гофман, А.Хомоненко Работа с базами данных в DELPHI.
Издательство «БХВ – Петербург», Санкт – Петербург 2000
3. А.М. Епанешников , В.А. Епанешников DELPHI база данных
Издательство «ДИАЛОГ – МИФИ», Москва 2000
4. А.Я. Архангельский Програмирование в Delphi 7.
Издательство «Бином», Москва 2004
5. Т. Конноли Базы данных Проектирование, реализация и сопровождение. Теория и практика
Издательсво «Вильямс», Москва 2000
6. В. Понамарев Delphi 7 Studio Самоучитель.
Издательство «БХВ-Петербург», Санкт-Петербург 2003
        
        Курстық жұмысты орындауға арналған тапсырма:
Студент: Жексембай А.Е.
Жұмыс тақырыбы: Видеопрокат жүйесін құру
Аяқталған жұмысты тапсыру уақыты: «___» ... 2005 ... ... ... ... ... ... жұмысты
сипаттайтын негізгі бөлім, қорытынды) :
Delphi ортасында мәліметтер базасын құрып үйрену, оның ... ... есеп ... ... ... ... материалдар саны: 0
Жұмыс жетекшісі:
Доцент Балғабаева Л. Ш. /_________/
Тапсырманы орындауға қабылдап алған студент:
Жексембай А.Е. ... » ... 2005 ... ... ... ... Бұның арқасында қолданушылар
деректер базасын (ДБ) анықтай, құрай және ... ... ... ... ... ... алады.
МББЖ ортасының компоненттері
1 суретте көрсетілгендей МББЖ ортасынан ... 5 ... ... ... ... 1 – МББЖ ... ... ... МББЖ мен жұмыс істеу үшін кейбір аппараттық ... Ол өте кең ... ... ... – дара дербес компьютерден
және көп компьютерлерден тұратын желілерге дейін. ... ... ... қолданылып жатқан МББЖ-ға және ... ... ... МББЖ-лер тек қана нақты аппараттық қамтамаға
немесе құралға орналған, ал басқалары кең ауқымды аппараттық қамтамалармен
және ... ... ... ... МББЖ мен ... ... үшін ... минимум
оперативтік және дискілік жады жеткілікті болады (бірақ ол жүйенің керекті
өнімділігіне жеткізе алмайды).
Бағдарламалық қамтама. Бұл ... ... ... ... және ... ... ... Әдетте қосымшалар С,
COBOL, Fortran, Ada немесе Pascal деген сияқты үшінші ... ... SQL ... 4-ші ... ... ... ... МББЖ өзі 4-ші
буынды құрал-саймандарға ие бола ... ... ... ол ... тез ... ... МББЖ ... ең маңызды компонеттернің бірі – мәліметтер
болып табылады. Мәліметтер компьютер мен адамның ... ... ... ДБ ... мәліметтерін сақтау мен қатар мәліметтерді де сақтайды,
яғни «мәліметтер туралы мәліметтер».
Процедуралар. Процедураларға нұсқаулар мен ... ... Олар ... және құрастырғанда мәнге алыну керек.
Қолданушылар. Қолданушылар ДБ-ң клиенттері ... ... ... ... ... мұқтаждығын күтуі үшін құрылады, проектеледі және
қуатталады.
Әртүрлі ұйымдардың табысты жұмыс жасауы үшін ақпаратты ... ... ... ... сол ... ... ... өңдеуді және
монипуляциялауды іске асырады.
Деректер базасы деп, деректердің электрондық сақтаушысын ... ... бір ... бірнеше компьютерлер көмегімен іске асады. Әдетте
деректер базасы деректерді сақтау үшін ... ... ... базасын басқару жүйесі болып табылмайды, егер
сөздің тура ... ... ... ... толық ДББЖ ( деректер база–сын
басқару жүйесі ) ... ие. ... ... DELPHI ... және ... деректер базасын құрып, және оның ішінде
жұмыс істеуге және кез-келген деректер ... ... ... ... құруға мүмкіндік береді .
DELPHI-ді кәдімгі ДББЖ деп айтуға, оның өзінің ... ... ( ... ... тілі ) ... ... ол басқа ДББЖ
кестелік форматын қолданады . Мысалы : dBase, Paradox, InterBase.
Бұны бірақ та жетіспеушілігі деп те ... ... ... ... өздерін жақсы қолданушылық қабілетін көрсетті. Сонда да DELPHI
мүмкіншіліктері арнайы ДББЖ ... ... ... асып та ... ЕСЕПТІҢ ҚОЙЫЛымы ЛОРгшщзшг
“Мәліметтер базасы” пәні бойынша курстық жұмысқа
Тақырыбы: “Видеопрокат ... ... ... және ... ... ... ... жасауға мүмкіндік
беретін қосымша құру.
Жұмыс жетекшісі _________ Л.Ш. ... ... ... ... _______ Жексембай А.Е.
Тапсырманы орындауға қабылдап алған күні "___" ___________ 2005 ж.
Аяқталған жұмысты қорғау күні "____"___________2005ж.
2 ЕСЕПТІҢ АЛГОРИТМІ
1. «Видеопрокат ... ... ... ... ... «Фильм» және
«Пункт» объектілерін таңдау;
2. Таңдалған объектілерге сәйкес мәліметтер жинау;
3. Объектілерді зерттеп, атрибуттарын анықтау;
4. ... ... ... ... ... құрастырамыз және
жүктейміз.
5. Мәліметтер базасымен жұмыс істеуді ыңғайлы ету үшін,формалар және
статистикалық мәліметтері бойынша есеп ... ... ... ... тез әрі ... ... ... үшін, қолданушы
менюын құрамыз.
7. Delphi ортасында зерттелген объектілер бойынша мәлімметтер базасын
құру.
3 Теориялық бөлім
3.1 BDE Administrator
Құрылатын ... ... ... ... ... ... ... серверде, түбір каталогта немесе ішкі каталогта
құруға болады, мысалы :
1) C :\ Primer ;
2) C :\ \ \…..\ Primer ... dBase және FoxPro ... ... ... ... ... ) МББЖ -нің ... режимінде жұмыс істейді.
МББЖ технологиясында МБ атауына псевдоним беріледі, ... ... ... ... іске ... Administrator утилиті Delphi – мен ... ... ... – құруда алғашқы қадам компьютердің С:\ немесе D:\ дискілерінде
өзіміздің ... ... үшін ... ... –де МБ ... BDE ... утилитінің көмегімен іске
асырылады. Сондықтан біздің "C :\ PRIMER " BDE ... - да ... ... екі ... ... жүреді :
1. Windows жұмысшы столына тікелей :
Пуск / ... / Borland Delphi 6 / BDE ... ... ... ... ... ... ол экранның IDE-нің
жоғарғы қатарында Delphі-дің басты менюінде ... ... ... және одан Exproler ... ... Осы
командамен BDE Administrator утилитін жібереміз.Жібергеннен кейін келесі
амалдар орындалады:
Негізгі менюден Object | New ... ... ... ... ...
2) МБ – ның құрылған типін (Standard) өзгеріссіз қалдырып ОК батырмасын
басамыз. ... ... сол ... ... терезесін
көреміз. Оны PRIMER атымен өзгертеміз. Ол үшін МБ атына ... ... ... ... – 2 ... ... ... типін таңдау терезесі
Оң жақ терезеде МБ параметрлері келтірілген. Оларды ... да, тек ... ... ... Бұл ... МБ ... жолды енгізу үшін жол сілтейді. Жолды енгізу үшін PATH өрісін
шертіп оң жақта пайда болған ... ... ... ... ОК ... ... (Сурет 5). Енді псевдонимнің анықталуын есте
сақтауымыз керек, ол үшін сол жақ терезеде ... оң жақ ... атын ... және Apply элементін менюден ... ... ... ... псевдонимнің өзгертулерін сақтаймыз да, ОК
батырмасын басуымыз ... BDE ... ... ... ... ... соң ... аяқталады. Енді оған басқа утилиттерден хабарласуға болады. Бірақ МБ
псевдонимі бар ... әлі бос. ... ... ... кестесін
құру керек.
Сурет 3 - Мәліметтер базасының псевдоним параметрлерінің терезесі
3.2 Database ... ... ... құру үшін Database Desktop (DBD) ... Программа | Borland Delphi 6| Database Desktop ) ... ... ... ... ... жұмысшы псевдонимі утилитін орнатамыз.
Бұл псевдоним ... ... ... ... утилит. Егер жұмысшы
псевдонимі орнатылмаса, онда DBD ... ... ... псевдонимді көрсетіп
отыру керек, бұл уақытты көп алады.
Жұмысшы псевдонимін орнату үшін бас менюдан File | Working ... ... ... және Aliases түсетін тізімінде псевдоним ... ... , одан ... Ok батырмасын басу керек. Бас менюдан File
| New | Table таңдаймыз, осыдан ... МБ ... ... ... ... ... 6 - Database Desktop ... МБ кестесінің құрылымын анықтау
терезесі
Сурет 7 - Өріс алаңын ... ... ... ... ... Field Name ... ... Өріс типін анықтау үшін, Type бағанасында тышқанның
оң жақ батырмасын басыңыздар. Бұған жауап ретінде керек өріс ... ... өріс ... ... ... ( сурет-7).
СУБД Paradox барлық мүмкін типтері 8-суретінде келтірілген.
Paradox пішімінің өрістер типі.
➢ Alpha – кез ... ... ... тұратын, ұзындығы 1-255
байттық жол;
➢ Number – ... оң және ... ... ... ... 8 ... ... Сандар диапазоны – 10- нен 10- ге дейін;
➢ $ Money - мағынасы оң және теріс ... ... ... ... Ондық
нүкте мен ақша белгісін бейнелеу үшін келісім бойынша пішімделген
болып табылады.
➢ Short – тек қана - 32768- ден 32767- ге ... ... ... ... ұзындығы 2 байттық сандық өріс.
➢ Long Integer – -2147483648- ден 2147483648- ге ... ... ... ... және ... 4 байт ... ... # BCD – BCD (Binary Coded Decimal) пішімінің ... ... ... ... сандық өрістерге қарағанда есептеу жылдамдығы
аз, бірақ ... ... ... ... ... 0 мен ... аралығындағы сандарды қабылдауы мүмкін.
➢ Date – біздің ... ... 9999- шы ... 1- ... ... ... 9999- шы жылының 31- ші
желтоқсанына дейінгі даталардан ... , ... төрт ... ... Time – миллисекундтан түнжарымына дейінгі уақыттан тұратын және де
24 сағатпен ... ... төрт ... ... ... @ Timestamp – уақыт пен даталардан тұратын, ұзындығы 8 байттық
жалпылама даталар өрісі.
➢ Memo – ... ... 255 ... ... және ... сақтау үшін қолданылатын өріс. Бұл өріс кез келген
ұзындықты қабылдауы ... ... құру ... ... ... ... ... символдардың санын қайтарады,
ал қалғандары MB. кеңейтілуіндегі жеке файлдарда сақталады.
➢ Formatted Memo – бұл Memo- ға өте ... ... ... Memo- дан
бір артықшылығы – мәтіннің қарібін беру мүмкіндігі.
➢ Binary – кез келген екілік мәліметтерден тұратын ... Бұл ... ... ... ... мүмкін. Кесте құру кезінде
көрсетілетін өлшемдер ... ... ... ... ... ал қалғандары MB. кеңейтілуіндегі жеке файлдарда
сақталады. Бұл өріс Inter Base- тегі BLOb ... өте ... Bytes – кез ... ... ... ... 1-255 байттық
сандар жолы.
dBase пішімінің кестелер өрісі келесідей ... ... ... Character (Alpha) – кез келген баспалық символдардан тұратын,
ұзындығы 1-254 байттық жол;
➢ Float ...... оң және ... ... ... ... 1-120 ... сандық өріс. Бұл өте үлкен шамалардан тұрады.
Сондықтан бұл өрістермен жұмыс жасаған ... ... ... ... ... ... отыру керек.
Ондық нүктелерден кейінгі цифрлардың саны бүкіл өрістің өлшеміне
қарағанда 2-ге кем болу керек;
➢ Number (BCD) – BCD ... ... ... өлшемі 1-20
байттық сандық өріс. Сандық өлшемдерге ... бұл ... ... ... ... ... нақтылығы біршама
жоғары. Ондық нүктелерден кейінгі сандардың саны бүкіл өрістің
өлшеміне қарағанда 2-ге кем болу ... Date – ... 8 ... даталар өрісі. Келісім бойынша қысқа
даталар пішімі қолданылады (Short Date Format);
➢ Memo – ұзындықтарының ... ... 255 ... ... және
символдарды сақтау үшін қажетті өріс. Өріс кез келген ұзындықты
қабылдауы мүмкін. Бұл өріс жеке ... ... ... ... Memo ... ... ... мүмкіндігі жоқ;
➢ OLE - өзінің өңделуі кезінде өзін ... ... ... ... құжаттардан, яғни OLE деректерінен тұратын (Object
Linking and Embedding) тұратын өріс. Бұл өріс те жеке ... және кез ... ... ... ... Binary – кез ... ... мәліметтерден тұратын өріс. Берілген
өріс DBT кеңейтілуіндегі жеке файлдарда сақталады және кез ... ... ... Бұл ... Blob ... ... пішімінің кестелер өрісі төмендегідей типтерді қабылдауы
мүмкін:
➢ Short – тек қана ... ... ... ... бүтін
сандардан тұратын ұзындығы 4 байттық сандар өрісі;
➢ Long – ... ... ... ... ... тұратын, ұзындығы 4 байттық сандар өрісі;
➢ Float – мәндері оң және теріс болуы ... ... 4 ... ... ... диапазоны 3.4*10-нен 1.7*10-не
дейінгі мәні 7 ... ... ... Double – мәндері оң және теріс болуы мүмкін, ... 8 ... ... Бұл ... ... пиктограммаға байланысты және
сандар диапазоны ... ... ... мәні ... ... ... Array – деректер жиымдарынан ... ... ... ... ... ... мүмкіндік береді. Өріс кез келген
ұзындықты қабылдауы мүмкін. DateBase Desktop-тың Array ... ... ... ... ... құруға да
мүмкіншілігі жоқ;
➢ TextBlob – тек қана мәтіндік мәліметтерден ... Blob ... ... ... Өріс кез ... ұзындықты қабылдауы мүмкін.
DateBase Desktop-тың TextBlob ... ... ... ... алаңы типін анықтау үшін, Alpha таңдаймыз және бағанға Size–ға
керекті мәнін көрсетеміз. Key ... ... ... Осы ... алғашқы кілттің енетінін білдіреді. Ол үшін клавиатурадан кез
келген ... ... ... ... ... ... ... бағаналарына анықтамалар енгіземіз
(Сурет-9).
Сурет 9 - Materialy кестесінің құрылымын анықтау
Есеп шарттарына ... ... ... ... ... ... . Бір ... екінші өріске өту үшін Required Field
ауыстырып-қосқыштарын іске қосамыз. Басқа өрістер мағынасына шек салу ... ... ... Minimum value - ... ең аз ... ... Maximum value - ... барынша үлкен мәнін анықтайды;
• Default value – өріс мәнін келісім бойынша анықтайды
Picture – ... ... ... анықтайды . Шаблон құру үшін Assist
батырмасын басу керек. Бір өрісте мәннің болмауы өрістің ... ... ... толтыру және есте сақтау.Кесте құрлымын конструкциялағаннан
кейін Database Desktop-та кестені толтыруға ... ... ... ... ... ... ... онда латын алфавитін пайдалануға
болатынын атап өтейік.
Содан соң ... ... ... ... ( Materialу ) аты
анықтағаннан кейін Materialу файлы құрылады.
Сурет 10 - ... ... ... ... реструктурлануы. Егер МБ бар кестелерге өзгерістер енгізу
керек болса, File|Open|Table меню ... ... ... ... ... ... ... атын таңдап Ок батырмасын басу ... ... ... ... Materialу кестесінде жазуларды жоқ болады,
өйткені біз оған ... ... ... ... 11 - ... ... мазмұны – жазбасы әлі көрінбейді
Біз DBD-дан(бірнеше жазбаға өзгеріс енгізіп немесе өшіргіміз келсе) тура
кестені жаңа ... ... ... F9 ... ... ... ... өзгерткіміз келсе Table| Restructure меню элементін
таңдаймыз. Ізінше кесте құрлымын анықтайтын диалогты терезе ... ... ... ... ... болып табылатын екінші кесте
құрылымын анықтаймыз " материалдардың ... " ... .12) . Бұл ... ... әдісі кесте мастерімен ұқсас. Келесі айырмашылықтар
бар.
Сурет 12 - Prihod кестесінің құрылымы
Барлық өрістерге N_ Prih ... ... Required ... ... бұл өріс ... болғандықтан оны мәнмен
толтырғанда жаңа жазбаны автоматты түрде есте ... ... ... ”,“ ...... индекс құрамыз. Ол үшін біз
қиылысатын Table Properties тізімінен ... Indexes) ... . ... ... диалогты терезе 13- суретте көрсетілгендей көрініс
береді.
Сурет 13 - Терезенің оң жағына Secondary Indexes элементі ... ... ... ... үшін , Define ... басамыз. Көрінген
диалогтық терезеде Fields өрісінде біз анықтаған кестенің ... ... Index Fields ... ... ... ... сақтау
үшін тағайындалған. Fields тізімінен Index Fields тізіміне нақтылы өрісті
көшіріп алу үшін оң ... ... бар ... басу ... ... ... қосу маңызды, өйткені ол тізімде өрістің алмасу ретін
анықтайды. Index Fields ... ... ... ... соң ( ... Ok ... ... .
Сурет 14 - Индекс құрамына кіретін өрістерді анықтау
Көрінген терезеде индекс аты сұралады ( ... Атын ... ... басу ... ... 15 - ... ... терезесі
Индекс атын өріс атымен қою рұқсат етілмейді. Өйткені келесіде көрініп
тұрғандай жаңа ... ... ... оның аты индекстер тізімінде пайда
болады.
16 - суретте ... жаңа ... ... ... оның ... тізіміне пайда болады.
Сурет 16 - Prihod кестесі үшін анықталған индекстер тізімі
Индекс аты бойынша шертіп , біз оны ... ... (Erase ... ... ( Modify батырмасы ).
Құрылған кестені Prihod атымен сақтаймыз.
Мәліметтер базасының конструкциялау. Енді МБ -н ... ... ... құрлымы кестелерден тұрады. Есептің
қойылымынан белгілі ... " ... " және " ... ... ... “бірдің-көпке” деген қатынасында, олай дейтініміз ... бір ... Prihod ... сол ... бірнеше жазба
сәйкес келеді. Байланыс өрісі болып 2 кестеде бар Materialy өрісі болып
табылады. ... ... ... ... ... –те сілтемелік бүтінділік, біріншіден кесте арасындағы
байланысты екіншіден каскадты жерді анықтайды.
Prihod кестесін ( ... File ... | Table | Open ) ашып және ... ... режіміне ( Table | Restructure ) кіреді. Table Properties
түсетін тізімінде Refrential Integrity элементін ... және ... ... ... ... ... ( ... .17) Fields тізімінде
Prihod кестелерінің өрістері көрсетілген, ал Tables тізімінде – ... ... ... ... 17 - ... бүтіндікті құруға арналған терезе
Tables тізімінде Materialy кестесін таңдаймыз және сол жақ ... . Parents Key ... ... ... бірінші кілті
көрсетілген .
Update rules айырып қосқыштар Materialy кестесінде жазбаларды ... ... ... өріс ... ... ... ... каскады әсерін анықтайды:
• Cascade – Prihod кестесінд ... ... жою ... ... - ... ... жазбаны жою немесе байланыс алаңына
өзгерісті шектеу. Cascade таңдап ( сурет .18) Ok кнопкасын басамыз.
Сурет 18 - ... ... ... ... –те атау ... ... бүтіндік аталынады. Атын енгіземіз
мысалы Materialy мысалы _Prihod _ Integrity және Ok кнопкасын басамыз .
Prihod ( Save кнопкасын ) кестесіндегі ... ... Prihod ... | ... ) кестесінің реструкизациясы режіміне қайта кіреміз.
Table properties тізімінде Secondary Indexes ... ... ... Material ... пайда болған жаңа индексті көреміз .Бұл индекс
сілтегіш ... ... ... ... ... тұрғызылған ( сурет 19).
Сурет 19 - Сілтемелік бүтіндікті ... ... Prihod ... ... МБ ... ... аяқталады, реструктуризациялау режимінен
жылжыуымызға болады. Осыдан кейін құрылған кестелермен жұмыс істеу ... ... ... ... Ал «Кинотеатрлар афишасын құру»
таблицаларын Қосымша Ә-де көресіз (Ә 1, 2, ... ... ... ... ... үшін компоненттік тәсіл пайдаланылған:
пайдаланушы ... ... ... ... бірге
ұсынылатын, бір іс-әрекетті орындайтын (дайын ... ... ... ... ал олар ... терезесіне енгізіледі.
Компоненттік тәсіл программалау технологиясында нағыз төңкеріс жасады деуге
болады, ... ... ... ... ... күрделі түрде
жеңілдетті.
Компоненттер кітапханасын визуальды компоненттер кітапханасы ( Visual
Component Library, VCL) деп ... ... ...... ие ... ... Компоненттер арқылы бағдарламаның
негізі қаланады. Компоненттер палитрасында ... ... ... Standard – жиі ... ... ... стандартты парақ.
Standard бетіне енгізілген ... ... ... MainMenu - ... ... құру;
- PopupMenu - Тышқанның оң түймесін шерткен кезде экранға ... ... ... Edit - ... ... енгізу, редакциялау (мәтіндік редактор);
- Label - Бір жолдық мәтінді (жазбаны) ... Button - ... ... Оның OnClick ... ... бір іс- ... ... ScroоlBar - Басқару белдеушесі (Windows терезесіндегі сияқты).
- Frame – ... ... бар ... Жеке ... ... Memo – Көп ... ... бейнелеу және енгізу үшін
қолданылады;
- Checkbox – Қолданушыға әртүрлі ... қосу және ... ... ... ... ... ... компоненттер сұхбаттық
терезелердің көрінісін түрлендіру үшін ... BitBtn - ... ... ұстай алатын батырманы жасайды;
- SpeedButton – (тез ... ... тек қана ... ... ... ... StringEdit – таблицаны құрады. Бұл таблицаның жолдары мен
бағандарында мәтіндік жолдар болады;
- Image – ... ... ... ... метафайлдарды
шығару үшін қолданылады;
- Bevel – үш ... ... ... ... ... ... Data Access – ... қатынас.
• Qreport - есеп берулерді жедел дайындау:
- QuickRep – есеп ... ...... есеп беру;
- QRStringsBand – қатарлы есеп беру;
- QRBand – есеп беру жолағы;
- ...... есеп беру ... QRGroup – топ;
- QRLabel – жазба;
- QRDBText – ... ... ... ... QRExpr – ... ...... жүйе;
- QRMemo – көпқатарлы текст;
- QRExprMemo – көпқатарлы ... ...... ... ...... жиынтығының форматталған текст өрісі;
- QRShape – геометриялық фигура;
- QRImage – графиктік көрініс;
- QRDBImage – деректер жиынтығының ... ... ... QRCompositeReport – құрамдық есеп беру;
- QRPreview – есеп беруді көру ... ...... ... ... – SCV – ... QRHTMLFilter – HTNL – фильтрі;
- QRChart – ... ... Data Controls – ... ... және ... компоненттері:
- DBGrid – тор ( кесте );
- DBNavigator – навигациялы интерфейс;
- DBText – мәтінді жазу;
- DBEdit – бір жолдық ... DBImage – ... ... ... – қарапайым тізім;
- DBComboBox – қиыстырылған тізім;
- DBCheckBox – тәуелсіз ... ... BDE (Borland DataBase Engine) ... ... ...... көзі ;
- Table – МБ кестесіне негізделген ... ... ;
- Query – SQL ... негізделген мәліметтер жиыны ;
- StoredProc – серверде сақталған процедураға негізі мәліметтер жиыны;
- DataBase – МБ - мен ... – МБ - да ... ... ... ... Timer ...... уақыт аралықтарын есептеу;
• System (Жүйе) бетіне OLE (байланыстыру және орнату) течнологиясы
бойынша берілгендерді түрлі ... ... ... ... ... ... компоненттер енгізілген. Мысалы,
• PaintBox (Сурет қорабы) – ... ... ... төртбұрышты
облыс құру;
• OLEContainer (OLE контейнер) – байланыстыратын және орнатылатын
объектілерді қабылдау контейнері;
• MediaPlayer – ... ... ... ... ... ... операциялық жүйелермен жұмыс ... ... ... ... Animate ... ... әсерін ұйымдастыру)-қозғалыс әсерін
ұйымдастырады. Компонент формаға орнатылған ... ... ... ... ... ... Samples ... бетіне енгізілген компоненттер:
• ColorGrid (Түстер торы) –түстер ... Ол 16 ... ... және фон ... ... Calendar (Календарь) – ағымдық күн белгіленген ай календарын көрсету
(жылдық календарды Win32 панелінің MonthCalendar компонентін ... ... ... ... т.б.
• Interfase – Borland Database Engine (BDE) және Active Data Objects
арқылы (ADO) ... пен ... ... Midas – ... ... ... базасының қосымшасын тұрғызу;
• Internet Express – Internet Express қосымшаларын құру;
• Internet – Internet- пен бірге ... ... ... үшін арналған
компоненттер;
• FastNet – Internet- ке жетудің әртүрлі хаттамалары;
• Decision Cube – ... ... Dialogs – « ... ашу » ... ... жүйелік сұхбаттар;
• Win 3.1 – Windows 3.x стиліндегі компоненттер;
• Samples – аяқталмаған құжаттық компоненттер ... ActiveX – ActiveX- тің ... ... Servers – кең ... COM ... арналған VCL қабықшалары;
4 Программаның баяндалуы
4.1 Жалпы мағлұматтар
Delphi ортасы – бағдарламаушының жоғары әрі ... ... ... ... ... Ол визуалды түрде бір уақытта бірнеше ашылған
терезелермен жұмыс атқарады. Терезелер экранда ... ... ... бір- бірін жаба отырып жылжи алады, бұл Word ... ... Exsel ... процессор ортасының ... ... ... ... ... ... ... нұсқасы 1994 жылы жарыққа шығып, кейінгі ... ... ... 2, 3, 4, 5, 6, 7 – нұсқалары жарық көрді. 5, ... ... ... ... жоқ ... ... ... де Windows
32 операциялық жүйесінің негізінде дайындалған. Delphi 6-да интернет үшін
қосымшаларды дайындау мүмкіндігі ... және ... ... ... ... ... негізгі ерекшелігі – онда қосымша құруда компоненттік және
объектілік тәсілдер пайдаланылады. Компоненттік тәсілдің мәнісі ... ... ... ... ... компоненттерден жинақталады. Ол
жеткіліксіз болса, объектіні өңдеуге арналған үстеме бағдарлама ... ... ... кітапханасында (VCL – Visual Component
Library) ... ... ... түрлі кластарға тиісті
стандартты компоненттер өте көп. Пайдаланушы жаңа компонент ... ... ... ... да ... ... ... программа мәзірін құру, анимация,
мультимедиа үрдістерін ұйымдастыру, OLE технологиясын пайдаланып, ... ... ... ... ... ... жене т.б. іс-әрекеттерді
орындауға болады. Delphi көптеген есептерді шешуге мүмкіндік береді, оның
ішінде:
• Әртүрлі ... ... ... Windows үшін ... Кез ... ... кез келген қосымшалар үшін профессионалды
көрінетін интерфейсті тез құру. Интерфейс Windows- тың ... ... және ... ... ... ... ... ыңғайланады. Өйткені Windows-
тың көптеген функцияларын, кітапханаларын қолданады;
• Бағдарламалаудың басқа ... ... ... ... ... динамикалы біріктірілетін кітапханасын
(DDL) құру;
• Кез келген типтегі ... және ... ... базасымен
жұмыс істеудің қуатты жүйесін құру;
• Кестелері, графиктері бар күрделі есеп ... құру ... ... ... Windows ... ... ... болатын өз қосымшалары
үшін анықтамалық жүйелерді (hlp файлдары) құру;
• Windows- тың ... ... және ... ... тың ... үшін орнатудың профессионалды
бағдарламаларын құру.
Көптеген операторлардың жазылуы ... ... ... Бірақ,
мұнда прогаммалауды үйрену үшін объект, оқиға, ... ... ... ... танысып, компоненттерді пайдалану және ... ... ... білу қажет.
Delphi программалау ортасы
Дельфи программалау ортасы
1. Delphi 7-нің негізгі терезесі.
2. ... ... ... ... терезесі (Object Inspecteor).
4. Модуль терезесі (программалық код терезесі).
5. Негізгі мәзір.
6. ... ... ... палитрасы.
4.2 Функционалдық тағайындалуы
Белгілі бір пункттің (презентациясын) жасау.
4.3 Логикалық құрылымның баяндалуы
Кесте 4.3.1 - Unit1
|1 ... аты |
|2 ... ... басы ... ... ... ... ... ... ... бөлімі ... ... ... ... ... ... |Модульдің ішінде көрінбейтін элементтер классын ... ... ... ... |Кез – ... ... және ... кез – келген жерде |
| ... ... ... ... ... ... ... аяқталуы ... ... ... ... ... ... асыру бөлімі ... ... ... ... ... |Компиляторлар дерективасы ... ... ... ... ... ... ... ... коды ... А-да ... 4.3.2 – Unit2
|1 ... аты |
|2 ... ... басы ... ... ... ... ... ... ... ... ... ... ... көрінбейтін элементтер классын анықтайды |
|23,25 |Түсініктемелер ... |Кез – ... ... және ... кез – ... ... |
| ... элементтер класын анықтайды ... ... ... ... ... ... баяндау бөлімі ... ... ... ... ... ... ... ... ... ... ... Unit-тің коды Қосымша А-да көрсетілген.
Кесте 4.3.3 – Unit3
|1 |Модуль аты |
|2 ... ... басы ... ... ... ... ... |Программада қолданылатын процедуралар баяндалған ... ... ... көрінбейтін элементтер классын анықтайды ... ... ... |Кез – ... модульден және программаның кез – келген жерде |
| ... ... ... ... ... ... ... ... ... |Айнымалыларды баяндау бөлімі ... ... ... ... ... ... ... ... |Модульдің аяқталуы ... ... коды ... А-да көрсетілген.
Қалған Unit-тердің логикалық құрылымы жоғарғы Unit-терге ... ... ... не ... ... 4.3.4 – Unit-тардың баяндалуы
|Unit4 |Клиент бөлек кестесі ... | ... ... ... ... |Meloman Query ... құру ... |Greendog Query арқылы құру ... ... Query ... құру ... ... ... есеп беруді жасау ... ... ... ... есеп ... жасау ... ... ... ... құру ... ... ... мағлұмат құру ... ... ... мағлұмат құру ... ... ... Қосымша А-да көруге болады.
4.4 Шақыру және жүктеу
Мәліметтер базасын ұйымдастыру үшін BDE Administrator – ды іске ... қосу | ... | Borland Delphi 6 | BDE ... ... ... құру үшін DataBase Desktop – ты іске
қосу:
Іске қосу | Программалар | Borland Delphi 6 | DataBase ... Windows ... іске қосу ... қосу – ... – Borland Delphi 6 – Delphi 6.
Құрылған Мәліметтер базасының дұрыстығын тексеру үшін F9 ... ... ... техникалық жабдықтар
Берілген курстық жобамызды Delphi ортасында орындау үшін Pentium 4
микропроцессорына ... ... ... пайдаландық.
Орындалған жұмысты қағаз бетіне түсіру HP LaserJet 1200 ... ... ... ... ... ... ... белгілі бір киноның атын, кинотеатрдың атын, сонымен қатар
қай күні және қай ... ... ол ... ... бас рөліндегі
кейіпкерін енгіземіз.
4.7 Шығыс мәліметтер
«Афиша» мен «Билетті» құжат түрінде шығарамыз
5 Бақылау мысалдарын баяндау
Бұл курстық жұмыста біз 3 ... ... ... ... ... ... кестелерді Қосымша Ә-де қарауға ... ... бас ... 3 ... және 5 ... тұрады. Әр бір менюдің ішкі менюлары
бар, олар:
... ... ... ... оның ішкі ... «Пункт», «Клиент» және
«Фильм». Мұнда біз ақпаратты енгізе, жоя және сақтай аламыз (Қосымша Ә-
гі Ә 4, 5, 6);
... ... оның ішкі ... ... ... ... біз ... ақпаратты көре аламыз (Қосымша Ә-гі Ә
7, 8, 9);
❖ «Статистика» менюі, оның ішкі ... ... ... есеп ... «Клиент кестесі бойынша есеп беру». Мұнда біз осы ішкі менюлердің
атына ... ... ... ... ... ... аламыз (Қосымша Ә-
гі Ә 11, 12, 13, 14, 15);
❖ «Программа туралы» ... оның ішкі ... ... ... ... «Фильмдер туралы» . Мұнда біз автор туралы мағұмат және жалпы
проект және фильмдер туралы мағлумат көре аламыз (Қосымша Ә-гі Ә ... 18, ... ... ... Ол ... шығу үшін ... келгенде, мен осы курстық жұмысымды орындау ... ... ... ... қол жеткізіп отырған, қызықты да
күрделі программа – Delphi ортасы туралы ... ... ала ... ... ... ... тілдерінің ішіндегі ең жүйрігі, ... ... ... сай өз ерекшеліктерімен қатар өз
мүмкіншіліктері де бар ... ... көз ... - де ... ... ... базасын басқару жүйелері
құру, программа мәзірін құру, анимация, мультимедиа үрдістерін ... ... ... ... ... ... шақыру, олармен
жұмыс істеу және т.б. іс- ... ... ... Delphi ... ... ... графиктері бар күрделі есеп берулерді құру
және баспаға шығаруға мүмкіндік ... ... ... ғаламның түкпір-
түкпіріндегі бұрышында болып жатқан барлық жаңалықтарды, білім, ... ... ... жатқан жетістіктерді, яғни барлық мәліметтерді
бүкіл дүниежүзілік компьютер желісі – ... ... ... болсақ, осы
мүмкіндіктерге одан да әрі қарай қол жеткізуге Delphi программасы да өз
үлесін қоса ... ... ... мүмкіндіктерін пайдалана отырып, өзіміздің
курстық жобамыздың тақырыбын ашатын ... ... ... және ... ... ... мен есеп берулерді үйрендік. Сонымен қатар SQL
тілінде программалауды игердік.
Тоқсан ауыз ... ... ... ... ... ... ... өте зор және қазіргі ... кең ... ... программа болып табылады.
ҚОЛДАНЫЛҒАН ӘДЕБИЕТТЕР ТІЗІМІ
1. В.В.Фаронов DELPHI 5 . ... ... ... ... ... ... А.Хомоненко Работа с базами данных в DELPHI.
Издательство «БХВ – ... ...... ... А.М. Епанешников , В.А. Епанешников DELPHI база данных
Издательство «ДИАЛОГ – МИФИ», Москва 2000
4. А.Я. Архангельский ... в Delphi ... ... Москва 2004
5. Т. Конноли Базы данных Проектирование, реализация и сопровождение.
Теория и практика
Издательсво ... ... ... В. ... Delphi 7 Studio ... ... ... 2003
Қосымша материалдар
Қосымша А
1. unit Unit1;
2. interface
3. uses
4. Windows, Messages, SysUtils, Variants, Classes, ... ... ... ... ... TForm1 = ... MainMenu1: TMainMenu;
9. N1: TMenuItem;
10. N2: TMenuItem;
11. N3: TMenuItem;
12. N4: TMenuItem;
13. N5: TMenuItem;
14. N6: TMenuItem;
15. N7: ... N8: ... ... TMenuItem;
18. Greendog1: TMenuItem;
19. Grammafon1: TMenuItem;
20. ReportMeloman1: TMenuItem;
21. N9: TMenuItem;
22. N10: TMenuItem;
23. N11: ... N12: ... ... ... ... ... N7Click(Sender: TObject);
27. procedure N8Click(Sender: TObject);
28. procedure Meloman1Click(Sender: TObject);
29. procedure Greendog1Click(Sender: TObject);
30. procedure ... ... ... ... ... procedure N11Click(Sender: TObject);
33. procedure N5Click(Sender: TObject);
34. procedure N9Click(Sender: ... ... ... TObject);
36. procedure N12Click(Sender: TObject);
37. private
38. { Private declarations ... ... { Public ... ... ... ... Form1: TForm1;
44. implementation
45. uses Unit3, Unit4, Unit5, Unit6, Unit7, Unit8, Unit9,
unit10,unit11,unit12,unit13;
46. {$R *.dfm}
47. procedure TForm1.N6Click(Sender: TObject);
48. ... ... ... ... ... ... ... begin
54. Form1.Visible:=True;
55. Form4.Show;
56. end;
57. procedure TForm1.N8Click(Sender: TObject);
58. begin
59. Form1.Visible:=True;
60. Form5.Show;
61. end;
62. ... ... ... ... ... ... end;
67. procedure TForm1.Greendog1Click(Sender: TObject);
68. begin
69. Form1.Visible:=True;
70. Form7.Show;
71. end;
72. ... ... ... begin
74. Form1.Visible:=True;
75. Form8.Show;
76. end;
77. procedure TForm1.ReportMeloman1Click(Sender: TObject);
78. begin
79. Form1.Visible:=True;
80. Form9.Show;
81. end;
82. procedure TForm1.N11Click(Sender: TObject);
83. begin
84. form10.Show;
85. end;
86. procedure TForm1.N5Click(Sender: TObject);
87. ... If ... ... ... ... mtConfirmation,[mbYes,mbNo,mbCancel],0)=mrYes
90. Then form1.close ;
91. end;
92. procedure TForm1.N9Click(Sender: TObject);
93. begin
94. form11.Show;
95. end;
96. procedure TForm1.N10Click(Sender: ... ... ... ... ... ... TObject);
101. begin
102. form13.Show;
103. end;
104. end.
1. unit Unit2;
2. interface
3. uses
4. SysUtils, Classes, DB, DBTables;
5. ... ... = ... Database1: TDatabase;
8. film: TTable;
9. klient: TTable;
10. punkt: TTable;
11. DataSource1: TDataSource;
12. DataSource2: TDataSource;
13. DataSource3: TDataSource;
14. Query1: TQuery;
15. DataSource4: TDataSource;
16. Query2: TQuery;
17. ... ... Query3: ... ... ... Query4: ... ... TDataSource;
22. private
23. { Private declarations }
24. public
25. { Public declarations }
26. end;
27. var
28. DataModule2: TDataModule2;
29. ... {$R ... ... unit ... interface
3. uses
4. Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
5. Dialogs, DB, DBTables, Grids, DBGrids, StdCtrls, Unit2, ... ... ... TForm3 = class(TForm)
9. Panel1: TPanel;
10. Panel2: TPanel;
11. DBGrid1: ... BitBtn5: ... BitBtn1: ... BitBtn2: ... BitBtn3: ... BitBtn4: ... procedure BitBtn1Click(Sender: TObject);
18. procedure BitBtn2Click(Sender: TObject);
19. procedure BitBtn3Click(Sender: TObject);
20. procedure BitBtn4Click(Sender: TObject);
21. private
22. { Private declarations ... ... { Public ... ... ... ... Form3: ... implementation
29. {$R *.dfm}
30. procedure TForm3.BitBtn1Click(Sender: TObject);
31. begin
32. DataModule2.punkt.Append;
33. end;
34. procedure TForm3.BitBtn2Click(Sender: TObject);
35. begin
36. DataModule2.punkt.Delete;
37. end;
38. procedure TForm3.BitBtn3Click(Sender: ... ... ... ... ... TForm3.BitBtn4Click(Sender: TObject);
43. begin
44. DataModule2.punkt.Post;
45. end;
46. end.
1. unit Unit4;
2. interface
3. ... Windows, ... ... ... Classes, ... Controls,
Forms,
5. Dialogs,Unit2, StdCtrls, Buttons, DB, Grids, DBGrids, DBTables,
DBCtrls,
6. ExtCtrls;
7. type
8. TForm4 = class(TForm)
9. Panel1: TPanel;
10. Panel2: ... DBGrid1: ... BitBtn1: ... BitBtn2: ... BitBtn3: ... BitBtn4: TBitBtn;
16. BitBtn5: TBitBtn;
17. procedure BitBtn1Click(Sender: TObject);
18. ... ... ... ... ... ... ... BitBtn4Click(Sender: TObject);
21. procedure BitBtn5Click(Sender: TObject);
22. private
23. { Private declarations }
24. public
25. { Public declarations }
26. end;
27. var
28. Form4: TForm4;
29. ... {$R ... ... ... TObject);
32. begin
33. DataModule2.klient.Append;
34. end;
35. procedure TForm4.BitBtn2Click(Sender: TObject);
36. begin
37. DataModule2.klient.Append;
38. ... ... ... ... ... ... end;
43. procedure TForm4.BitBtn4Click(Sender: TObject);
44. begin
45. DataModule2.klient.Edit;
46. end;
47. procedure TForm4.BitBtn5Click(Sender: TObject);
48. begin
49. DataModule2.klient.Post;
50. ... ... unit ... ... unit Unit5;
4. interface
5. uses
6. Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
7. Dialogs, DB, Unit2, DBTables, Grids, DBGrids, StdCtrls, ... ... ... TForm5 = ... Panel1: TPanel;
12. Panel2: TPanel;
13. DBGrid1: TDBGrid;
14. BitBtn1: TBitBtn;
15. BitBtn2: TBitBtn;
16. BitBtn3: TBitBtn;
17. BitBtn4: TBitBtn;
18. BitBtn5: TBitBtn;
19. procedure BitBtn1Click(Sender: TObject);
20. ... ... ... ... ... ... ... BitBtn4Click(Sender: TObject);
23. private
24. { Private declarations }
25. public
26. { Public declarations }
27. end;
28. ... Form5: ... ... {$R ... ... ... ... begin
34. DataModule2.film.Append;
35. end;
36. procedure TForm5.BitBtn2Click(Sender: TObject);
37. begin
38. DataModule2.film.Delete;
39. end;
40. procedure TForm5.BitBtn3Click(Sender: ... ... ... ... ... TForm5.BitBtn4Click(Sender: TObject);
45. begin
46. DataModule2.film.Post;
47. end;
48. end.
1. unit Unit6;
2. interface
3. uses
4. Windows, Messages, ... ... Classes, ... Controls,
Forms,
5. Dialogs, Grids, DBGrids, DBTables, DB, Unit2, StdCtrls, Buttons, Mask,
6. DBCtrls, ... ... ... TForm6 = ... DBEdit1: ... DBEdit2: TDBEdit;
11. DBEdit3: TDBEdit;
12. DBEdit4: TDBEdit;
13. Label5: TLabel;
14. DBEdit5: TDBEdit;
15. DBNavigator1: TDBNavigator;
16. DBEdit6: TDBEdit;
17. Image1: TImage;
18. Label1: ... Label2: ... Label3: ... Label4: ... Label6: ... Label7: TLabel;
24. Image2: TImage;
25. Image3: TImage;
26. BitBtn3: TBitBtn;
27. procedure BitBtn1Click(Sender: TObject);
28. procedure BitBtn2Click(Sender: TObject);
29. private
30. { Private declarations }
31. public
32. { Public ... ... ... ... Form6: ... ... {$R ... procedure TForm6.BitBtn1Click(Sender: TObject);
39. begin
40. DataModule2.klient.Append;
41. end;
42. procedure TForm6.BitBtn2Click(Sender: TObject);
43. begin
44. DataModule2.klient.Delete;
45. end;
46. end.
47. uses
48. Windows, Messages, SysUtils, Variants, Classes, ... ... Dialogs, Grids, DBGrids, ... DB, Unit2, ... Buttons, ... DBCtrls, ... ... type
52. TForm6 = class(TForm)
53. DBEdit1: TDBEdit;
54. DBEdit2: TDBEdit;
55. DBEdit3: TDBEdit;
56. DBEdit4: TDBEdit;
57. Label5: TLabel;
58. DBEdit5: TDBEdit;
59. ... ... DBEdit6: ... Image1: TImage;
62. Label1: TLabel;
63. Label2: TLabel;
64. Label3: TLabel;
65. Label4: TLabel;
66. Label6: TLabel;
67. Label7: TLabel;
68. Image2: ... Image3: ... BitBtn3: ... ... ... ... procedure BitBtn2Click(Sender: TObject);
73. private
74. { Private declarations ... ... { Public ... ... ... var
79. Form6: TForm6;
80. implementation
81. {$R *.dfm}
82. procedure TForm6.BitBtn1Click(Sender: TObject);
83. begin
84. ... ... ... ... ... begin
88. DataModule2.klient.Delete;
89. end;
90. end.
1. unit Unit7;
2. interface
3. uses
4. Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
5. Dialogs, DB, ... Unit2, ... Buttons, Grids, DBGrids, ... DBCtrls, ... type
8. TForm7 = class(TForm)
9. DBNavigator1: TDBNavigator;
10. DBEdit1: TDBEdit;
11. DBEdit2: TDBEdit;
12. DBEdit3: TDBEdit;
13. DBEdit4: TDBEdit;
14. DBEdit5: TDBEdit;
15. DBEdit6: ... Image1: ... Label1: ... Label2: ... Label3: ... Label4: ... Label5: ... Label6: TLabel;
23. Image3: TImage;
24. Image2: TImage;
25. Image4: TImage;
26. Image5: TImage;
27. BitBtn1: TBitBtn;
28. procedure BitBtn1Click(Sender: ... ... ... TObject);
30. private
31. { Private declarations }
32. public
33. { Public declarations }
34. end;
35. var
36. Form7: TForm7;
37. ... {$R ... ... ... ... ... ... end;
43. procedure TForm7.BitBtn2Click(Sender: TObject);
44. begin
45. DataModule2.klient.Delete;
46. end;
47. end.
1. unit ... ... ... Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
5. Dialogs, DB, ... Buttons, ... DBGrids, ... ... ... DBCtrls, ... ... TForm8 = class(TForm)
9. Image1: TImage;
10. Label1: TLabel;
11. Label2: TLabel;
12. Label3: ... Label4: ... Label5: ... Label6: ... DBEdit1: ... DBEdit2: TDBEdit;
18. DBEdit3: TDBEdit;
19. DBEdit4: TDBEdit;
20. DBEdit5: ... DBEdit6: ... ... ... BitBtn1: TBitBtn;
24. Label7: TLabel;
25. procedure BitBtn1Click(Sender: TObject);
26. procedure BitBtn2Click(Sender: TObject);
27. private
28. { Private declarations }
29. public
30. { Public ... ... ... ... Form8: TForm8;
34. implementation
35. {$R *.dfm}
36. procedure TForm8.BitBtn1Click(Sender: TObject);
37. begin
38. DataModule2.klient.Append;
39. end;
40. procedure ... ... ... DataModule2.klient.Delete;
43. end;
44. end.
1. unit Unit9;
2. interface
3. uses
4. Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
5. Dialogs, DB, RpRave, RpDefine, RpCon, RpConDS, ... ... Buttons, Unit2, Grids, DBGrids, ... ... TForm9 = ... DBGrid1: ... BitBtn1: ... RvQueryConnection1: TRvQueryConnection;
12. RvProject1: TRvProject;
13. BitBtn2: TBitBtn;
14. procedure BitBtn1Click(Sender: TObject);
15. private
16. { Private ... ... ... { Public ... ... ... var
21. Form9: TForm9;
22. implementation
23. {$R *.dfm}
24. procedure TForm9.BitBtn1Click(Sender: ... ... ... ... end.
1. unit Unit10;
2. uses Windows, Messages, SysUtils, Variants, Classes, Graphics,
Controls, Forms,
3. uses
4. Windows, Messages, SysUtils, ... Classes, ... ... ... RpRave, RpDefine, RpCon, RpConDS, RpConBDE, Grids,
6. DBGrids, StdCtrls, Buttons;
7. type
8. TForm10 = ... BitBtn1: ... BitBtn2: ... DBGrid1: ... ... ... ... TRvProject;
14. procedure BitBtn1Click(Sender: TObject);
15. private
16. { Private declarations }
17. public
18. { Public declarations ... ... ... Form10: ... ... {$R *.dfm}
24. procedure TForm10.BitBtn1Click(Sender: TObject);
25. begin
26. RvProject2.Execute;
27. end;
28. end.
1. unit Unit11;
2. interface
3. uses
4. Windows, Messages, SysUtils, ... Classes, ... ... Dialogs, ... ... type
7. TForm11 = class(TForm)
8. Label1: TLabel;
9. Label2: TLabel;
10. Label3: TLabel;
11. Label4: TLabel;
12. Label5: TLabel;
13. Label6: TLabel;
14. Label7: TLabel;
15. Label8: TLabel;
16. Label10: ... Label11: ... BitBtn1: ... Label9: ... ... { Private ... ... public
23. { Public declarations }
24. end;
25. var
26. Form11: TForm11;
27. implementation
28. {$R ... ... unit ... ... ... Windows, ... SysUtils, Variants, Classes, Graphics, Controls,
Forms,
5. Dialogs, StdCtrls;
6. type
7. TForm12 = class(TForm)
8. Memo1: TMemo;
9. private
10. { Private declarations ... ... { Public ... ... ... var
15. Form12: TForm12;
16. implementation
17. {$R *.dfm}
18. end.
1. unit Unit13;
2. interface
3. uses
4. Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
5. Dialogs, DB, ... ... Buttons, Grids, DBGrids, ... DBCtrls, Mask;
7. type
8. TForm13 = class(TForm)
9. Table1: TTable;
10. DataSource1: TDataSource;
11. Panel1: TPanel;
12. BitBtn1: TBitBtn;
13. Panel2: ... Label1: ... Label2: ... Label3: ... Label4: ... Label5: TLabel;
19. DBEdit1: TDBEdit;
20. DBEdit2: TDBEdit;
21. DBEdit3: TDBEdit;
22. DBEdit4: ... DBEdit5: ... ... TDBNavigator;
25. private
26. { Private declarations }
27. public
28. { Public declarations ... ... ... Form13: ... ... {$R ... end.
ҚОСЫМША Ә
Ә 1
Ә 2
Ә 3
Ә4
Ә 5
Ә 6
Ә 7
Ә 8
Ә 9
Ә 10
Ә11
Ә 12
Ә 13
Ә 14
Ә15
Ә16
Ә 17
Ә 18
Ә ... ... ...

Пән: Информатика
Жұмыс түрі: Дипломдық жұмыс
Көлемі: 25 бет
Бұл жұмыстың бағасы: 1 300 теңге









Ұқсас жұмыстар
Тақырыб Бет саны
"Кітапхана" деректер базасы (Delphi тілінде)14 бет
1941-1945 жылдардағы ұлы отан соғысы жайлы15 бет
60-жылдардың екінші жартысында қазақстан дамуында болған өзгерістер36 бет
Access - деректер базасы13 бет
Access мәліметтер қоймасымен жұмыс істеу15 бет
Access –те жұмыс істеу29 бет
Access-тегі мәліметтер базасы19 бет
AutoCAD25 бет
Borland Delphі ортасының интерфейсі28 бет
Delphi16 бет


Исходниктер
Пәндер
Көмек / Помощь
Арайлым
Біз міндетті түрде жауап береміз!
Мы обязательно ответим!
Жіберу / Отправить


Зарабатывайте вместе с нами

Рахмет!
Хабарлама жіберілді. / Сообщение отправлено.

Сіз үшін аптасына 5 күн жұмыс істейміз.
Жұмыс уақыты 09:00 - 18:00

Мы работаем для Вас 5 дней в неделю.
Время работы 09:00 - 18:00

Email: info@stud.kz

Phone: 777 614 50 20
Жабу / Закрыть

Көмек / Помощь