Курсовой проект

22541. Разработка базы данных "Гостиничный комплекс"
Компьютеры, программирование

Гостиница дает возможность покупателям забронировать номера, ведет бюллетень по покупателям: туристам, командировочным. Для того, чтобы продать номер клиенту, необходимы следующие данные: фамилия, имя, отчество, дата рождения, паспортные данные, гражданство, адрес места жительства, время заселения и время отъезда, сумма к оплате за предоставленные услуги. При регистрации клиента, как покупателя, клиент должен предъявить паспортные данные или документы удостоверяющие личность, и оплатить стоимость номера. Гостиница хранит информацию о номерах в гостинице, которые заняты клиентами. В случае, если бронирование номеров гостиницы переносится на более позднее время или дату, изменения должны быть внесены в бюллетень покупателей, зарегистрированных в этот номер гостиницы, сообщены покупателю и должна быть предоплата за бронирование номера. Базой данных может пользоваться администратор и покупатель номера, только у каждого разные права доступа к ней: администратор просматривает базу, вносит изменения, а покупатель может только просматривать. Следовательно, база данных должна быть защищена от несанкционированных действий злоумышленников паролем на вход.
22542. Разработка базы данных "Компьютерные игры"
Компьютеры, программирование

Отчеты это информация, оформленная в соответствии с необходимыми спецификациями. Они являются особой формой представления данных. Отчет позволяет использовать и распространять полученную информацию из БД, выводить ее на печать. При оформлении отчетов можно использовать различные элементы управления (графики, диаграммы, рисунки, фон…) Отчеты являются эффективным средством для распечатки информации регулярного использования. Создавать отчеты можно, используя мастер или конструктор. Автоотчет позволяет быстро создавать более простые отчеты. Он бывает двух видов: в столбец и ленточный. Ленточный отчет размещает записи в отдельную строку, а поля в отдельные столбцы. Его удобно применять при большом числе записей и малом количестве полей. Отчет в столбец удобен в том случае, когда мало записей и много полей. Когда необходимо создавать сложные, многоуровневые отчеты, нельзя использовать автоотчет. В данном случае чаще всего применяется мастер. В отчетах также можно создавать поля с итоговыми вычислениями. При этом могут использоваться различные функции и построитель выражений. Как правило, для формирования отчета создают запрос, в котором собирают данные из разных таблиц, с включением вычисляемых полей, группировкой, условиями отбора. Далее по общим правилам MS Access, на базе такого запроса проектирует отчет.
22543. Разработка базы данных "Магазин товаров"
Компьютеры, программирование

Объективно все это было вызвано несовершенством технологии программирования. Прежде всего стихийно использовалась разработка «снизу-вверх» - подход, при котором вначале проектировали и реализовывали сравнительно простые подпрограммы, из которых затем пытались построить сложную программу. В отсутствии четких моделей описания подпрограмм и методов их проектирования создание каждой подпрограммы превращалось в непростую задачу, интерфейсы подпрограмм получались сложными, и при сборке программного продукта выявлялось большое количество ошибок согласования. Исправление таких ошибок, как правило, требовало серьезного изменения уже разработанных подпрограмм, что еще более осложняло ситуацию, так как при этом в программу часто вносились новые ошибки, которые также необходимо было исправлять... В конечном итоге процесс тестирования и отладки программ занимал более 80 % времени разработки, если вообще когда-нибудь заканчивался. На повестке дня самым серьезным образом стоял вопрос разработки технологии создания сложных программных продуктов, снижающей вероятность ошибок проектирования.
22544. Разработка базы данных "Учащиеся"
Компьютеры, программирование

Если проследить историю человечества, то можно заметить, что на протяжении развития цивилизации на земле, человек что-то придумывает чтобы облегчить и украсить свою жизнь на земле. И вот уже к концу ХХ в. научно-технический прогресс, набравший головокружительную скорость, послужил причиной появления такого чуда современности как компьютер и компьютерные технологии. Изобретение компьютеров послужило переломным моментом в развитии многих отраслей промышленности, на значительный объём повысило мощь и эффективность военной техники, внесло множество прогрессивных изменений в работу средств массовой информации, систем связи, качественно изменило принцип работы банков и административных учреждений. С каждым днем происходит усовершенствование компьютерных технологий, что приводит к повышению работоспособности всего компьютеризированного мира в целом. Вслед за развитием компьютерных технологий, идет бурное развитие программного обеспечения.
22545. Разработка базы данных «Магазин бытовой техники “Электрон” средствами СУБД MS Access»
Компьютеры, программирование

Система управления базами данных Microsoft Access является одним из самых популярных приложений в семействе настольных СУБД. Все версии Access имеют в своем арсенале средства, значительно упрощающие ввод и обработку данных, поиск данных и предоставление информации в виде таблиц, графиков и отчетов. Начиная с версии Access 2000, появились также Web-страницы доступа к данным, которые пользователь может просматривать с помощью программы Internet Explorer. Помимо этого, Access позволяет использовать электронные таблицы и таблицы из других настольных и серверных баз данных для хранения информации, необходимой приложению. Присоединив внешние таблицы, пользователь Access будет работать с базами данных в этих таблицах так, как если бы это были таблицы Access. При этом и другие пользователи могут продолжать работать с этими данными в той среде, в которой они были созданы. Основу базы данных составляют хранящиеся в ней данные. Кроме того, в базе данных Access есть другие важные компоненты, которые называются объектами. Объектами Access являются:
22546. Разработка базы данных в Microsoft Access
Компьютеры, программирование

Наименование поляТип данныхПримечание123Т_ВакансииКод вакансииЧисловойКлючКод работодателяЧисловойДлинное целоеДата размещенияДата/времяКраткий формат датыДолжностьТекстовый40Состояние вакансииТекстовый255ОплатаДенежныйДенежныйКод сотрудникаЧисловойДлинное целоеТ_Льготы№СчетчикКлючКод соискателяЧисловойДлинное целоеФИОТекстовый255Страховое свидетельствоТекстовый255ИННЧисловойДлинное целоеПаспортЧисловойДлинное целоеТ_ПросмотрыКодСчетчикКлючКод соискателяЧисловойДлинное целоеКод вакансииЧисловойДлинное целоеДата просмотраДата/времяКраткий формат датыРезультат255РаботодательКод работодателяЧисловойКлючНаименование работодателяТекстовый50Контактное лицоТекстовый255АдресТекстовый50ТелефонЧисловойДлинное целоеТ_СотрудникиКод соискателяЧисловойКлючФИОТекстовый255ДолжностьТекстовый255Номер телефонаЧисловойДлинное целоеАдресТекстовый255Т_СоискателиКод соискателяЧисловойКлючФИО соискателяТекстовый255ПаспортЧисловойДлинное целоеДата рожденияДата/времяКраткий формат датыГородТекстовый255ДолжностьТекстовый255Номер телефонаЧисловойДлинное целоеОбразованиеТекстовый255Опыт работыТекстовый255
22547. Разработка базы данных видеоматериалов
Компьютеры, программирование

База данных - это совокупность сведений о реальных объектах, процессах, событиях или явлениях, относящихся к определённой теме или задаче, организованная таким образом, чтобы обеспечить удобное представление этой совокупности, как в целом, так и любой её части. Реляционная база данных представляет собой множество взаимосвязанных таблиц, каждая из которых содержит информацию об объектах определённого типа. Каждая строка таблицы содержит данные об одном объекте (например, клиенте, автомобиле, документе), а столбцы таблицы содержат различные характеристики этих объектов - атрибуты (например, наименования и адреса клиентов, марки и цены автомобилей). Строки таблицы называются записями, все записи имеют одинаковую структуру - они состоят из полей, в которых хранятся атрибуты объекта. Каждое поле в записи содержит одну характеристику объекта и имеет строго определённый тип данных (например, текстовая строка, число, дата). Все записи имеют одни и те же поля, только в них содержатся разные значения атрибутов.
22548. Разработка базы данных для бюро находок
Компьютеры, программирование
22549. Разработка базы данных для интернет-магазина
Компьютеры, программирование

"><form action=zakaz1.php method=post>
22550. Разработка базы данных для объекта автоматизации: гомеопатическая аптека
Компьютеры, программирование
В курсовом проекте рассмотрены следующие теоретические вопросы и практические задания:
1. проведен системно-комплексный анализ выбранного объекта автоматизации
2. разработана структура пользовательского интерфейса автоматизированной системы
3. разработан функциональный аспект информационной страты объекта
4. разработана структура экранных форм пользовательского интерфейса
5. разработана концептуальная модель базы данных
6. разработан 1 уровень структурного аспекта информационной страты объекта
7. разработан 2 уровень структурного аспекта информационной страты объекта
8. разработан функционально-структурный аспект информационной страты объекта
9. проведена нормализация полученных отношений (в учебных целях до начала нормализации была введена в 1 из отношений транзитивная зависимость и во 2 отношениемножественная зависимость.) Далее было проверено методом табло и аналитическим методом отсутствие потерь при соединении отношений, разлагаемых при нормализации.
10. разработан структурно-функциональный аспект информационной страты объекта
11. проведена разработка проекта в СУБД Visual Fox Pro 6.0
22551. Разработка базы данных для оценки неполной оплаты отгруженной продукции
Компьютеры, программирование

При оценке оплаты необходимо обеспечить анализ оплаты по заданному пользователем изделию и получить список всех изделий, не полностью оплаченных заказчиком. В первом случае надо по запросу пользователя для задаваемого им изделия формировать отчет, содержащий сведения об оплаченной части отгрузки изделия и недоплатах по нему. Для ввода запроса пользователю в диалоге должна быть выведена экранная форма. Отчет должен выводиться на экран и принтер. Во втором случае необходимо сформировать список изделий, по которым имеется недоплата. Список должен включать изделия, по которым нет равенства количества отгруженных изделий (в ТТН) и количества оплаченных изделий (по всем ПТР, соответствующим данной ТТН). Список может содержать данные, показывающие отгрузку и оплату изделий. Список должен выводиться на экран и принтер. Расчеты в данной задаче должны производиться в натуральном выражении, в соответствии с контрольным примером. Расчеты производятся за период, в течение которого накапливалась информация. Недоплата рассчитывается как разность данных по отгрузке изделия и его оплате.
22552. Разработка базы данных для риэлтерской конторы
Компьютеры, программирование

program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}, Unit2 in 'Unit2.pas' {Form2}, Unit3 in 'Unit3.pas' {Form3}, Unit4 in 'Unit4.pas' {Form4}, Unit5 in 'Unit5.pas' {Form5}, Unit6 in 'Unit6.pas' {Form6}, Unit7 in 'Unit7.pas' {Form7}, Unit8 in 'Unit8.pas' {Form8}, Unit9 in 'Unit9.pas' {Form9}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.CreateForm(TForm2, Form2); Application.CreateForm(TForm3, Form3); Application.CreateForm(TForm4, Form4); Application.CreateForm(TForm5, Form5); Application.CreateForm(TForm6, Form6); Application.CreateForm(TForm7, Form7); Application.CreateForm(TForm8, Form8); Application.CreateForm(TForm9, Form9); Application.Run; end. --------------------------------------------------------------------- unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Label1: TLabel; Button2: TButton; Button3: TButton; Button4: TButton; Button1: TButton; Button5: TButton; Button6: TButton; Button7: TButton; Button8: TButton; Button9: TButton; Label2: TLabel; procedure Button3Click(Sender: TObject); procedure Button2Click(Sender: TObject); procedure Button6Click(Sender: TObject); procedure Button4Click(Sender: TObject); procedure Button7Click(Sender: TObject); procedure Button5Click(Sender: TObject); procedure Button1Click(Sender: TObject); procedure Button8Click(Sender: TObject); procedure Button9Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation uses Unit2, Unit3, Unit4, Unit5, Unit7, Unit6, Unit8, Unit9; {$R *.dfm} procedure TForm1.Button3Click(Sender: TObject); begin Form1.close; end; procedure TForm1.Button2Click(Sender: TObject); begin form1.Visible:=false; form2.Visible:=true; end; procedure TForm1.Button6Click(Sender: TObject); begin form1.Visible:=false; form3.Visible:=true; end; procedure TForm1.Button4Click(Sender: TObject); begin form1.Visible:=false; form4.Visible:=true; end; procedure TForm1.Button7Click(Sender: TObject); begin form1.Visible:=false; form5.Visible:=true; end; procedure TForm1.Button5Click(Sender: TObject); begin form1.Visible:=false; form7.Visible:=true; end; procedure TForm1.Button1Click(Sender: TObject); begin form1.Visible:=false; form6.Visible:=true; end; procedure TForm1.Button8Click(Sender: TObject); begin form1.Visible:=false; form8.Visible:=true; end; procedure TForm1.Button9Click(Sender: TObject); begin form1.Visible:=false; form9.Visible:=true; end; end. --------------------------------------------------------------------- unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, DBTables, ExtCtrls, DBCtrls, StdCtrls, Mask; type TForm2 = class(TForm) Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; Label6: TLabel; Label11: TLabel; dbedtSNP: TDBEdit; dbedt: TDBEdit; dbedtStreet: TDBEdit; dbedtHouse: TDBEdit; dbedtApartment: TDBEdit; Button1: TButton; DBNavigator: TDBNavigator; Table1: TTable; DataSource1: TDataSource; Label7: TLabel; DBEdit1: TDBEdit; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form2: TForm2; implementation uses Unit1, Unit3; {$R *.dfm} procedure TForm2.Button1Click(Sender: TObject); begin form2.Visible:=false; form3.Visible:=true; end; end. --------------------------------------------------------------------- unit Unit3; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, XPMan, DBTables, DB, StdCtrls, Grids, DBGrids, DBCtrls, ExtCtrls, RpBase, RpSystem, RpRave, RpDefine, RpCon, RpConDS; type TForm3 = class(TForm) Label1: TLabel; Label3: TLabel; Panel1: TPanel; DBNavigator: TDBNavigator; DBGrid1: TDBGrid; Button1: TButton; Button2: TButton; btn1: TButton; Edit1: TEdit; Table1: TTable; DataSource1: TDataSource; qry2: TQuery; qry1: TQuery; RvDataSetConnection1: TRvDataSetConnection; RvProject1: TRvProject; RvSystem1: TRvSystem; btn3: TButton; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); procedure Edit1Change(Sender: TObject); procedure btn1Click(Sender: TObject); procedure btn3Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form3: TForm3; implementation uses Unit1; {$R *.dfm} procedure TForm3.Button1Click(Sender: TObject); begin Form3.close; end; procedure TForm3.Button2Click(Sender: TObject); begin form3.Visible:=false; form1.Visible:=true; end; procedure TForm3.Edit1Change(Sender: TObject); begin qry1.Close; qry1.SQL.Clear; qry1.SQL.Add('select * from Klients where SNP like "'+Edit1.Text+'%"'); qry1.Open; end; procedure TForm3.btn1Click(Sender: TObject); begin Form3.RvProject1.Execute; end; procedure TForm3.btn3Click(Sender: TObject); begin qry1.Close; qry1.SQL.Clear; qry1.SQL.Add('select * from Klients'); qry1.Open; end; end. --------------------------------------------------------------------- unit Unit4; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, DBCtrls, StdCtrls, Mask, DB, DBTables; type TForm4 = class(TForm) Table1: TTable; DataSource1: TDataSource; Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; Label6: TLabel; Label7: TLabel; Label8: TLabel; Label9: TLabel; dbedtSNP: TDBEdit; dbedt: TDBEdit; dbedtStreet: TDBEdit; dbedtHouse: TDBEdit; dbedtApartment: TDBEdit; Button1: TButton; DBNavigator: TDBNavigator; dbedtLogin: TDBEdit; pas: TDBEdit; DBEdit1: TDBEdit; Table2: TTable; DataSource2: TDataSource; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form4: TForm4; implementation uses Unit5; {$R *.dfm} procedure TForm4.Button1Click(Sender: TObject); begin form4.Visible:=false; form5.Visible:=true; end; end. --------------------------------------------------------------------- unit Unit5; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, XPMan, DBTables, DB, StdCtrls, Grids, DBGrids, DBCtrls, ExtCtrls, RpBase, RpSystem, RpRave, RpDefine, RpCon, RpConDS; type TForm5 = class(TForm) Label1: TLabel; Label3: TLabel; Panel1: TPanel; DBGrid1: TDBGrid; Button1: TButton; Button2: TButton; btn1: TButton; Edit1: TEdit; qry1: TQuery; RvDataSetConnection2: TRvDataSetConnection; RvProject1: TRvProject; RvSystem1: TRvSystem; btn3: TButton; DBNavigator: TDBNavigator; Table1: TTable; DataSource1: TDataSource; procedure Edit1Change(Sender: TObject); procedure Button2Click(Sender: TObject); procedure Button1Click(Sender: TObject); procedure btn1Click(Sender: TObject); procedure btn3Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form5: TForm5; implementation uses Unit1; {$R *.dfm} procedure TForm5.Edit1Change(Sender: TObject); begin qry1.Close; qry1.SQL.Clear; qry1.SQL.Add('select * from bdkvartir where Metro like "'+Edit1.Text+'%"'); qry1.Open; end; procedure TForm5.Button2Click(Sender: TObject); begin form5.Visible:=false; form1.Visible:=true; end; procedure TForm5.Button1Click(Sender: TObject); begin Form5.close; end; procedure TForm5.btn1Click(Sender: TObject); begin Form5.RvProject1.Execute; end; procedure TForm5.btn3Click(Sender: TObject); begin qry1.Close; qry1.SQL.Clear; qry1.SQL.Add('select * from bdkvartir'); qry1.Open; end; end. --------------------------------------------------------------------- unit Unit6; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, DBTables, StdCtrls, DBCtrls, Mask, Grids, DBGrids, ExtCtrls; type TForm6 = class(TForm) Label2: TLabel; Splitter1: TSplitter; Label1: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; Label6: TLabel; Label7: TLabel; Label8: TLabel; Label9: TLabel; Button1: TButton; Panel1: TPanel; DBGrid1: TDBGrid; DBEdit1: TDBEdit; DBNavigator1: TDBNavigator; DBEdit2: TDBEdit; DBEdit3: TDBEdit; DBEdit4: TDBEdit; Edit1: TEdit; Edit2: TEdit; Button4: TButton; Table1: TTable; DataSource1: TDataSource; Table2: TTable; DataSource2: TDataSource; Label10: TLabel; btn3: TButton; qry1: TQuery; procedure Button4Click(Sender: TObject); procedure Button1Click(Sender: TObject); procedure btn3Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form6: TForm6; implementation uses Unit8; {$R *.dfm} procedure TForm6.Button4Click(Sender: TObject); var a,b: real; c,d: real; begin a := StrToFloat(Edit1.Text); b := StrToFloat(Edit2.Text); c := a * b; d := (a * b) + a; Label7.Caption := FloatToStrF(c,ffCurrency,10,2); Label10.Caption := FloatToStrF(d,ffCurrency,10,2); end; procedure TForm6.Button1Click(Sender: TObject); begin form6.Visible:=false; form8.Visible:=true; end; procedure TForm6.btn3Click(Sender: TObject); begin qry1.Close; qry1.SQL.Clear; qry1.SQL.Add('select * from Service1'); qry1.Open; end; end. unit Unit7; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, DBTables, StdCtrls, DBCtrls, Mask, Grids, DBGrids, ExtCtrls; type TForm7 = class(TForm) Label2: TLabel; Splitter1: TSplitter; Label1: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; Label6: TLabel; Label7: TLabel; Label8: TLabel; Label9: TLabel; Button1: TButton; Panel1: TPanel; DBGrid1: TDBGrid; DBEdit1: TDBEdit; DBNavigator1: TDBNavigator; DBEdit2: TDBEdit; DBEdit3: TDBEdit; DBEdit4: TDBEdit; Edit1: TEdit; Edit2: TEdit; Button4: TButton; Table1: TTable; DataSource1: TDataSource; Table2: TTable; DataSource2: TDataSource; Label10: TLabel; btn3: TButton; qry1: TQuery; procedure Button4Click(Sender: TObject); procedure Button1Click(Sender: TObject); procedure btn3Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form7: TForm7; implementation uses Unit8; {$R *.dfm} procedure TForm7.Button4Click(Sender: TObject); Var a,b: real; c,d: real; begin a := StrToFloat(Edit1.Text); b := StrToFloat(Edit2.Text); c := a * b; d := (a * b) + a; Label7.Caption := FloatToStrF(c,ffCurrency,10,2); Label10.Caption := FloatToStrF(d,ffCurrency,10,2); end; procedure TForm7.Button1Click(Sender: TObject); begin form7.Visible:=false; form8.Visible:=true; end; procedure TForm7.btn3Click(Sender: TObject); begin qry1.Close; qry1.SQL.Clear; qry1.SQL.Add('select * from Buy'); qry1.Open; end; end. unit Unit8; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, XPMan, DBTables, DB, StdCtrls, ExtCtrls, DBCtrls, Mask; type TForm8 = class(TForm) Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; DBEdit1: TDBEdit; DBNavigator1: TDBNavigator; DBEdit2: TDBEdit; DBEdit3: TDBEdit; Button2: TButton; Button3: TButton; Table2: TTable; DataSource2: TDataSource; procedure Button2Click(Sender: TObject); procedure Button3Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form8: TForm8; implementation uses Unit1; {$R *.dfm} procedure TForm8.Button2Click(Sender: TObject); begin form8.Visible:=false; form1.Visible:=true; end; procedure TForm8.Button3Click(Sender: TObject); begin Form8.close; end; end. unit Unit9; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, XPMan, DBTables, DB, Grids, DBGrids, ExtCtrls, StdCtrls, DBCtrls, Mask, RpBase, RpSystem, RpRave, RpDefine, RpCon, RpConDS; type TForm9 = class(TForm) Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; DBEdit1: TDBEdit; DBNavigator1: TDBNavigator; DBEdit2: TDBEdit; DBEdit3: TDBEdit; Button2: TButton; Button3: TButton; DBEdit4: TDBEdit; Panel1: TPanel; DBGrid1: TDBGrid; Button1: TButton; Button4: TButton; Table2: TTable; DataSource2: TDataSource; Table1: TTable; DataSource1: TDataSource; qry1: TQuery; Label6: TLabel; btn3: TButton; procedure Button3Click(Sender: TObject); procedure Button2Click(Sender: TObject); procedure Button4Click(Sender: TObject); procedure Button1Click(Sender: TObject); procedure btn3Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form9: TForm9; implementation uses Unit1, Unit6, Unit7; {$R *.dfm} procedure TForm9.Button3Click(Sender: TObject); begin Form1.close; end; procedure TForm9.Button2Click(Sender: TObject); begin form9.Visible:=false; form1.Visible:=true; end; procedure TForm9.Button4Click(Sender: TObject); begin form9.Visible:=false; form6.Visible:=true; end; procedure TForm9.Button1Click(Sender: TObject); begin form9.Visible:=false; form7.Visible:=true; end; procedure TForm9.btn3Click(Sender: TObject); begin end; end.
22553. Разработка базы данных для учета работы продуктового склада
Компьютеры, программирование

База данных является организованной на машинном носителе совокупностью взаимосвязанных данных и содержит сведения о различных сущностях одной предметной области реальных объектах, процессах, событиях или явлениях. В настоящее время базы данных расцениваются как электронные хранилища информации, доступ к которым осуществляется с одного или нескольких компьютеров в зависимости от архитектуры
22554. Разработка базы данных и клиентского приложения
Компьютеры, программирование

А так же было очень интересно и удобно работать в MS Access, создавать формы, работать со справкой, просматривать и изучать книги по базам данных и в частности MS Access. Несомненно, удалось познакомиться с такой замечательной программой как Erwin, которая помогает быстрее и лучше разобраться в создании баз данных. Конечно, современные базы данных с каждым днем становятся все больше и больше, удовлетворяя потребностям пользователей, следовательно, возникает задача, как создать такие базы данных, как ими управлять.… Прочитав и разобрав эту курсовую работу можно, несомненно, получить базовые навыки в построении баз данных.
22555. Разработка базы данных и клиентской части на тему "Школа"
Компьютеры, программирование

.Создание связей: переходим на закладку «Работа с базами данных» и выбираем «Схема данных». На экране появится список таблиц. Выбираем все и нажимаем кнопку «Добавить». Располагаем таблицы согласно физической модели на полотне. Далее необходимо установить связи между таблицами. Для этого выбираем первичный ключ таблицы Prepodavateli, нажимаем левую клавишу мыши и ведем курсор до вторичного ключа в таблице Shapka - появилось окно, в котором необходимо проверить правильность установки полей для связи. Если необходимо, выбираем тип обновления и удаления. В нашем случае нет такой необходимости, нажимаем «ОК». Аналогично создаем необходимые связи между оставшимися таблицами.
22556. Разработка базы данных и прикладного программного обеспечения для автобусного парка
Компьютеры, программирование

Здесь нужно задать название сервера базы данных, название самой базы данных, а также пару логин/пароль для подключения к серверу базы данных. Задав правильные параметры и нажав на кнопку «OK» пользователь снова попадает в основное окно программы. Теперь необходимо соединиться с сервером базы данных. Для этого нужно выбрать пункт меню DB -> Connect. Если настройки были заданы верно и не возникло никаких проблем в сети, будет установлено соединение с сервером, о чём будет свидетельствовать надпись «Connected» в статусной строке и данные, отображённые на вкладках программы (Рисунок 4).
22557. Разработка базы данных кадрового учета на предприятии "ООО Магазин N2 Завьялово"
Компьютеры, программирование

Из диаграммы зависимости атрибутов для сущности Назначен На Ставку рассмотренной выше видно, что любой атрибут сущности(процент назначения, дата назначения, документ о назначении, дата освобождения, документ об освобождении, признак включения периода работы в стаж) зависит именно от пары №Сотрудника + №Ставки. Указанные атрибуты сущности не могут на прямую зависеть только от №Сотрудника или только от №Ставки, так как у сотрудника может быть несколько назначений и, следовательно, несколько дат назначений, несколько приказов о назначении на различные ставки. А для одной и той же ставки могут существовать назначения на нее различных сотрудников. И только для объединения одновременно всех полей ключа: №Сотрудника + №Ставки, существует единственный экземпляр сущности с конкретными значения не первичных атрибутов сущности. Таким образом, существует полная функциональная зависимость всех не первичных атрибутов от всех полей ключа сущности Назначен На Ставку одновременно.
22558. Разработка базы данных налоговой инспекции
Компьютеры, программирование

Модуль - совокупность описаний, инструкций и процедур, сохраненная под общим именем. В Microsoft Access существуют модули двух типов: стандартный модуль и модуль класса. Модули форм и отчетов являются модулями классов и содержат программы, являющиеся локальными для этих объектов. Процедуры из стандартного модуля, если они не описаны явно как локальные для содержащего их модуля, распознаются и могут вызываться процедурами из других модулей в той же базе данных или из адресуемых баз данных.
22559. Разработка базы данных футбольного клуба
Компьютеры, программирование

Футбольный клуб «Челси» (Chelsea Football Club) был основан в 1905 году в Лондоне. Выступает данный клуб в Английской премьер-лиге (Чемпионат Англии). ФК Челси имеет прозвище среди болельщиков Аристократы. Это прозвище произошло из-за богатого района Лондона. Тот самый район в котором живут самые обеспеченные граждане туманного Альбиона. Выступление ФК Челси в 20м веке считалось не очень ярким, и поэтому их считали середнячком в Англии. В 1955 году они в первый раз стали чемпионами Англии. В европейских кубках ФК Челси выступал редко и успех был не впечатляющий. Однако в 1971 году им удалось выиграть кубок кубков Европы после победы в кубке Англии, за год ранее. В конце 20го века аристократы выиграли ещё один кубок кубков, а после и Суперкубок Европы. Это был самый великий титул в истории клуба. Когда ФК Челси купил российский миллиардер, губернатор Чукотки Роман Абрамович, клуб приобрел множество звёздных игроков, таких как Петр Чех, Рикарду Карвалью, Клод Макелеле, Жереми и т.д. С такими игроками клуб стал одним из самых сильных в Европе. И в 2005 году выиграл свой второй чемпионский титул в Англии. За последнее время в клуб пришли не менее знаменитее игроки как Арьен Роббен, Михаэль Баллак, Андрей Шевченко, Дидье Дрогба. Эти игроки помогли завоевать третий титул чемпиона Англии. ФК Челси за последние два года выходил в полуфинал лиги чемпионов.
22560. Разработка бизнес плана издательского центра
Экономика

Â êóðñîâîé ðàáîòå áûë ðàçðàáîòàí áèçíåñ ïëàí ïå÷àòíîãî ó÷àñòêà ÐÓÏ «Èçäàòåëüñêèé öåíòð ÁÃÓ». Áûëè ïðåäëîæåíû ìàðêåòèíãîâûå ìåðîïðèÿòèÿ, íàïðàâëåííûå íà ïðèâëå÷åíèå äîïîëíèòåëüíîãî ÷èñëà çàêàç÷èêîâ, ñîñòàâëåí è îáîñíîâàí ïðîèçâîäñòâåííîé ìîùíîñòüþ ïëàí ïðîèçâîäñòâà ïðîäóêöèè ó÷àñòêà, ðàññ÷èòàíà ÷èñëåííîñòü ïðîìûøëåííî-ïðîèçâîäñòâåííîãî ïåðñîíàëà è ôîíä îïëàòû òðóäà, ñîñòàâëåíà êàëüêóëÿöèÿ ñåáåñòîèìîñòè ïðîäóêöèè, îïðåäåëåíû îñíîâíûå ýêîíîìè÷åñêèå ïîêàçàòåëè ðàáîòû ïå÷àòíîãî ó÷àñòêà. Òàêæå áûëè ïðåäëîæåíû ìåðîïðèÿòèÿ ïî ðåêîíñòðóêöèè ïå÷àòíîãî ó÷àñòêà, ïóòåì âëîæåíèÿ èíâåñòèöèé â ÎÏÔ. Â ðåçóëüòàòå äîñòèãëè óâåëè÷åíèÿ îáú¸ìà ïðîèçâîäñòâà è êîýôôèöèåíòà èíòåãðàëüíîé çàãðóçêè ïðîèçâîäñòâåííîé ìîùíîñòè, óìåíüøèëè ñåáåñòîèìîñòü åäèíèöû ïðîäóêöèè. Îòìå÷ó, ÷òî â ðåçóëüòàòå ïðîâåäåíèÿ ìåðîïðèÿòèé ïî ðåêîíñòðóêöèè ïå÷àòíîãî ó÷àñòêà íå ïðîèñõîäèëî ñîêðàùåíèå øòàòîâ, ÷òî â íûíåøíåì ýêîíîìè÷åñêîì ïîëîæåíèè ìîæíî ðàñöåíèâàòü êàê ïîëîæèòåëüíûé ñîöèàëüíûé ýôôåêò.

Blog

Курсовой проект