Delphi ортасында жасалған Еңбектің электрондық биржасы: мәліметтер базасы мен функционалдық сипаттамасы
АЖО Еңбектің электрондық биржасы
Мазмұны
КІРІСПЕ .....................................................................................................
1 Теориялық бөлім .....................................................................................
1.1 Еңбектің электронды биржасы........................................................
1.2 DELPHI ортасында жұмыс...............................................................
2 Программаның баяндалуы ...................................................................
2.1 Жалпы мағлұматтар........................................................................
2.2 Функционалдық тағайындалуы......................................................
2.3 Логикалық құрылымның баяндалуы .............................................
2.4 Шақыру және жүктеу.......................................................................
2.5 Қажетті техникалық жабдықтар......................................................
2.6 Кіріс мәліметтер................................................................................
2.7 Шығыс мәліметтер............................................................................
3 Бақылау мысалдарын баяндау ..............................................................
ҚОРЫТЫНДЫ........................................................................................ .. Қолданылған әдебиеттер ..........................................................................
Қосымша А ................................................................................................
Қосымша Ә..................................................................................................
КІРІСПЕ
Әр түрлі ұйымдардың табысты жұмыс жасауы
Мәліметтер базасы деп деректердің электрондық сақтаушысын
Мәліметтер базасы – ақпаратты сақтауды және
қайшылықсыз
артықсыз
тұтас
болуы керек.
Мәліметтер базасын басқару жүйесі деректер базасын
DELPHI жүйесі деректер базасын басқару жүйесі
Көпқолданбалы МББЖ ақпараттық жүйе құруға мүмкіндік
InterBase және т.б жатады.
DELPHI-ді кәдімгі МББЖ деп айтуға, оның
Біздің практикалық жұмыс “Еңбектің электрондық биржасы”
1 Теориялық бөлім
1.1 Еңбектің электронды биржасы
Сіздің ваканциялардың соңсыз тізімін қарастырып, компьютер
Кез-келген еңбек биржасы сайтына кіру үшін
Кей сайттарда тест тапсыру қажет болады.
Интернет көмегімен жұмыс іздеушілер үшін сайттар
Серверді құру. Бұл бөлімде сервер жұмысының
қандай хабарландыру іздеу керек немесе белгілі
NEW индикаторын қай хабарландырулар мен категорияларға
хабарландыруларды шығаратын бет көлемі.
Категория бойынша жұмыс іздеу. Сервермен жұмыс
Жазылу. Жаңа хабарландыруларды қайта-қайта серверге кіріп
Хабарландыру беру мен тіркелу. Мұнда сіз
Сайттар бұдан да басқа көптеген бөлімдерді,
1.2 DELPHI ортасында жұмыс
Мәліметтер базасын ұйымдастыру
Мәліметтер базасы кейбір қолданбалы ақпараттық жүйеде
иерархиялық
желілік
реляциялық
объекті-бағытталған
Иерархиялық модельде деректер ағаштәріздес (иерархиялық) құрылым
Желілік модельде деректер ерікті граф түрінде
Объекті-бағытталған модельде мәліметтер базасының жазбасы объект
BDE Administrator
DELPHI қолданбасы деректер базасына қатынауды BDE
Жергілікті деректер базасы және онымен жұмыс
1.2- сурет. Дербес сәулет
Деректер базасымен жұмыс, ережеге сай, бірқолданушылық
STANDART типті драйверлерді тек Paradox, dBASE,
Жергілікті деректер базасына қатынау үшін 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
Dependent Tables – бұл бөлім Referential
Барлық керекті құрылымдық мәліметтер кестеге енгізілгеннен
Paradox форматының кестелері
Delphi – дің өзіндік кестелік форматы
Paradox кестесі деректер базасын құруға және
Оның негізгі артықшылықтарын атап өтейік
деректердің тұтастығын
әртүрлі типті деректерді ұсынуға арналған өрістік
енгізілген деректерді тексеруді
кестенің парольдық қорғанысын
қамтамасыз етеді .
Кесте 1.5 - Paradox7 кестесінің өрістік
Тип
Alpha
Number
Money
Short
Longinteger
BCD
Date
Time
Timestampt
Memo
Formatted
қатар құрамында форматталған текст болады.
Graphic
OLE
Logical
Autoincrement
Binary
Bytes
Ескерту:
Database Desktop программалық ортасында жұмыс істегенде
Paradox кестесінде өріс аты әріптен басталып,
Paradox кестесінің кемшілігі болып, кестелік деректерді
Paradox кестесінің файлдарының келесі кеңейтінділері бар
DB – деректі кесте
MB – BLOB-деректер
PX – негізгі индекс
XG* және YG* – екінші индекстер
VAL – деректердің және сілтемелік тұтастықты
TV және FAM – Database Desktop
Delphi-дің өзіндік деректер базасының кестелік форматы
аспаптық құрал
компоненттер
Аспаптық құралдарға арнайы программалар мен пакеттер
Компоненттер, деректер базасымен операция жасайтын қолданбаларды
Компоненттер парағы
Деректер базасының қолданбасын құруда қолданылатын компоненттерді
Деректер базасымен жұмыс істегенде қолданылатын компоненттер
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
2 Программаның баяндалуы
2.1 Жалпы мағлұматтар
Қарастырылып отырған мәліметтер базасы Delphi 7
2.2 Функционалдық тағайындалуы
Мәліметтер базасының көмегімен қолданушы мәліметтерге қатынаудың
2.3 Логикалық құрылымның баяндалуы
Логикалық құрылымның баяндалуы Қосымша Ә-де көрсетілген
1) Негізгі меню
2)Кестелер арасындағы байланыстарды құру
3)Физ. лицо кестесі
4)Специальность кестесі
5)Юрид. лицо кестесі
6)Резюме документі
7)Вакансия документі
8)Авторлар туралы мағлұмат
9)Жұмыс берушілер туралы есеп беру
10)Жұмыс ізденушілер туралы есеп беру
2.4 Шақыру және жүктеу
Мәліметтер базасын Delphi-де ашу үшін Пуск|Программы|Borland
2.5 Қажетті техникалық жабдықтар
МБ жасауда Pentium 2660| 512 Mb|
2.6 Кіріс мәліметтер
Мәліметтер базасындағы мәліметтер толығымен кестеде көрсетілген.
2.7 Шығыс мәліметтер
МБ қолдана отырып, екі документ жасадым.
3 Бақылау мысалдарын баяндау
Негізгі менюдағы «Работа с БД» ішіндегі
Келесі «Документы» менюінің ішіне екі документ
«Статистика» менюіне отчеттарды жасадым. Отчеттарды жасау
«Выход» менюына Delphi –дан шығу
ҚОРЫТЫНДЫ
Қорыта айтсақ, қазіргі кезде DELPHI құралының
DELPHI қолданушы үшін мәліметтер базасын жасауда
Бұл жұмысты интернетке тіркеп, жұмыс іздеушілер
ҚОЛДАНЫЛҒАН ӘДЕБИЕТТЕР ТІЗІМІ
1. “Вакансия” және
2. В.Гофман, А.Хомоненко Работа
Издательство «БХВ – Петербург», Санкт –
3. А.М. Епанешников , В.А.
Издательство «ДИАЛОГ – МИФИ», Москва 2000
4. А.Я. Архангельский Програмирование в
Издательство «Бином», Москва 2004 г.
5. Электронный учебник по
6. “rambler.ru” және “google.ru” сайттары.
ҚОСЫМША А
1-сурет
2-сурет
3-сурет
4-сурет
5-сурет
6-сурет
7-сурет
8-сурет
9-сурет
10-сурет
11-сурет
12-сурет
13-сурет
14-сурет
15-сурет
16-сурет
17-сурет
18-сурет
19-сурет
ҚОСЫМША Ә
1) unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Dialogs, Menus,unit2,unit3,unit4,unit5,unit6,unit7,unit8,unit9,unit10;
type
TForm1 = class(TForm)
MainMenu1: TMainMenu;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N4: TMenuItem;
N5: TMenuItem;
N6: TMenuItem;
N7: TMenuItem;
N8: TMenuItem;
N9: TMenuItem;
N10: TMenuItem;
N11: TMenuItem;
N12: TMenuItem;
N21: TMenuItem;
N13: TMenuItem;
procedure N6Click(Sender: TObject);
procedure N7Click(Sender: TObject);
procedure N8Click(Sender: TObject);
procedure N9Click(Sender: TObject);
procedure N10Click(Sender: TObject);
procedure N11Click(Sender: TObject);
procedure N12Click(Sender: TObject);
procedure N21Click(Sender: TObject);
procedure N13Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.N6Click(Sender: TObject);
begin
Form3.Show;
end;
procedure TForm1.N7Click(Sender: TObject);
begin
Form4.Show;
end;
procedure TForm1.N8Click(Sender: TObject);
begin
Form5.Show;
end;
procedure TForm1.N9Click(Sender: TObject);
begin
Form8.Show;
end;
procedure TForm1.N10Click(Sender: TObject);
begin
form7.Show;
end;
procedure TForm1.N11Click(Sender: TObject);
begin
Form6.Show;
end;
procedure TForm1.N12Click(Sender: TObject);
begin
form9.Show;
end;
procedure TForm1.N21Click(Sender: TObject);
begin
form10.Show;
end;
procedure TForm1.N13Click(Sender: TObject);
begin
If MessageDlg('Вы действительно хотите выйти?',
mtConfirmation,[mbYes,mbNo,mbCancel],0)=mrYes
Then form1.close ;
end;
end.
2) unit Unit2;
interface
uses
SysUtils, Classes, DB, DBTables;
type
TDataModule2 = class(TDataModule)
Database1: TDatabase;
Table1: TTable;
Table2: TTable;
Table3: TTable;
DataSource1: TDataSource;
DataSource2: TDataSource;
DataSource3: TDataSource;
Query1: TQuery;
DataSource4: TDataSource;
Query2: TQuery;
DataSource5: TDataSource;
private
{ Private declarations }
public
{ Public declarations }
end;
var
DataModule2: TDataModule2;
implementation
{$R *.dfm}
end.
3) unit Unit3;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Dialogs,unit2, Grids, DBGrids, StdCtrls, Buttons;
type
TForm3 = class(TForm)
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
BitBtn3: TBitBtn;
BitBtn4: TBitBtn;
BitBtn5: TBitBtn;
DBGrid1: TDBGrid;
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
procedure BitBtn3Click(Sender: TObject);
procedure BitBtn4Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form3: TForm3;
implementation
{$R *.dfm}
procedure TForm3.BitBtn1Click(Sender: TObject);
begin
datamodule2.Table1.Append;
end;
procedure TForm3.BitBtn2Click(Sender: TObject);
begin
datamodule2.Table1.Post;
end;
procedure TForm3.BitBtn3Click(Sender: TObject);
begin
datamodule2.Table1.Delete;
end;
procedure TForm3.BitBtn4Click(Sender: TObject);
begin
datamodule2.Table1.Edit;
end;
end.
4) unit Unit4;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Dialogs,unit2, Grids, DBGrids, StdCtrls, Buttons;
type
TForm4 = class(TForm)
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
BitBtn3: TBitBtn;
BitBtn4: TBitBtn;
BitBtn5: TBitBtn;
DBGrid1: TDBGrid;
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
procedure BitBtn3Click(Sender: TObject);
procedure BitBtn4Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form4: TForm4;
implementation
{$R *.dfm}
procedure TForm4.BitBtn1Click(Sender: TObject);
begin
Datamodule2.Table2.Append;
end;
procedure TForm4.BitBtn2Click(Sender: TObject);
begin
datamodule2.Table2.Delete;
end;
procedure TForm4.BitBtn3Click(Sender: TObject);
begin
datamodule2.Table2.Post;
end;
procedure TForm4.BitBtn4Click(Sender: TObject);
begin
datamodule2.Table2.Edit;
end;
end.
5) unit Unit5;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Dialogs,unit2, Grids, DBGrids, StdCtrls, Buttons;
type
TForm5 = class(TForm)
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
BitBtn3: TBitBtn;
BitBtn4: TBitBtn;
BitBtn5: TBitBtn;
DBGrid1: TDBGrid;
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
procedure BitBtn3Click(Sender: TObject);
procedure BitBtn4Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form5: TForm5;
implementation
{$R *.dfm}
procedure TForm5.BitBtn1Click(Sender: TObject);
begin
datamodule2.Table3.Append;
end;
procedure TForm5.BitBtn2Click(Sender: TObject);
begin
datamodule2.Table3.Delete;
end;
procedure TForm5.BitBtn3Click(Sender: TObject);
begin
datamodule2.Table3.Post;
end;
procedure TForm5.BitBtn4Click(Sender: TObject);
begin
datamodule2.Table3.Edit;
end;
end.
6) unit Unit6;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Dialogs,unit2, StdCtrls, Buttons, jpeg, ExtCtrls;
type
TForm6 = class(TForm)
Label1: TLabel;
Label2: TLabel;
Image1: TImage;
Image2: TImage;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
BitBtn1: TBitBtn;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form6: TForm6;
implementation
{$R *.dfm}
end.
7) unit Unit7;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Dialogs,unit2, ExtCtrls, DBCtrls, StdCtrls, Mask, Buttons;
type
TForm7 = class(TForm)
BitBtn1: TBitBtn;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
DBEdit1: TDBEdit;
DBEdit2: TDBEdit;
DBEdit3: TDBEdit;
DBEdit4: TDBEdit;
DBEdit5: TDBEdit;
DBNavigator1: TDBNavigator;
Label6: TLabel;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form7: TForm7;
implementation
{$R *.dfm}
end.
8) unit Unit8;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Dialogs,unit2, StdCtrls, Mask, DBCtrls, ExtCtrls, Buttons;
type
TForm8 = class(TForm)
BitBtn1: TBitBtn;
DBNavigator1: TDBNavigator;
DBEdit1: TDBEdit;
DBEdit2: TDBEdit;
DBEdit3: TDBEdit;
DBEdit4: TDBEdit;
DBEdit5: TDBEdit;
Label1: TLabel;
DBEdit6: TDBEdit;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Label6: TLabel;
Label7: TLabel;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form8: TForm8;
implementation
{$R *.dfm}
end.
9) unit Unit9;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Dialogs,unit2, RpCon, RpConDS, RpConBDE, RpDefine, RpRave,
DBGrids, StdCtrls, Buttons;
type
TForm9 = class(TForm)
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
DBGrid1: TDBGrid;
RvProject1: TRvProject;
RvQueryConnection1: TRvQueryConnection;
procedure BitBtn2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form9: TForm9;
implementation
{$R *.dfm}
procedure TForm9.BitBtn2Click(Sender: TObject);
begin
Rvproject1.Execute;
end;
end.
10) unit Unit10;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Dialogs,unit2, RpCon, RpConDS, RpConBDE, RpDefine, RpRave,
DBGrids, StdCtrls, Buttons;
type
TForm10 = class(TForm)
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
DBGrid1: TDBGrid;
RvProject2: TRvProject;
RvQueryConnection2: TRvQueryConnection;
procedure BitBtn2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form10: TForm10;
implementation
{$R *.dfm}
procedure TForm10.BitBtn2Click(Sender: TObject);
begin
Rvproject2.Execute;
end;
end.
1
BDE
қолданба
Деректер базасы
Пікірлер жүктелуде…