Информационная система "Data-центр" - Программирование, компьютеры и кибернетика курсовая работа

Информационная система "Data-центр" - Программирование, компьютеры и кибернетика курсовая работа



































Разработка информационной системы "Библиотека Дорам" в архитектуре клиент - сервер; управление реляционными базами данных (СУБД) Microsoft SQL Server. Визуальная среда программирования и технические средства. Разработка структурированного приложения.


посмотреть текст работы


скачать работу можно здесь


полная информация о работе


весь список подобных работ


Нужна помощь с учёбой? Наши эксперты готовы помочь!
Нажимая на кнопку, вы соглашаетесь с
политикой обработки персональных данных

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
ФЕДЕРАЛЬНОЕ АГЕНТСТВО ПО ОБРАЗОВАНИЮ
АНГАРСКАЯ ГОСУДАРСТВЕННАЯ ТЕХНИЧЕСКАЯ АКАДАМИЯ
КАФЕДРА “ВЫЧИСЛИТЕЛЬНЫЕ МАШИНЫ И КОМПЛЕКСЫ ”
по дисциплине «Проектирование клиент/серверных систем»
Информационная система «Data-центр»
1.1 Обоснование необходимости разработки приложения
1.2 Научно исследовательские работы
1.2.2 Выбор визуальной среды программирования
1.2.3 Механизм доступа данных к ADO
2.1 Разработка структурированного приложения
2.2 Определение структуры входных и выходных данных
2.3 Определение формы представления входных и выходных данных
3.1.1 Сценарий в Microsoft SQL Server
Целью курсовой работы является разработка информационной системы «Библиотека Дорам» в архитектуре клиент/сервер. БД «Библиотека Дорам» разрабатывается в серверной системе управления БД Microsoft SQL Server. Клиентское приложение разрабатывается в Code Gear RAD Studio механизм доступа ADO.
Microsoft SQL Server -- система управления реляционными базами данных (СУБД), разработанная корпорацией Microsoft. Основной используемый язык запросов -- Transact-SQL, создан совместно Microsoft и Sybase. Transact-SQL является реализацией стандарта ANSI/ISO по структурированному языку запросов (SQL) с расширениями. Используется для от небольших и средних по размеру баз данных до крупных баз данных масштаба предприятия, конкурирует с другими СУБД в этом сегменте рынка.
Последняя версия SQL Server -- SQL Server 2008 (кодовое название «Katmai»). Была выпущена 6 августа 2008 года.
SQL Server 2008 направлен на то, чтобы сделать управление данными самонастраивающимся, самоорганизующимся и самообслуживающимся механизмом -- для реализации этих возможностей были созданы технологии SQL Server Always On. Это позволит уменьшить до нуля время нахождения сервера в нерабочем состоянии.
В SQL Server 2008 была добавлена поддержка структурированных и частичноструктурированных данных, включая цифровые форматы для изображений, звуков, видео и других типов мультимедиа. Поддержка мультимедиа форматов внутри СУБД позволила специализированным функциям взаимодействовать с этими типами данных.
Кроме этого, были включены специализированные форматы даты и времени и пространственный (англ. Spatial) тип для пространственно зависимых данных. Для неструктурированных данных были добавлены специализированные типы, например, тип File.
Для повышения эффективности администрирования в SQL Server были включены библиотеки Declarative Management Framework, позволяющие распределять полномочия для баз данных или отдельных таблиц. Были улучшены методы компрессии данных. SQL Server Katmai поддерживает набор библиотек ADO.NET Entity Framework и средства оповещения, репликации и определения данных.
CodeGear RAD Studio 2007 - среда быстрой разработки приложений (RAD) для Microsoft Windows. CodeGear RAD Studio, ранее известный как проект Highlander, объединяет Delphi для Win32, C++Builder и новый Delphi.NET 2.0 в единую интегрированную среду. Это единственная интегрированная среда разработки (IDE), которая поддерживает быструю разработку как Windows, так и.NET-приложений для Microsoft Windows 2000, XP, и Vista. Подобная универсальность позволяет разработчикам строить Web, клиент/серверные и десктоп Windows-приложения для всех трех ОС и использовать такие приложения на любой из этих платформ.
CodeGear RAD Studio дает разработчикам гибкость в выборе операционной системы, которая наиболее полно удовлетворяет их требованиям при создании приложения для нескольких ОС Windows, включая программы для Windows Vista и Web-приложения.
Новые функции и возможности CodeGear RAD Studio 2007:
Расширенная поддержка Delphi для пользовательского интерфейса Microsoft Vista Aero, включая прикладные приложения, библиотеки визуальных компонентов (VCL) и поддержку VCL.NET для 3D эффектов и анимации пользовательского интерфейса, эффекта прозрачности, компонентов диалоговых окон для работы с файлами и задачами.
Поддержка языка Delphi для разработки в среде Microsoft.NET 2.0 (совместимо с.NET 3.0) и ASP.NET 2.0. ASP.NET представляет собой набор технологий в рамках.NET framework для создания Web-приложений и XML Web-сервисов.
Delphi для.NET имеет поддержку параметризованных типов, позволяющую разработчикам.NET применять Delphi для создания и использования классов, используя любой тип структуры данных в качестве параметров.
Blackfish SQL - сервер баз данных, полностью написанный на платформе.NET, который поддерживает SQL и обеспечивает легкое развертывание XCopy, поддержку транзакций, а также создание триггеров и хранимых процедур на языке.NET (Delphi.NET, C#, и Visual Basic.NET).
Enterprise Core Objects (ECO) IV - мощная среда для разработки на основе моделей (Model-Driven Development) для.NET 2.0. ECO позволяет разработчикам использовать визуальные диаграммы для построения объектов, а также связей и логики взаимодействия между ними, а затем автоматически создает и поддерживает инфраструктуру базы данных (с использованием Microsoft ADO.NET) и интерфейс взаимодействия данных, оставляя разработчику только заботу о бизнес-логике и внешнем виде приложения.
Обновленная архитектура доступа к базам данных dbExpress 4 с поддержкой ADO.NET 2.0. dbExpress 4 - это единое решение для доступа к базам данных для.NET и Windows с поддержкой ADO.NET, которое упрощает разработку и сопряжение десктоп и клиент/серверных приложений баз данных.
Как и платформа Windows, аппаратное обеспечение компьютеров и сеть постоянно эволюционируют, так и продукты CodeGear для Delphi и C++ также совершенствуются, чтобы дать разработчикам возможность извлечь из перемен пользу, создавая новые возможности для независимых поставщиков программного обеспечения (ISV) и создателей клиент/сервер приложений на основе баз данных.
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[TB_SPEED]') AND type in (N'U'))
[ID_SPEED] [int] IDENTITY(1,1) NOT NULL,
CONSTRAINT [PK_TB_SPEED] PRIMARY KEY CLUSTERED
)WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY]
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[TB_KLIENTS]') AND type in (N'U'))
[ID_KLIENT] [int] IDENTITY(1,1) NOT NULL,
CONSTRAINT [PK_TB_KLIENTS] PRIMARY KEY CLUSTERED
)WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY]
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[TB_PROC]') AND type in (N'U'))
[ID_PROC] [int] IDENTITY(1,1) NOT NULL,
CONSTRAINT [PK_TB_PROC] PRIMARY KEY CLUSTERED
)WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY]
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[TB_MEM]') AND type in (N'U'))
[ID_MEM] [int] IDENTITY(1,1) NOT NULL,
CONSTRAINT [PK_TB_MEM] PRIMARY KEY CLUSTERED
)WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY]
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[TB_HDD]') AND type in (N'U'))
[ID_HDD] [int] IDENTITY(1,1) NOT NULL,
CONSTRAINT [PK_TB_HDD] PRIMARY KEY CLUSTERED
)WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY]
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[TB_MASHIN]') AND type in (N'U'))
[ID_MASHIN] [int] IDENTITY(1,1) NOT NULL,
CONSTRAINT [PK_TB_MASHIN] PRIMARY KEY CLUSTERED
)WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY]
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[TB_DOGOVOR]') AND type in (N'U'))
[ID_DOGOVOR] [int] IDENTITY(1,1) NOT NULL,
CONSTRAINT [PK_TB_DOGOVOR] PRIMARY KEY CLUSTERED
)WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY]
IF NOT EXISTS (SELECT * FROM sys.views WHERE object_id = OBJECT_ID(N'[dbo].[PR_MASHIN]'))
EXEC dbo.sp_executesql @statement = N'CREATE VIEW [dbo].[PR_MASHIN]
SELECT dbo.TB_MASHIN.NAIM AS NAIM_MASH, dbo.TB_MEM.NAIM AS NAIM_MEM, dbo.TB_SPEED.NAIM AS NAIM_SPEED, dbo.TB_PROC.NAIM AS NAIM_PROC,
dbo.TB_HDD.NAIM AS NAIM_HDD, dbo.TB_MASHIN.CENA
dbo.TB_MEM ON dbo.TB_MASHIN.ID_MEM = dbo.TB_MEM.ID_MEM INNER JOIN
dbo.TB_PROC ON dbo.TB_MASHIN.ID_PROC = dbo.TB_PROC.ID_PROC INNER JOIN
dbo.TB_SPEED ON dbo.TB_MASHIN.ID_SPEED = dbo.TB_SPEED.ID_SPEED INNER JOIN
dbo.TB_HDD ON dbo.TB_MASHIN.ID_HDD = dbo.TB_HDD.ID_HDD
EXEC sys.sp_addextendedproperty @name=N'MS_DiagramPane1', @value=N'[0E232FF0-B466-11cf-A24F-00AA00A3EFFF, 1.00]
Configuration = "(H (1[40] 4[20] 2[20] 3))"
Configuration = "(H (1 [50] 4 [25] 3))"
Configuration = "(H (1 [50] 2 [25] 3))"
Configuration = "(H (4 [30] 2 [40] 3))"
Configuration = "(H (1[56] 4[18] 2))"
Or = 135',@level0type=N'SCHEMA', @level0name=N'dbo', @level1type=N'VIEW', @level1name=N'PR_MASHIN'
EXEC sys.sp_addextendedproperty @name=N'MS_DiagramPane2', @value=N'0
',@level0type=N'SCHEMA', @level0name=N'dbo', @level1type=N'VIEW', @level1name=N'PR_MASHIN'
EXEC sys.sp_addextendedproperty @name=N'MS_DiagramPaneCount', @value=2,@level0type=N'SCHEMA', @level0name=N'dbo', @level1type=N'VIEW', @level1name=N'PR_MASHIN'
IF NOT EXISTS (SELECT * FROM sys.views WHERE object_id = OBJECT_ID(N'[dbo].[PR_DOGOVOR]'))
EXEC dbo.sp_executesql @statement = N'CREATE VIEW [dbo].[PR_DOGOVOR]
SELECT dbo.TB_KLIENTS.NAIM AS NAIM_KLIENT, dbo.TB_MASHIN.NAIM AS NAIM_MASH, dbo.TB_MASHIN.CENA, dbo.TB_DOGOVOR.Date_zakl,
dbo.TB_DOGOVOR.Date_okonch, dbo.TB_DOGOVOR.Stoimost
dbo.TB_KLIENTS ON dbo.TB_DOGOVOR.ID_KLIENT = dbo.TB_KLIENTS.ID_KLIENT INNER JOIN
dbo.TB_MASHIN ON dbo.TB_DOGOVOR.ID_MASHIN = dbo.TB_MASHIN.ID_MASHIN
EXEC sys.sp_addextendedproperty @name=N'MS_DiagramPane1', @value=N'[0E232FF0-B466-11cf-A24F-00AA00A3EFFF, 1.00]
Configuration = "(H (1[40] 4[20] 2[20] 3))"
Configuration = "(H (1 [50] 4 [25] 3))"
Configuration = "(H (1 [50] 2 [25] 3))"
Configuration = "(H (4 [30] 2 [40] 3))"
Configuration = "(H (1[56] 4[18] 2))"
',@level0type=N'SCHEMA', @level0name=N'dbo', @level1type=N'VIEW', @level1name=N'PR_DOGOVOR'
EXEC sys.sp_addextendedproperty @name=N'MS_DiagramPaneCount', @value=1,@level0type=N'SCHEMA', @level0name=N'dbo', @level1type=N'VIEW', @level1name=N'PR_DOGOVOR'
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[PPoisk]') AND type in (N'P', N'PC'))
EXEC dbo.sp_executesql @statement = N'-- -- Author:
SELECT NAIM_MASH, NAIM_MEM, NAIM_SPEED, NAIM_PROC, NAIM_HDD, CENA
IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_TB_MASHIN_TB_HDD]') AND parent_object_id = OBJECT_ID(N'[dbo].[TB_MASHIN]'))
ALTER TABLE [dbo].[TB_MASHIN] WITH CHECK ADD CONSTRAINT [FK_TB_MASHIN_TB_HDD] FOREIGN KEY([ID_HDD])
REFERENCES [dbo].[TB_HDD] ([ID_HDD])
IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_TB_MASHIN_TB_MEM]') AND parent_object_id = OBJECT_ID(N'[dbo].[TB_MASHIN]'))
ALTER TABLE [dbo].[TB_MASHIN] WITH CHECK ADD CONSTRAINT [FK_TB_MASHIN_TB_MEM] FOREIGN KEY([ID_MEM])
REFERENCES [dbo].[TB_MEM] ([ID_MEM])
IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_TB_MASHIN_TB_PROC]') AND parent_object_id = OBJECT_ID(N'[dbo].[TB_MASHIN]'))
ALTER TABLE [dbo].[TB_MASHIN] WITH CHECK ADD CONSTRAINT [FK_TB_MASHIN_TB_PROC] FOREIGN KEY([ID_PROC])
REFERENCES [dbo].[TB_PROC] ([ID_PROC])
IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_TB_MASHIN_TB_SPEED]') AND parent_object_id = OBJECT_ID(N'[dbo].[TB_MASHIN]'))
ALTER TABLE [dbo].[TB_MASHIN] WITH CHECK ADD CONSTRAINT [FK_TB_MASHIN_TB_SPEED] FOREIGN KEY([ID_SPEED])
REFERENCES [dbo].[TB_SPEED] ([ID_SPEED])
IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_TB_DOGOVOR_TB_KLIENTS]') AND parent_object_id = OBJECT_ID(N'[dbo].[TB_DOGOVOR]'))
ALTER TABLE [dbo].[TB_DOGOVOR] WITH CHECK ADD CONSTRAINT [FK_TB_DOGOVOR_TB_KLIENTS] FOREIGN KEY([ID_KLIENT])
REFERENCES [dbo].[TB_KLIENTS] ([ID_KLIENT])
IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_TB_DOGOVOR_TB_MASHIN]') AND parent_object_id = OBJECT_ID(N'[dbo].[TB_DOGOVOR]'))
ALTER TABLE [dbo].[TB_DOGOVOR] WITH CHECK ADD CONSTRAINT [FK_TB_DOGOVOR_TB_MASHIN] FOREIGN KEY([ID_MASHIN])
REFERENCES [dbo].[TB_MASHIN] ([ID_MASHIN])
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, Menus, ExtCtrls, DBCtrls, StdCtrls;
procedure N10Click(Sender: TObject);
procedure N9Click(Sender: TObject);
procedure N7Click(Sender: TObject);
procedure N8Click(Sender: TObject);
procedure N12Click(Sender: TObject);
procedure N6Click(Sender: TObject);
procedure N15Click(Sender: TObject);
procedure N16Click(Sender: TObject);
procedure N5Click(Sender: TObject);
procedure N13Click(Sender: TObject);
procedure N14Click(Sender: TObject);
procedure N11Click(Sender: TObject);
procedure N21Click(Sender: TObject);
procedure TFRMMain.N7Click(Sender: TObject);
FRMSPRAV.DBGrid1.DataSource:=DM.DS_KLIENT;
FRMSPRAV.DBNavigator1.DataSource:=DM.DS_KLIENT;
procedure TFRMMain.N8Click(Sender: TObject);
FRMSPRAV.DBGrid1.DataSource:=DM.DS_PROC;
FRMSPRAV.DBNavigator1.DataSource:=DM.DS_PROC;
procedure TFRMMain.N9Click(Sender: TObject);
FRMSPRAV.DBGrid1.DataSource:=DM.DS_HDD;
FRMSPRAV.DBNavigator1.DataSource:=DM.DS_HDD;
procedure TFRMMain.N10Click(Sender: TObject);
FRMSPRAV.DBGrid1.DataSource:=DM.DS_MEM;
FRMSPRAV.DBNavigator1.DataSource:=DM.DS_MEM;
procedure TFRMMain.N11Click(Sender: TObject);
FRMTable.Label1.Caption:=('Введите название машины');
FRMTable.DBGrid1.DataSource:=DM.DSQ_Dogovor;
FRMTable.Caption:='Поиск арендаторов';
procedure TFRMMain.N12Click(Sender: TObject);
FRMSPRAV.DBGrid1.DataSource:=DM.DS_SPEED;
FRMSPRAV.DBNavigator1.DataSource:=DM.DS_SPEED;
procedure TFRMMain.N13Click(Sender: TObject);
FRMTable.DBGrid1.DataSource:=DM.DSv_DOGOVOR;
procedure TFRMMain.N14Click(Sender: TObject);
FRMTable.DBGrid1.DataSource:=DM.DSV_MASHINS;
procedure TFRMMain.N15Click(Sender: TObject);
FRMTable.DBGrid1.DataSource:=DM.DS_DOGOVOR;
procedure TFRMMain.N16Click(Sender: TObject);
FRMTable.DBGrid1.DataSource:=DM.DS_MASHIN;
procedure TFRMMain.N21Click(Sender: TObject);
FRMTable.Label1.Caption:=('Введите требуемый объем памяти');
FRMTable.DBGrid1.DataSource:=DM.DSP_Poisk;
procedure TFRMMain.N5Click(Sender: TObject);
procedure TFRMMain.N6Click(Sender: TObject);
SysUtils, Classes, DB, ADODB, RpCon, RpConDS, RpDefine, RpRave, RpRender,
RpRenderCanvas, RpRenderPreview, DBClient;
TV_MASHINSNAIM_MASH: TWideStringField;
TV_MASHINSNAIM_MEM: TWideStringField;
TV_MASHINSNAIM_SPEED: TWideStringField;
TV_MASHINSNAIM_PROC: TWideStringField;
TV_MASHINSNAIM_HDD: TWideStringField;
TV_DOGOVORNAIM_MASH: TWideStringField;
TV_DOGOVORDate_zakl: TDateTimeField;
TV_DOGOVORDate_okonch: TDateTimeField;
TV_DOGOVORNAIM_KLIENT: TWideStringField;
T_DOGOVORID_DOGOVOR: TAutoIncField;
T_DOGOVORDate_zakl: TDateTimeField;
T_DOGOVORDate_okonch: TDateTimeField;
QP_DogovorNAIM_KLIENT: TWideStringField;
QP_DogovorNAIM_MASH: TWideStringField;
QP_DogovorDate_zakl: TDateTimeField;
QP_DogovorDate_okonch: TDateTimeField;
P_PoiskNAIM_MASH: TWideStringField;
P_PoiskNAIM_SPEED: TWideStringField;
P_PoiskNAIM_PROC: TWideStringField;
procedure T_DOGOVORCalcFields(DataSet: TDataSet);
procedure TDM.T_DOGOVORCalcFields(DataSet: TDataSet);
T_Dogovor.Fields[5].AsFloat:=round(T_Dogovor.Fields[4].AsDateTime-T_Dogovor.Fields[3].AsDateTime)*(T_Mashin.Fields[6].AsInteger/30);
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, StdCtrls, ExtCtrls;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
FRMAdd.DBLookupComboBoxD1.Visible:=true;
FRMAdd.DBLookupComboBoxD2.Visible:=true;
FRMAdd.DBLookupComboBoxM1.Visible:=false;
FRMAdd.DBLookupComboBoxM2.Visible:=false;
FRMAdd.DBLookupComboBoxM3.Visible:=false;
FRMAdd.DBLookupComboBoxM4.Visible:=false;
FRMAdd.Label1.Caption:=('ФИО Клиента');
FRMAdd.Label2.Caption:=('Название машины');
FRMAdd.Label3.Caption:=('Дата заключения');
FRMAdd.Label4.Caption:=('Дата окончания');
FRMAdd.DBLookupComboBoxD1.Visible:=false;
FRMAdd.DBLookupComboBoxD2.Visible:=false;
FRMAdd.DBLookupComboBoxM1.Visible:=true;
FRMAdd.DBLookupComboBoxM2.Visible:=true;
FRMAdd.DBLookupComboBoxM3.Visible:=true;
FRMAdd.DBLookupComboBoxM4.Visible:=true;
FRMAdd.Label1.Caption:=('Процессор');
FRMAdd.Label2.Caption:=('Жесткий диск');
FRMAdd.Label4.Caption:=('Скорость подключения');
FRMAdd.Label5.Caption:=('Название');
procedure TFRMTable.Button1Click(Sender: TObject);
if DBGrid1.DataSource=DM.DS_DOGOVOR then begin
FRMAdd.Caption:='Добавить договор';
if DBGrid1.DataSource=DM.DS_MASHIN then begin
FRMAdd.Caption:='Добавить конфигурацию';
procedure TFRMTable.Button2Click(Sender: TObject);
if DBGrid1.DataSource=DM.DS_DOGOVOR then begin
FRMAdd.Caption:='Редактировать договор';
if DBGrid1.DataSource=DM.DS_MASHIN then begin
FRMAdd.Caption:='Редактировать конфигурацию';
procedure TFRMTable.Button3Click(Sender: TObject);
if DBGrid1.DataSource=DM.DS_DOGOVOR then begin
if DBGrid1.DataSource=DM.DS_MASHIN then begin
procedure TFRMTable.Button4Click(Sender: TObject);
if DBGrid1.DataSource=DM.DSQ_DOGOVOR then begin
s:='SELECT NAIM_KLIENT, NAIM_MASH, CENA, Date_zakl, Date_okonch, ';
s:=s+'WHERE NAIM_MASH =('''+edit1.Text+''')';
if DBGrid1.DataSource=DM.DSP_Poisk then begin
dm.P_Poisk.Parameters.ParamByName('@p').Value:=Edit1.Text;
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
DBLookupComboBoxD1: TDBLookupComboBox;
DBLookupComboBoxD2: TDBLookupComboBox;
DBLookupComboBoxM1: TDBLookupComboBox;
DBLookupComboBoxM2: TDBLookupComboBox;
DBLookupComboBoxM3: TDBLookupComboBox;
DBLookupComboBoxM4: TDBLookupComboBox;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure TFRMAdd.Button1Click(Sender: TObject);
if FRMTable.DBGrid1.DataSource=DM.DS_DOGOVOR then begin
DM.T_Dogovor.Fields[5].AsFloat:=round(DM.T_Dogovor.Fields[4].AsDateTime-DM.T_Dogovor.Fields[3].AsDateTime)*(round(DM.T_Mashin.Fields[6].AsInteger/30));
else if FRMTable.DBGrid1.DataSource=DM.DS_MASHIN then begin
procedure TFRMAdd.Button2Click(Sender: TObject);
Реализация информационной системы "Стройгенплан" в архитектуре "клиент-сервер". Цели и задачи моделируемой информационной системы, ее функциональная и информационная модели. Описание программного обеспечения, разработанного в архитектуре "клиент-сервер". курсовая работа [1,9 M], добавлен 30.08.2010
Разработка базы данных для информационной системы "Библиотека". Системный анализ, инфологическое, даталогическое и физическое проектирование. Программирование бизнес-логики, разработка клиентского приложения. Создание web-приложения, web-доступ. курсовая работа [3,3 M], добавлен 15.09.2014
Программные средства для реализации базы данных и серверной части информационной системы "Учета технического обслуживания станков" средствами СУБД Microsoft SQL Server 2008. Разработка триггеров для поддержки сложных ограничений целостности в базе данных. курсовая работа [768,3 K], добавлен 01.02.2013
Разработка реляционной базы данных "Библиотека" с помощью СУБД Microsoft SQL Server 2000 и программной оболочки в Microsoft Access. Экономическое обоснование результатов внедрения программного продукта. Инструкция по эксплуатации клиентского приложения. курсовая работа [3,4 M], добавлен 01.07.2011
Реляционная система управления базой данных Microsoft SQL Server архитектуры клиент-сервер. Тиражирование данных, параллельная обработка, поддержка больших баз данных. Определение маршрута движения документов в СЭД "Directum" и "Евфрат-документооборот". контрольная работа [21,2 K], добавлен 17.10.2009
Реализация информационной системы для ведения документации по аренде в СУБД Access 2000. Построение функциональной и информационной модели. Описание программного обеспечения, разработанного в архитектуре "клиент-сервер", анализ операционных характеристик. курсовая работа [637,9 K], добавлен 30.08.2010
Понятие и сущность базы данных, их классификация и характеристика. Системы управления базами данных. СУБД структуры "сервер-клиент", его суть. Microsoft Access - функционально полная реляционная СУБД. Предназначение СУБД Access, и описание ее работы. реферат [44,3 K], добавлен 27.02.2009
Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д. PPT, PPTX и PDF-файлы представлены только в архивах. Рекомендуем скачать работу .

© 2000 — 2021



Информационная система "Data-центр" курсовая работа. Программирование, компьютеры и кибернетика.
Реферат: Методические рекомендации по организации самостоятельной работы студентов
Контрольная работа по теме Технология продажи цитрусовых
Реферат: Поэтическое наследие поэта XVII века Мухаммада Имина Хиркати
Курсовая Работа На Тему Рыночные Отношения В Апк
Для Написания Контрольной Работы 24 Школьников Посадили
Реферат На Тему Методологическое Значение Философских Категорий Бытия И Развития Для Развития Науки И Военного Дела
Реферат: Проектирование носка стабилизатора самолета. Скачать бесплатно и без регистрации
Реферат: Тутанхамон и его время
Реферат: Статус депутатов местных Советов и формы их работы
Реферат Развитие Сельских
Контрольная работа по теме Роль бухгалтерского учета в организации жизнедеятельности фирмы
Сочинение Как Накопить Деньги На Мечту
Описание Октября Сочинение
Отчет по практике: Организация торгового процесса
Реферат по теме Путешествие Чарльза Дарвина на 'Бигле'
Реферат: Анализ ликвидности бухгалтерского баланса, краткосрочной дебиторской и кредиторской задолженности. Скачать бесплатно и без регистрации
Реферат На Тему Наука Семіотика
Титульный Лист Курсовой Работы Оформляется
Реферат по теме Філософія архітектури та архітектура філософії
Готовые Эссе По Предмету Железнодорожный Транспорт
Методы прогнозирования возможного банкротства предприятий и оценка их эффективности на примере ОАО "Удмуртагрохим" - Государство и право дипломная работа
Використання методу проектів для організації підсумкового заняття по вивченню можливостей текстового процесора MS Word - Педагогика курсовая работа
Товарная политика ООО "Абсолют" - Маркетинг, реклама и торговля курсовая работа


Report content on this page

Report Page

Please submit your DMCA takedown request to dmca@telegram.org