Студенттердің толық тізімі




МАЗМҰНЫ
КІРІСПЕ 3
1.АНАЛИТИКАЛЫҚ ШОЛУ ЖӘНЕ МІНДЕТТЕР 5
2.ДЕРЕКТЕР ҚОРЫНЫҢ ЖОБАЛАУ КЕЗЕҢДЕРІ 6
2.1. Реляциондық үлгі құру 6
3.АҚПАРАТПЕН ҚАМТАМАСЫЗ ЕТУ 9
3.1 Жалпы мағлұматтар 9
3.2 Функционалдық тағайындалуы 9
3.3 Delphi 7.0 ортасы 9
4.ПРОГРАММАЛЫҚ ҚАМТАМАСЫЗДАНДЫРУ 10
4.1 Кіріс мәліметтер 11
4.2 Шығыс мәліметтер 19
ҚОРЫТЫНДЫ 25
ПАЙДАЛАНЫЛҒАН ӘДЕБИЕТТЕР ТІЗІМІ 26
ҚОСЫМША 27
КІРІСПЕ
Ғылыми прогресс - білімнің жоғарылауымен және ақпарат көлемінің
Автоматтандыру – техникалық құрал-жабдықтарды, сондай-ақ энергияны, материалды және
Онда:
1) технологиялық, энергетикалық, көліктік, тұрмыстық-өндірістік процестер;
2) Күрделі агрегаттарды, кемелерді, ғарыш кемелерін, өндірістік құрылыстар
3) Цехты, мекемені, сондай-ақ әскери құрамалар мен бөлімшелерді
4) Ғылыми-зерттеулер, медициналық және техникалық диагностикалау сапасын жақсарту,
Жалпы автоматтандыру - адамды материалдар, ақпараттарды жеткізу, өңдеу,
Автоматтандырудын арқасында адамдар үлкен фирмалардағы тауарларды, мекемелердегі құжаттарды,
Автоматтандырудың мақсаты - еңбек өнімділігі мен өнім сапасын
Автоматтандыру – ғылыми-техникалық прогрестің басты бір бағыты.
Автоматтандырудың екінші бір пайдасы: уақытты үнемдейді және де
Автоматтандыру дәрежесі – автоматтандыру құралдарын пайдаланып орындалатын операциялар
Әр түрлі ұйымдардың табысты жұмыс жасауы үшін ақпаратты
Мәліметтер қоры - ақпаратты сақтауды және де мәліметтерге
Мәліметтер қоры деп деректердің электрондық сақтаушысын айтады. Оларға
Delphi жүйесі деректер базасын басқару жүйесі болып табылмайды,
Бірінші тарауда жүйенің сипаттамасы және ортаға қойылатын талаптар
Екінші тарау программаны дайындауға қолданылған Delphi ортасы жайлы
Үшінші тарау программадағы негізгі формалардың дайындалу барысы және
1.АНАЛИТИКАЛЫҚ ШОЛУ ЖӘНЕ МІНДЕТТЕР
Бұл курстық жұмыстың мақсаты- деректер базасын құру және
Атрибуттарға есім берілуі керек және олардың құрылымы біртекті
Жолдың реттілігі маңызды емес.
Атрибуттардың реттілігі маңызды емес.
Қайталанатын жолдары болмауы тиіс.
Сонымен қатар біз SQL-тілін қолдануымыз керек. Бір маңызды
Деканаттың жұмысы студенттер туралы автоматтандырылған анықтаманы жасау –
Деканат жұмысын автоматтандырудағы біздің мақсатымыз - өте
2.ДЕРЕКТЕР ҚОРЫНЫҢ ЖОБАЛАУ КЕЗЕҢДЕРІ
Деректер қорында белгілі – бір пәндік облыс туралы
«Dekanat» деректер қорының үлгілерін құру.
2.1. Реляциондық үлгі құру
Қазіргі уақытта мәліметтер қорында реляциондық технология қолданылады.Ол мәліметтердің
Реляционды схемалар
Концептуалды схема
3.АҚПАРАТПЕН ҚАМТАМАСЫЗ ЕТУ
3.1 Жалпы мағлұматтар
Бұл программа Delphi тілінде жазылған. Программаны орындау
3.2 Функционалдық тағайындалуы
Бұл жобаның мақсаты біз секілді бастаушы программистер үшін
3.3 Delphi 7.0 ортасы
Delphi 7.0 ортасы - ДҚБЖ ( деректер
4.ПРОГРАММАЛЫҚ ҚАМТАМАСЫЗДАНДЫРУ
Осы курстық жұмыста мен әрбір топтың студенттері жөнінде
1.Database Desktop – ты ашып, File – New
QBE Query Визуалды сұраныстарды құру және оларды файлға
SQL File SQL-де сұраныстар жасау және оларды файлға
Table Жаңа кесте құру.
Table алғаннан кейін бізге мынадай сұхбат терезесі
4.1 Кіріс мәліметтер
Жоғарыдағы кестеде программаны іске қосудың жалпы кестесі көрсетілген.
Құрылып жатқан кестенің әрбір өрісіне бір жазба сәйкес
Әр өріске ең алдымен ат (Field Name) беріледі.
Validity Checks - бұл қасиет кестенің
1.2-кесте
Required Field Бұл идентикаторда әрбір жазбада керекті жолдар
Minimum мәннің минимумы. Бұл қасиетті сандық өріске берген
Maximum Мәннің максимумы. Бұл қасиетті сандық өріске берген
Default Бұл қасиетті сандық және логикалық өрістерге, ал
Picture Енгізілетін мәннің түрін көрсетуге болады. Мысалы, телефон
Assist Бұл батырма Picture түрін құруға көмектесетін диалогтық
Кесте қасиетін беру
“+”-Autoincerement, 1 мөлшерге өсіп отыратын ұзын бүтін сан.
“A”-Alpa, жолдық өріс.
“S”-Short, қысқа сандар тізбегі.
“D”-Date, Мезгілді көрсетеді.
“L”-Logical, логикалық өріс.
“I”-Long integer, ұзын сандар тізбегі.
Енді төмендегі терезеге назар аударсақ, одан біз кестедегі
Secondary Index – бұл бөлім ары қарай жұмыс
Жаңа индекс құру үшін Define- анықтау батырмасын басу
Referential Integrity – бұл бөлім әртүрлі кестелердің арасында
Fields панелінен керек деген өрісті таңдап аламыз. Стрелкасы
Кіріс мәліметтеріне өзіміз құрған 3 кестелерді аламыз:
1-кесте: Анкета (Id студента , ФИО, год рождения,
2-кесте: Предметы(ФИО, Id студента и предметы)
3-кесте: Студенты мех-мата (ФИО, Id студента, год рождения,
Байланыстар:
“Анкета” кестесімен “Предметы” және “Студенты мех-мата”
АНКЕТА КЕСТЕСІ
Предметы кестесі
Студенты мех-мата кестесі
Шақыру және жүктеу
BDE Administrator – да мәліметтер қоры драйверлерін және
Delphi қолданбасы деректер базасына қатынауды BDE арқылы жүзеге
BDE Administrator программасы түрлі типтегі BDE мәліметтер қорының
Деректер базасымен жұмыс, ережеге сай, бір қолданушылық режимде
Бұл программа терезесі екі беттен тұрады:
Databases-мәліметтер қоры және Configuration- конфигурация. Сол жақ панельде
4.2 Шығыс мәліметтер
Біздің курстық жұмыс бойынша форма саны 8, яғни
Алғашқы жобаның мәндерін орындау үшін бірнеше қосымшалар енгіземіз.
Барлық орналастырған формамызды бір –бірімен байлаыстырамыз. Ол қасиетер
Form2-де, жоғарыдағы суреттен байқасақ, студенттердің толық тізімі туралы
Ал үшінші формада, яғни Form3-те студенттердің жеке тізімі
Және Form8-де студенттердің жеке суреттерімен көрсетілген:
Form4-да, яғни төртінші формада студенттердің мекен-жайы, куәлік,сынақ кітапшасы
Form5-тен студенттердің семестрдегі алған бағалары туралы мәліметтер ала
Form6-да мамандық бойынша тізім көрсетілген:
6-формада барлық мамандықтардың тізімі берілген. SQL –дің көмегімен
Бұл құрылған барлық формалардағы мәліметтерді сұрыптауға болатындығын айта
Жалпы мәліметтер базасының негізгі мақсаты – көптеген ақпараттарды
Осы курстық жұмысты жасау арқылы, мен көптеген ақпарат
ҚОРЫТЫНДЫ
Қорыта айтар болсақ, жоғарғы оқу орындарының жұмысын жеңілдету
Осы курстық жұмыстың тапсырмасы-қандай да бір деканаттың жұмысын
Бұл курстық жұмыстың студентке берген пайдасы көп болды.
ПАЙДАЛАНЫЛҒАН ӘДЕБИЕТТЕР ТІЗІМІ
Уэйт М., Прата С., Мартин Д. Язык СИ.
С.В.Федотова. Москва: “ Создание Windows – приложений в
Фаронов В.В. Москва, изд.” Нолидж ”: “ Работа
Архангельский А.Я. “ Программирование на Delphi - 7
Гофман В.Э, Хоманенко А.Д. “ Delphi - 6
Иванова Т.С, Ничушкина Т.Н, Пугачев Е.К. “ Объектно
Им.Н.Э.Баумана, 2003.
Фаронов В.В. “Delphi - 6” Учебный курс –
ҚОСЫМША
НЕГІЗГІ ФОРМА:
ДЕКАНАТ
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Menus, StdCtrls, ExtCtrls;
type
TForm1 = class(TForm)
MainMenu1: TMainMenu;
Dekanat1: TMenuItem;
studentterdintizimi1: TMenuItem;
jeketizimi1: TMenuItem;
mamandykboiynwatizim1: TMenuItem;
Anketa1: TMenuItem;
Studenttinanketasy1: TMenuItem;
Sabaktary1: TMenuItem;
semestirdenalganbagalary1: TMenuItem;
wygu1: TMenuItem;
Image1: TImage;
Label1: TLabel;
N121: TMenuItem;
N1: TMenuItem;
procedure jeketizimi1Click(Sender: TObject);
procedure studentterdintizimi1Click(Sender: TObject);
procedure wygu1Click(Sender: TObject);
procedure Studenttinanketasy1Click(Sender: TObject);
procedure semestirdenalganbagalary1Click(Sender: TObject);
procedure mamandykboiynwatizim1Click(Sender: TObject);
procedure N121Click(Sender: TObject);
procedure N1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses Unit3, Unit2, Unit4, Unit5, Unit6, Unit8, Unit7;
{$R *.dfm}
procedure TForm1.jeketizimi1Click(Sender: TObject);
begin
Form1.Visible:=False;//Студенттердің жеке тізімі
Form3.Visible:=True;
end;
procedure TForm1.studentterdintizimi1Click(Sender: TObject);
begin
Form1.Visible:=False;//Студенттердің толық тізімі
Form2.Visible:=True;
end;
procedure TForm1.wygu1Click(Sender: TObject);
begin
Form1.Visible:=False;//Ақпарат
Form7.Visible:=True;
end;
procedure TForm1.Studenttinanketasy1Click(Sender: TObject);
begin
Form1.Visible:=False;// Студенттердің анкетасы
Form4.Visible:=True;
end;
procedure TForm1.semestirdenalganbagalary1Click(Sender: TObject);
begin
Form1.Visible:=False;//Семестрден алған бағалары
Form5.Visible:=True;
end;
procedure TForm1.mamandykboiynwatizim1Click(Sender: TObject);
begin
Form1.Visible:=False;//Мамандық бойынша тізім
Form6.Visible:=True;
end;
procedure TForm1.N121Click(Sender: TObject);
begin
form8.show;//Студенттің жеке тізімі
end;
procedure TForm1.N1Click(Sender: TObject);
begin
Close;//шығу коды
end;
end.
Студенттердің толық тізімі:
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Grids, DBGrids, DB, DBTables, ExtCtrls, DBCtrls,
CustomizeDlg;
type
TForm2 = class(TForm)
DBGrid1: TDBGrid;
DataSource1: TDataSource;
Table1: TTable;
DBNavigator1: TDBNavigator;
Edit1: TEdit;
Button2: TButton;
Query1: TQuery;
Image1: TImage;
CustomizeDlg1: TCustomizeDlg;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Edit1Change(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form2: TForm2;
implementation
uses Unit1, Unit13;
{$R *.dfm}
procedure TForm2.Button1Click(Sender: TObject);
begin
Form1.Visible:=True;//Кері қайту коды
Form2.Visible:=False;
end;
procedure TForm2.Button2Click(Sender: TObject);
begin
if not table1.locate('Fio', edit1.Text, [locaseinsensitive, lopartialkey])
then showmessage('tabylmady');//Аты-жөні бойынша іздеу коды
end;
procedure TForm2.Edit1Change(Sender: TObject);
begin
end;
end.
Жеке тізім:
unit Unit3;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, DBTables, Grids, DBGrids, StdCtrls, ExtCtrls, DBCtrls,
type
TForm3 = class(TForm)
DBGrid1: TDBGrid;
DataSource1: TDataSource;
Table1: TTable;
Table2: TTable;
DBGrid2: TDBGrid;
DataSource2: TDataSource;
Button1: TButton;
Query1: TQuery;
DBNavigator1: TDBNavigator;
Image1: TImage;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form3: TForm3;
implementation
uses Unit1;
{$R *.dfm}
procedure TForm3.Button1Click(Sender: TObject);
begin
Form1.Visible:=True;//кері қайту коды
Form3.Visible:=False;
end;
end.
Студентдің анкетасы:
unit Unit4;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, DBTables, Grids, DBGrids, ExtCtrls, DBCtrls,
type
TForm4 = class(TForm)
DataSource1: TDataSource;
DBGrid1: TDBGrid;
Table1: TTable;
Button1: TButton;
DBNavigator1: TDBNavigator;
Button2: TButton;
Edit1: TEdit;
PopupMenu1: TPopupMenu;
Query1: TQuery;
Query2: TQuery;
Image1: TImage;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Edit1Change(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form4: TForm4;
implementation
uses Unit1;
{$R *.dfm}
procedure TForm4.Button1Click(Sender: TObject);
begin
Form1.Visible:=True;
Form4.Visible:=False;//кері қайту коды
end;
procedure TForm4.Button2Click(Sender: TObject);
begin
if not table1.locate('Sot.tel', edit1.Text, [locaseinsensitive, lopartialkey])
then showmessage('tabylmady');//ұялы-телефон арқылы іздеу коды
end;
procedure TForm4.Edit1Change(Sender: TObject);
begin
end;
end.
Семестрден алған бағалары:
unit Unit5;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, DBTables, Grids, DBGrids, StdCtrls, ExtCtrls, DBCtrls;
type
TForm5 = class(TForm)
Button1: TButton;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
Table1: TTable;
Query1: TQuery;
DBNavigator1: TDBNavigator;
Image1: TImage;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form5: TForm5;
implementation
uses Unit1;
{$R *.dfm}
procedure TForm5.Button1Click(Sender: TObject);
begin
Form1.Visible:=True;
Form5.Visible:=False;//кері қайту
end;
end.
Мамандық бойынша тізім:
unit Unit6;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, DBTables, Grids, DBGrids, ExtCtrls, DBCtrls,
type
TForm6 = class(TForm)
DBGrid1: TDBGrid;
Table1: TTable;
DataSource1: TDataSource;
Edit1: TEdit;
Button1: TButton;
Button2: TButton;
Query1: TQuery;
DBNavigator1: TDBNavigator;
Image1: TImage;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form6: TForm6;
implementation
uses Unit1;
{$R *.dfm}
procedure TForm6.Button1Click(Sender: TObject);
begin
if not table1.locate('Fio', edit1.Text, [locaseinsensitive, lopartialkey])
then showmessage('tabylmady');//Аты-жөнімен іздеу коды
end;
procedure TForm6.Button2Click(Sender: TObject);
begin
Form1.Visible:=True;//кері қайту коды
Form6.Visible:=False;
end;
end.
Ақпарат:
unit Unit7;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, jpeg, ExtCtrls, StdCtrls;
type
TForm7 = class(TForm)
Image1: TImage;
StaticText1: TStaticText;
StaticText2: TStaticText;
StaticText3: TStaticText;
StaticText4: TStaticText;
StaticText5: TStaticText;
StaticText6: TStaticText;
procedure Image1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form7: TForm7;
implementation
{$R *.dfm}
procedure TForm7.Image1Click(Sender: TObject);
begin
end;
end.
Студенттердің жеке тізімі:
unit Unit8;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, DBCtrls, StdCtrls, Mask, ExtDlgs, jpeg;
type
TForm8 = class(TForm)
DBEdit1: TDBEdit;
DBEdit2: TDBEdit;
DBEdit3: TDBEdit;
DBNavigator1: TDBNavigator;
DBImage1: TDBImage;
OpenPictureDialog1: TOpenPictureDialog;
Button1: TButton;
DBEdit4: TDBEdit;
DBEdit5: TDBEdit;
DBEdit6: TDBEdit;
DBEdit7: TDBEdit;
Button2: TButton;
Button3: TButton;
Button4: TButton;
Button5: TButton;
Button6: TButton;
Button7: TButton;
Button8: TButton;
Image1: TImage;
procedure Button1Click(Sender: TObject);
procedure DBImage1Click(Sender: TObject);
procedure DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form8: TForm8;
implementation
uses Unit4;
{$R *.dfm}
procedure TForm8.Button1Click(Sender: TObject);
begin
if openpicturedialog1.Execute then
dbimage1.Picture.LoadFromFile(openpicturedialog1.FileName);
end;//суретті қою коды
procedure TForm8.DBImage1Click(Sender: TObject);
begin
end;
procedure TForm8.DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);
begin
end;
end.
Деканат
Жексен Жаннұр Бижанова Салтанат Ис-09-3а
ФИО
ID. студента
Год рождения
Студенты мех-мата
Курс
Специалность
Отделения
Мат. анализ
Физика
ФИО
Физкультура
ID. студента
Предметы
История Казахстана
Алгебра
Иностранный
Алгоритм
Информатика
Русский
ФИО
Семейное положене
Год рождения
Анкета
Специальность
Сотовый телефон
Курс
Адресс
Отделения
Тип обучения
Студенты мех-мата
ФИО
ID. студента
Год рождения
Специалность
Курс
Отделения
Анкета
ID. студента
ФИО
Год рождения
Специальность
Курс
Отделения
Тип обучения
Адресс
Сотовый телефон
Семейное положене
Предметы
ФИО
ID. студента
Алгебра
Алгоритм
Русский
Информатика
Иностранный
История Казахстана
Физкультура
Физика
Мат. анализ




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

Dekanat деректер қорының үлгілерін құру
Интерактивтік әдістерді қолданып оқыту
Студенттер мен күресшілердің дене дайындығының функционалды мүмкіндіктері
Студенттердің өз бетімен жұмыс жасау арқылы шығармашылық қабілетін арттыру
Өндірістік оқыту әдістері
Халықаралық жария құқығы пәні бойынша студенттердің өзіндік жұмысын орындауына арналған әдістемелік нұсқау
Реферат құрылымы
Пәндерді оқыту барысында студенттердің өзіндік жұмыстарын ұйымдастыру
Ғылыми таным мен шығармашылықтың әдістемелік негіздері
Машинажасау мамандығының білім алушыларына Машинажасау мамандығына кіріспе пәнінен студенттердің өзіндік жұмыстарын орындауға арналған әдістемелік нұсқаулар