Деректер базасы

Мазмұны
КІРІСПЕ . . . . . . .
1 Есептің қойылымы . . . . .
2 Есептің алгоритмі . . . . .
3 Теориялық бөлім . . . . .
3.1 Мәліметтер базасын ұйымдастыру . . . .
3.2 BDE Administrator . . . . .
3.3 Мәліметтер базасының кестесін құру . . .
3.4 Кестенің қасиетін беру . . . .
3.5 Paradox форматының кестелері . . . .
3.6 Компоненттер парағы . . . . .
4 Программаның баяндалуы . . . . .
4.1 Жалпы мағлұматтар . . . . .
4.2 Функционалдық тағайындалуы . . . . .
4.3 Логикалық құрылымның баяндалуы . . . .
4.4 Шақыру және жүктеу . . . .
4.5 Қажетті техникалық жабдықтар . . . .
4.6 Кіріс мәліметтер. . . . . .
4.7 Шығыс мәліметтер . . . . .
5 Бақылау мысалдарын баяндау . . . .
Қорытынды . . . . . . .
Қосымша А . . . . . .
Қосымша Б . . . . . .
КІРІСПЕ
Әртүрлі ұйымдардың табысты жұмыс жасауы үшін ақпаратты жүйенің
Мәліметтер базасы деп, деректердің электрондық сақтаушысын айтады. Оларға
Мәліметтер базасы – ақпаратты сақтауды және де мәліметтерге
қайшылықсыз
артықсыз
тұтас
болуы керек.
Мәліметтер базасын басқару жүйесі деректер базасын құруға, толтыруға,
DELPHI жүйесі деректер базасын басқару жүйесі болып табылмайды,
Локальді МББЖ барлық бөліктері қолданушы компьютерінің деректер базасында
Тораптық МББЖ-ге файл-серверлік, клиент-серверлік, бөлінген МББЖ-лар жатады. Осы
Көпқолданбалы МББЖ ақпараттық жүйе құруға мүмкіндік береді. Көпқолданбалы
InterBase және т.б жатады.
DELPHI-ді кәдімгі МББЖ деп айтуға, оның өзінің кестелік
Бұны бірақ та жетіспеушілігі деп те айтуға болмайды,
1 Есептің қойылымы
Бұл курстық жұмыстың мақсаты − деректер базасын құру
2 Есептің алгоритмі
1.BDE Administrator – ды ашып, біздің мәліметтер базасына
2.Деректер базасын құру үшін ең алдымен Database Desktop
3.Содан кейін Delphi – ге кіріп, кестелер және
4.Delphi – де кестелерді байланыстыру үшін DataModule –
5.Әр бір кестеге формаларды жасаймыз, проектте сақтаймыз.
6.Кестені және SQL тілін пайдаланып, құжаттар мен есеп
7.Жаңа формаларға инструкцины және автор туралы мәліметтерді енгіземіз.
8.Барлық жасалған формаларды проектің ішіне сақтаймыз.
3 Теориялық бөлім
Мәліметтер базасын ұйымдастыру
Мәліметтер базасы кейбір қолданбалы ақпараттық жүйеде қолданылатын деректерді
иерархиялық
желілік
реляциялық
объекті-бағытталған
Иерархиялық модельде деректер ағаштәріздес (иерархиялық) құрылым түрінде беріледі.
Желілік модельде деректер ерікті граф түрінде ұйымдастырылады. Желілік
Объекті-бағытталған модельде мәліметтер базасының жазбасы объект түрінде беріледі.
BDE Administrator
DELPHI қолданбасы деректер базасына қатынауды BDE ( Borland
Жергілікті деректер базасы және онымен жұмыс істейтін қолданба
Сурет 1.1. Дербес сәулет
Деректер базасымен жұмыс, ережеге сай, бірқолданушылық режимде жұмыс
STANDART типті драйверлерді тек Paradox, dBASE, FoxPro кестелері
Жергілікті деректер базасына қатынау үшін BDE деректер
Мәліметтер базасының кестесін құру
Деректер базасын құрайтын кестелер қатты дискідегі каталогта тұрады.
Өріс мүмкін болатын типтің деректерін қамтиды. Кестенің негізін
өріс сипаты
кілт
индекс
өрістің мәтініне шек қою
кестелер арсындағы біртұтастықты сақтау
парлольдер
кіреді. Кестені құрғанда кестенің аты және құрылымы беріледі.
Ал енді мәліметтер базасымен жұмыс жасамас бұрын, біз
Жаңа кестені құру келесі команда бойынша іске асады:
ОК-ді басып, біз осы форматты аламыз. Экранда келесідей
Сурет1. Кестенің құрылымын құру суреті
Құрылып жатқан кестенің әрбір өрісіне бір жазба сәйкес
Кестенің қасиетін беру
Validity Checks – бұл қасиет кестенің мәндерінің дұрыстығын
2 – кесте Validity Checks қасиеттері.
Required Field
Бұл индекаторда әрбір жазбада керекті жолдар белгілену керек.
Minimum Мәннің минимумы. Бұл қасиет сандық өріске берілу
Maximum Мәннің максимумы. Бұл қасиет сандық өріске берілу
Default Бұл қасиетті сандық және логикалық өрістерге, ал
Picture Енгізілетін мәннің түрін корсетуге болады. Мысалы, телефон
Assist Бұл батырма Picture түрін құруға көмектесетін диалогтық
Table Lookup – бұл бөлім берлген кестенің өрісін
Secondary Index – бұл бөлім ары қарай жұмыс
Жаңа индекс құру үшін Define – анықтау батырмасын
Index Options радиобатырма панелі келесідей қасиеттерді құруға мүмкіндік
Unique Бұл опция екінші индекс болатын өрісті болдырмайды,
Descending Бұл опция кестені кему бойынша реттейді.
Case Sensitive Бұл опция енгізілген символдардың регистріне назар
Maintained Егер бұл опция тұрса, онда кестеде өзгерістерден
Индексі таңдалғаннан кейін, оның индексін беретін терезе ашылады.
Referential Integrity – бұл бөлім әртүрлі кестелердің арасында
Update rule – радиобатырмалар тобы егер бас кестеде
Strict Referential индекаторын орнатқанда Paradox – тың алғашқы
Барлық операциялар біткеннен кейін құрылған сілтеме атын беру
Password Security бөлімі Paradox – та құрылған кестелерге
Current Password (ағымдағы пароль) терезесінде сіз парольді көрсетесіз
All Барлық операциялар қабылданады, кестені өшіру, құрылымын өзгерту,
Insert & Delete Кестедегі жазбаларға барлық операциялар қолданылады
Data Entry Мәліметтерді редактерлеуге және жазбаларды қоюға болады,
Update Кестені көруге және кілті жоқ өрістерді өзгертуге
Read Only Тек кестені көруге болады.
Table Language – бұл бөлім BDE Administrator арқылы
Dependent Tables – бұл бөлім Referential Integrity сілтемелі
Барлық керекті құрылымдық мәліметтер кестеге енгізілгеннен кейін Save
Paradox форматының кестелері
Delphi – дің өзіндік кестелік форматы жоқ, бірақ
Paradox кестесі деректер базасын құруға және онымен жұмыс
Оның негізгі артықшылықтарын атап өтейік :
деректердің тұтастығын
әртүрлі типті деректерді ұсынуға арналған өрістік типті
енгізілген деректерді тексеруді
кестенің парольдық қорғанысын
қамтамасыз етеді .
кестесінде Paradox 7 кестесінің өрістік типі тізімі берілген
Тип
Alpha
Number
Money
Short
Longinteger
BCD
Date
Time
Timestampt
Memo
Formatted
қатар құрамында форматталған текст болады.
Graphic
OLE
Logical
Autoincrement +
Binary
Bytes
Кесте1.2. Paradox7 кестесінің өрістік типі тізімі
Ескерту !
Database Desktop программалық ортасында жұмыс істегенде Graphic,
Memo және OLE өрістік типінің мәні көрсетілмейді.
Paradox кестесінде өріс аты әріптен басталып, әріптер мен
Paradox кестесінің кемшілігі болып, кестелік деректерді сақтайтын типтік
Paradox кестесінің файлдарының келесі кеңейтінділері бар :
DB – деректі кесте
MB – BLOB-деректер
PX – негізгі индекс
XG* және YG* – екінші индекстер
VAL – деректердің және сілтемелік тұтастықты тексеретін параметрлер
TV және FAM – Database Desktop программасында кестені
Delphi-дің өзіндік деректер базасының кестелік форматы болмаса да,
аспаптық құрал
компоненттер
Аспаптық құралдарға арнайы программалар мен пакеттер жатады. Олар
Компоненттер, деректер базасымен операция жасайтын қолданбаларды құруға арналған.
Компоненттер парағы
Деректер базасының қолданбасын құруда қолданылатын компоненттерді қарастырайық.
Деректер базасымен жұмыс істегенде қолданылатын компоненттер Data Access,
Data Access парағында деректерге қатынауды ұйымдастыратын визуалды емес
DataSource – деректердің басы
Table – ДБ кестесіне негізделген деректер жинағы
Query – SQL – сұранысқа негізделген деректер жинағы
StoredProc – серверде сақталатын процедураны шақыру
DataBase – ДБ қосылу
Session – ДБ жұмысының ағымды сеансы
BatchMove – топ жазбалармен операцияларды орындау
Update – деректер жиынтығын модификациялау
NestedTable - қойылған кесте
Data Controls парағында деректерді басқаратын визуалды компоненттер орналасады:
DBGrid – кесте
DBNavigator – навигациялық интерфейс
DBText – жазба
DBEdit – бірқатарлы редактор
DBMemo – көпқатарлы редактор
DBImage – графиктік көрініс
DBListBox – қарапайым тізім
DBComboBox – комбинацияланған тізім
DBCheckBox – тәуелсіз ауыстырғыш
DBRadioGroup – тәуелді ауыстырғыш топтары
DBLookupListBox – басқа өріс деректерінің қарапайым тізімі
DBLookupComboBox – басқа өріс деректерінің комбинацияланған тізімі
DBRichEdit – толық функционалды тестілік редактор
DBCtrlGrid – модификацияланған кесте
DBChart – диаграммма
Midas парағында қашық деректер базасын басқаратын визуалды
ClientDataSet – клиенттік деректер жинағы
DCOMConnection – көпқолданбалы режимде қашық сервермен қосылу
SocketConnection - Windows сокеті арқылы қашық
DataSetProvider – деректер жиынының провайдері
SimpleObjectBroker – қарапайым объект брокері
WebConnection – Web-сервермен қосылу
CorbaConnection – Corba-клиенттің қосылуы
Decision Cube парағында шешімді қабылдайтын жүйені қалыптастыратын компоненттер
DecisionCube – көпшекті деректер кубы
DecisionQuery – көпшекті деректерді қамтитын жиынтық
DecisionSource – көпшекті деректердің бастамасы
DecisionPivot – көпшекті деректердің көпөлшемді проекциясы
DecisionGrid – көпшекті деректердің кестесі
DecisionGraph – көпөлшемді деректердің графиктік ұсынысы
Rave парағында есеп берудің ретіне арналған визуалды компоненттер
RvProject – проектің басты компоненті, Rave – пен
RvSystem – уневирсалды компонент, есеп беруді қарауды және
RvNDRWriter – есеп беруді арнайы форматтағы файлға жазады
RvCustomConnection – мәліметтері жоқ есеп берумен байланыстырады
RvDataSetConnection – мәліметтермен байланыстырады
RvTableConnection – Table компаненті бар мәліметтермен байланыстырады
TRvQueryConnection – Query компоненті бар мәліметтермен байланыстырады
RvRenderPreview–RvNDRWriter арқылы құрылған файлдағы мәліметтерді экранда мүмкіндік береді
RvRenderPrinter–RvNDRWriter арқылы құрылған файлдағы мәліметтерді баспа құрылғысына жібереді
RvRenderPDF – есеп беруді PDF форматына ауыстырады
RvRenderRTF – есеп беруді RTF форматына ауыстырады
RvRenderHTML – есеп беруді HTML форматына ауыстырады
RvRenderText – есеп беруді мәтіндік файлға ауыстырады
InterBase парағында InterBase серверімен жұмыс істеуге арналған компоненттер
IBTable – Table дерегінің жинағы
IBQuery – Query дерегінің жинағы
IBStoredProc– InterBase серверінде сақталатын процедураны
IBDatabase – деректер базасымен қосылу
IBTransaction – транзакция
IBUpdateSQL – деректер жиынтығын модификациялау
IBDataSet – деректердің бастамасы
IBSQL – SQL- сұранысты орындау
IBDatabaseInfo – деректер базасы туралы ақпарат
IBSQLMonitor – SQL- сұраныс орындалуының мониторы
IBEvents – сервер оқиғасы
InterBase парағының көп компоненттері Data Access компоненттеріне ұқсас
4 Программаның баяндалуы
Жалпы мағлұматтар
Қарастырылып отырған мәліметтер базасы Delphi 7 ортасында құрылды.
Функционалдық тағайындалуы
Мәліметтер базасының көмегімен қолданушы мәліметтерге қатынаудың жолын қысқартады.
Логикалық құрылымның баяндалуы
1) Unit 1
1) unit-ке Unit1 деген ат беріледі
2) интерфейсін құру
3) модульдерді баяндау
4) типін беру
5) бірінші форманы ашу
6) Компоненттер қою
7)Менюларды қою
8) Процедуралар баяндамасы
9) декларациясы
10) айнымалылар бөлімі
11) Form1 құру және unit термен байланыс
12) Form3-ға ашу процедурасы
13) Form4-ға ашу процедурасы
14) Form5-ға ашу процедурасы
15) Form6-ға ашу процедурасы
16) Form7-ға ашу процедурасы
17) Form8-ға ашу процедурасы
18) Form1-ға жабу процедурасы
19) Form9-ға ашу процедурасы
20) Form10-ға ашу процедурасы
21) Form
2) Unit2
1) Unit2 атын беру
2) интерфейсін құру
3) модульдерді таңдау
4) типтерін беру
5) Дикларациялар
6) айнымалылар бөлімі
7) Модуль куру
8) соңы
3) Unit3
1) Unit3 атын беру
2) интерфейсін құру
3) модульдерді таңдау
4) Компонентерді белгілеу
5) процедураларды баяндау
6) Диклорациялар
7) Айнымалылар бөлімі
8) Form3 құру
9) «Редактировать» батырмасын кою
10) «Добавить» батырмасын кою
11) «Сохранить» батырмасын кою
12) «Удалить» батырмасын кою
13) соңы
4) Unit4
1) Unit4 атын беру
2) интерфейсін құру
3) модульдерді таңдау
4) типтерін беру
5) процедураларды баяндау
6) Дикларациялар
7) Айнымалылар бөлімі
8) Form5 құру және unit термен байланыс
9) «Добавить» батырмасын кою
10) Соны
5) Unit5
1) Unit5 атын беру
2) интерфейсін құру
3) модульдерді таңдау
4) типтерін беру
5) процедураларды баяндау
6) Дикларациялар
7) айнымалылар бөлімі
8) Форма5 құру Unit-термен байланыс
9) «Добавить» батырмасын кою
10) соңы
6) Unit6
1) Unit6 атын беру
2) интерфейсін құру
3) модульдерді таңдау
4) типтерін беру
5) Дикларациялар
6) айнымалылар бөлімі
7) Форма6 құру Unit-термен байланыс
8) соңы
7) Unit7
1) Unit7 атын беру
2) интерфейсін құру
3) модульдерді таңдау
4) типтерін беру
5) процедураларды баяндау
6) Дикларациялар
7) Айнымалылар бөлімі
8) Форма7 құру Unit-термен байланыс
9) «Опубликовать отчет» батырмасын кою
10) соңы
8) Unit8
1) Unit8 атын беру
2) интерфейсін құру
3) модульдерді таңдау
4) типтерін беру
5) Дикларациялар
6) айнымалылар бөлімі
7) Форма8 құру Unit-термен байланыс
8) «Опубликовать отчет» батырмасын кою
9) соңы
9) Unit9
1) Unit9 атын беру
2) интерфейсін құру
3) модульдерді таңдау
4) типтерін беру
5) Дикларациялар
6) айнымалылар бөлімі
7) Форма9 құру Unit-термен байланыс
8) соңы
10) Unit10
1) Unit10 атын беру
2) интерфейсін құру
3) модульдерді таңдау
4) типтерін беру
5) Дикларациялар
6) айнымалылар бөлімі
7) форма 11құру
8) соңы
11) Unit11
1) Unit11 атын беру
2) интерфейсін құру
3) модульдерді таңдау
4) типтерін беру
5) Дикларациялар
6) айнымалылар бөлімі
7) форма 11 құру
8) соңы
Шақыру және жүктеу
Мәліметтер базасын Delphi-де ашу үшін Пуск|Программы|Borland Delphi7| Delphi7
Қажетті техникалық жабдықтар
МБ жасауда Pentium 2660| 512 Mb| 80 Gb|
Кіріс мәліметтер
Мәліметтер базасындағы мәліметтер толығымен кестеде көрсетілген. Ол үшін
Шығыс мәліметтер
МБ қолдана отырып, екі документ жасадым. Оларды Қосымша
Бақылау мысалдарын баяндау
Алдымен, осы курстық жобаны сақтайтын бір папка құрып
DBD-да байланыстырған кестелерімді, Delphi-де қайта байланыстырдым. Ол File|New|Others|DataModule
Data Access парағындағы DataSource,яғни деректердің басын тастадым.
Негізгі менюдағы Rabota s BD ішіндегі үш кетеге
Келесі Documenty менюінің ішіне екі документ жасадым. Біреуі
Statistica менюіне отчеттарды жасадым. Отчеттарды жасау барысында отчет
O Programme менюына инструкция Form9 (Сурет 16) және
Vyhod менюына Delphi –дан шығу терезесін құрдым
ҚОРЫТЫНДЫ
Қорыта келгенде, осы курстық жұмысты жаза отырып мен
Қазіргі кезде DELPHI құралының мүмкіншіліктері күннен – күнге
Қорыта келсек, әрбір программист үшін DELPHI құралын білген
ҚОЛДАНЫЛҒАН ӘДЕБИЕТТЕР ТІЗІМІ
1. В.В.Фаронов DELPHI 5 . Руководство
Издательство «Нолидж», Москва 2001 г.
2. В.Гофман, А.Хомоненко Работа с базами
Издательство «БХВ – Петербург», Санкт – Петербург 2000
3. А.М. Епанешников , В.А. Епанешников DELPHI
Издательство «ДИАЛОГ – МИФИ», Москва 2000 г.
4. А.Я. Архангельский Програмирование в Delphi 7.
Издательство «Бином», Москва 2004 г.
5. Электронный учебник по Delphi 6.
ҚОСЫМША А
1-сурет
2-сурет
ҚОСЫМША А
(жалгасы)
3-сурет
4-сурет
ҚОСЫМША А
(жалгасы)
5-сурет
6-сурет
ҚОСЫМША А
(жалгасы)
7-сурет
8-сурет
ҚОСЫМША А
(жалгасы)
9-сурет
10-сурет
ҚОСЫМША А
(жалгасы)
11-сурет
12-сурет
ҚОСЫМША А
(жалгасы)
13-сурет
14-сурет
ҚОСЫМША Б
1) unit Unit1;
2) interface
3)uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
4) type
5)TForm1 = class(TForm)
6) MainMenu1: TMainMenu;
7) N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N4: TMenuItem;
N5: TMenuItem;
N6: TMenuItem;
N7: TMenuItem;
N8: TMenuItem;
N9: TMenuItem;
N10: TMenuItem;
N11: TMenuItem;
N12: TMenuItem;
N13: TMenuItem;
N14: TMenuItem;
Delphi1: TMenuItem;
Windows1: TMenuItem;
8) procedure N2Click(Sender: TObject);
procedure N3Click(Sender: TObject);
procedure N4Click(Sender: TObject);
procedure N6Click(Sender: TObject);
procedure N9Click(Sender: TObject);
procedure N8Click(Sender: TObject);
procedure Delphi1Click(Sender: TObject);
procedure N11Click(Sender: TObject);
procedure N12Click(Sender: TObject);
procedure N13Click(Sender: TObject);
9) private
{ Private declarations }
public
{ Public declarations }
end;
ҚОСЫМША Б
(жалгасы)
10) var
Form1: TForm1;
11) implementation
{$R *.dfm}
12) procedure TForm1.N2Click(Sender: TObject);
begin
form3.Show;
end;
13) procedure TForm1.N3Click(Sender: TObject);
begin
form4.Show;
end;
14) procedure TForm1.N4Click(Sender: TObject);
begin
form5.Show;
end;
15) procedure TForm1.N6Click(Sender: TObject);
begin
form6.Show;
end;
16) procedure TForm1.N9Click(Sender: TObject);
begin
form7.Show;
end;
17) procedure TForm1.N8Click(Sender: TObject);
begin
form8.Show;
end;
18) procedure TForm1.Delphi1Click(Sender: TObject);
begin
form1.Close;
end;
ҚОСЫМША Б
(жалгасы)
19) procedure TForm1.N11Click(Sender: TObject);
begin
form9.Show;
end;
20) procedure TForm1.N12Click(Sender: TObject);
begin
form10.Show;
end;
21) procedure TForm1.N13Click(Sender: TObject);
begin
form11.Show;
end;
22) end.
1) unit Unit2;
2) interface
3)uses
SysUtils, Classes, DB, DBTables;
4) type
TDataModule2 = class(TDataModule)
Database1: TDatabase;
Table1: TTable;
DataSource1: TDataSource;
Table2: TTable;
DataSource2: TDataSource;
Table3: TTable;
DataSource3: TDataSource;
Query1: TQuery;
DataSource4: TDataSource;
Query2: TQuery;
DataSource5: TDataSource;
Query3: TQuery;
DataSource6: TDataSource;
5) private
{ Private declarations }
public
ҚОСЫМША Б
(жалгасы)
{ Public declarations }
end;
6) var
DataModule2: TDataModule2;
7) implementation
{$R *.dfm}
8) end.
1) unit Unit3;
2) interface
3) uses Windows, Messages, SysUtils, Variants, Classes,
4) type
TForm3 = class(TForm)
Panel1: TPanel;
Panel2: TPanel;
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
BitBtn3: TBitBtn;
BitBtn4: TBitBtn;
BitBtn5: TBitBtn;
DBNavigator1: TDBNavigator;
DBGrid1: TDBGrid;
5) procedure BitBtn2Click(Sender: TObject);
procedure BitBtn3Click(Sender: TObject);
procedure BitBtn4Click(Sender: TObject);
procedure BitBtn5Click(Sender: TObject);
6) private
{ Private declarations }
public
{ Public declarations }
end;
7) var
Form3: TForm3;
ҚОСЫМША Б
(жалгасы)
8) implementation
{$R *.dfm}
9) procedure TForm3.BitBtn2Click(Sender: TObject);
begin
datamodule2.Table3.Edit;
end;
10) procedure TForm3.BitBtn3Click(Sender: TObject);
begin
Datamodule2.Table3.Append;
end;
11) procedure TForm3.BitBtn4Click(Sender: TObject);
begin
Datamodule2.Table3.Post;
end;
12) procedure TForm3.BitBtn5Click(Sender: TObject);
begin
Datamodule2.Table3.delete;
end;
13) end.
1) unit Unit4;
2) interface
3) uses Windows, Messages, SysUtils, Variants, Classes, Graphics,
4)type
TForm4 = class(TForm)
Panel1: TPanel;
Panel2: TPanel;
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
DBGrid1: TDBGrid;
Image1: TImage;
5) procedure BitBtn2Click(Sender: TObject);
6)private
{ Private declarations }
public
ҚОСЫМША Б
(жалгасы)
{ Public declarations }
end;
7) var
Form4: TForm4;
8) implementation
{$R *.dfm}
9) procedure TForm4.BitBtn2Click(Sender: TObject);
begin
Datamodule2.Table2.Edit;
end;
10) end.
1) unit Unit5;
2) interface
3) uses Windows, Messages, SysUtils, Variants, Classes,
4) type
TForm5 = class(TForm)
Panel1: TPanel;
Panel2: TPanel;
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
DBGrid1: TDBGrid;
5) procedure BitBtn1Click(Sender: TObject);
6) private
{ Private declarations }
public
{ Public declarations }
end;
7) var
Form5: TForm5;
8) implementation
{$R *.dfm}
9) procedure TForm5.BitBtn1Click(Sender: TObject);
ҚОСЫМША Б
(жалгасы)
begin
datamodule2.Table1.edit;
end;
10) end.
1) unit Unit6;
2) interface
3) uses Windows, Messages, SysUtils, Variants, Classes, Graphics,
4) type
TForm6 = class(TForm)
Panel1: TPanel;
Panel2: TPanel;
DBNavigator1: TDBNavigator;
BitBtn1: TBitBtn;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
DBEdit1: TDBEdit;
DBEdit2: TDBEdit;
DBEdit3: TDBEdit;
DBEdit4: TDBEdit;
5) private
{ Private declarations }
public
{ Public declarations }
end;
6) var
Form6: TForm6;
7)implementation
{$R *.dfm}
8) end.
ҚОСЫМША Б
(жалгасы)
1) unit Unit7;
2) interface
3) uses Windows, Messages, SysUtils, Variants, Classes, Graphics,
4) type
TForm7 = class(TForm)
Panel1: TPanel;
Panel2: TPanel;
BitBtn1: TBitBtn;
DBGrid1: TDBGrid;
RvQueryConnection1: TRvQueryConnection;
RvProject1: TRvProject;
5) procedure BitBtn1Click(Sender: TObject);
6) private
{ Private declarations }
public
{ Public declarations }
end;
7) var
Form7: TForm7;
8)implementation
{$R *.dfm}
9) procedure TForm7.BitBtn1Click(Sender: TObject);
begin
RvProject1.Execute;
end;
10)end.
1) unit Unit8;
2) interface
3) uses Windows, Messages, SysUtils, Variants, Classes, Graphics,
4)type
ҚОСЫМША Б
(жалгасы)
TForm8 = class(TForm)
Panel1: TPanel;
Panel2: TPanel;
BitBtn1: TBitBtn;
DBGrid1: TDBGrid;
RvQueryConnection1: TRvQueryConnection;
RvProject1: TRvProject;
procedure BitBtn1Click(Sender: TObject);
5) private
{ Private declarations }
public
{ Public declarations }
end;
6) var
Form8: TForm8;
7) implementation
{$R *.dfm}
8) procedure TForm8.BitBtn1Click(Sender: TObject);
begin
RvProject1.Execute;
end;
9) end.
1) unit Unit9;
2) interface
3) uses Windows, Messages, SysUtils, Variants, Classes, Graphics,
4) type
TForm9 = class(TForm)
Memo1: TMemo;
5) private
{ Private declarations }
public
{ Public declarations }
end;
ҚОСЫМША Б
(жалгасы)
6) var
Form9: TForm9;
7) implementation
{$R *.dfm}
8) end.
1) unit Unit10;
2)interface
3) uses Windows, Messages, SysUtils, Variants, Classes, Graphics,
4) type
TForm10 = class(TForm)
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
5) private
{ Private declarations }
public
{ Public declarations }
end;
6) var
Form10: TForm10;
7) implementation
{$R *.dfm}
8) end.
1)unit Unit11;
2) interface
3)uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
4) type
TForm11 = class(TForm)
ҚОСЫМША Б
(жалгасы)
DBGrid1: TDBGrid;
Image1: TImage;
5) private
{ Private declarations }
public
{ Public declarations }
end;
6) var
Form11: TForm11;
7) implementation
{$R *.dfm}
8) end.
1
BDE
қолданба
Деректер базасы




Ұқсас жұмыстар

---

Деректер базасы

---

Мәліметтер қорын басқару жүйесін пайдалану салалары

---

Деректер базасының сервері

---

Деректер базасы теориясының даму тенденцияларын зерттеу

---

Кітапхана деректер базасы - Delphi тілінде

---

Деректер базасының түрлері

---

Кәсіби ортада деректерді жинау, талдау құрылымдау деректер базасын әзірлеу

---

MS Access деректер қорында кесте құру

---

Негізгі орта білім беру деңгейінің 7-9-сыныптарына арналған География пәнінен жаңартылған мазмұндағы үлгілік оқу бағдарламасы

---

Delphi программалау ортасы. Мәліметтер базасы

---