Курсовой проект по предмету Компьютеры, программирование

  • 1681. Разработка АРМ на основе персонального компьютера для дома
    Курсовые работы Компьютеры, программирование

    Настройка BIOS сводится к подбору параметров работы оперативной памяти таким образом, чтобы ПК работал максимально быстро и, в тоже время, устойчиво. Необходимо также включить кэширование BIOS видео карты и системной (материнской) платы в оперативную память ПК. Большинство BIOS имеют встроенную систему Plug and Play, но ее работа зачастую приводит к конфликтам с ОС где существует своя аналогичная система. Исходя из соображений максимальной устойчивости работы ПК, систему Plug and Play BIOS следует отключить. Особо следует отметить одну особенность работы менеджеров питания BIOS (ACPI) и ОС на некоторых чипсетах (например, VIA 693A). При одновременной работе этих двух менеджеров могут возникать проблемы при выключении питания у ПК (система просто «зависает»). Нормальной работы, в этом случае, можно добиться путем подбора режимов менеджера питания BIOS (как правило его отключают полностью). Следует также проверить корректную работу спящего режима ОС.

  • 1682. Разработка архитектуры, принципиальной схемы и конструкции специализированного микроконтроллера
    Курсовые работы Компьютеры, программирование

    Обозначение выводаНазначение выводаRL0-RL7Входы линий возврата, служащие для подачи сигналов от датчиков через контакты клавиш или ключаSHIFTВход сигнала сдвига, используемого для сканирования клавиатурыCNTL/STBВход сигнала управления для режима сканирования клавиатуры или стробирующего сигнала для режима ввода по стробуRDВход сигнала чтения L-уровня, разрешающего передачу информации из ПККИ в канал данных микропроцессораWRВход сигнала записи L-уровня, разрешающего передачу информации из канала данных микропроцессора в ПККИA0Вход для управления записью/чтением данных или команд; при сигнале Н-уровня происходит запись команды или чтения состояния ПККИ, при сигнале L-уровня запись или чтение данныхCSВыбора микросхемы; L уровень сигнала разрешает работу схемыCLKВход сигнала синхронизации микросхемыRESETЛиния сброса ПККИ в начальное состояниеDB0 DB7Двунаправленная шина данныхOA0 OA3Выходы канала А (старшая тетрада)OB0 OB3Выходы канала В (младшая тетрада)BDВыход сигнала гашения отображения L-уровняSL0 SL3Выходы сигналов сканирования клавиш клавиатурыIRQВыход сигнала прерывания

  • 1683. Разработка баз данных "Articles" средствами платформы Microsoft.NET Framework
    Курсовые работы Компьютеры, программирование

    На сегодняшний день проектирование баз данных и разработка эффективных приложений с базами данных является одной из самых популярных тем объектно-ориентированного программирования. Ещё более актуальной эта тема стала с появлением новой платформы .NET Framework, выпущенной компанией Microsoft, которая имеет огромный потенциал в решении вышеуказанных проблем. И это нисколько не удивительно, так как большинство деловых и офисных приложений, таких, например, как системы бухгалтерского или складского учёта, разного рода системы автоматизации финансового и хозяйственного учёта, а также Web-приложения, рассчитанные для работы в Интернете и интрасетях компаний интегрируются тем или иным способом с базами данных. Хоть .NET Framework и не была разработана специально для этих целей, но встроенные в неё языки программирования и стандартная библиотека классов, позволяют проектировать модели баз данных и разрабатывать клиентские приложения, содержащие базы данных, в полном объёме.

  • 1684. Разработка базы данных "Кафедра" средствами СУБД Access
    Курсовые работы Компьютеры, программирование

    Отчет - это форматированное представление данных, которое выводится на экран, в печать или файл. Они позволяют извлечь из базы нужные сведения и представить их в виде, удобном для восприятия, а также предоставляют широкие возможности для обобщения и анализа данных. При печати таблиц и запросов информация выдается практически в том виде, в котором хранится. Часто возникает необходимость представить данные в виде отчетов, которые имеют традиционный вид и легко читаются. Подробный отчет включает всю информацию из таблицы или запроса, но содержит заголовки и разбит на страницы с указанием верхних и нижних колонтитулов. Microsoft Access отображает в отчете данные из запроса или таблицы, добавляя к ним текстовые элементы, которые упрощают его восприятие.

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

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

  • 1686. Разработка базы данных "Справочник меломана"
    Курсовые работы Компьютеры, программирование

    Все элементы базы данных: таблицы, запросы, формы и другие хранятся в отдельных файлах и имеют различные расширения. При создании приложения используется проект, в котором хранится информация об используемых файлах, а также подключенных модулях и библиотеках. Посредством этой информации файл проекта объединяет элементы приложения Visual FoxPro и группирует их по типам в менеджере проекта, используя при этом их расширение. Информация о проекте хранится в специальной таблице, которая, в отличие от обычных таблиц Visual FoxPro, имеет расширение *.pjx. Memo-поля таблицы содержат наименование элемента проекта, его описание и другие текстовые атрибуты. Файл с Memo-полями таблицы имеет расширение PJT. Использование файла проекта значительно облегчает работу с проектом и упрощает разработку приложения.

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

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

  • 1688. Разработка базы данных "Компьютерные игры"
    Курсовые работы Компьютеры, программирование

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

  • 1689. Разработка базы данных "Магазин товаров"
    Курсовые работы Компьютеры, программирование

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

  • 1690. Разработка базы данных "Учащиеся"
    Курсовые работы Компьютеры, программирование

    Если проследить историю человечества, то можно заметить, что на протяжении развития цивилизации на земле, человек что-то придумывает чтобы облегчить и украсить свою жизнь на земле. И вот уже к концу ХХ в. научно-технический прогресс, набравший головокружительную скорость, послужил причиной появления такого чуда современности как компьютер и компьютерные технологии. Изобретение компьютеров послужило переломным моментом в развитии многих отраслей промышленности, на значительный объём повысило мощь и эффективность военной техники, внесло множество прогрессивных изменений в работу средств массовой информации, систем связи, качественно изменило принцип работы банков и административных учреждений. С каждым днем происходит усовершенствование компьютерных технологий, что приводит к повышению работоспособности всего компьютеризированного мира в целом. Вслед за развитием компьютерных технологий, идет бурное развитие программного обеспечения.

  • 1691. Разработка базы данных «Магазин бытовой техники “Электрон” средствами СУБД MS Access»
    Курсовые работы Компьютеры, программирование

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

  • 1692. Разработка базы данных в Microsoft Access
    Курсовые работы Компьютеры, программирование

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

  • 1693. Разработка базы данных видеоматериалов
    Курсовые работы Компьютеры, программирование

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

  • 1694. Разработка базы данных для бюро находок
    Курсовые работы Компьютеры, программирование
  • 1695. Разработка базы данных для интернет-магазина
    Курсовые работы Компьютеры, программирование

    <!--%d0%9e%d1%82%d0%ba%d1%80%d1%8b%d0%b2%d0%b0%d1%8e%d1%89%d0%b8%d0%b9%20%d1%82%d0%b5%d0%b3%20%d1%84%d0%be%d1%80%d0%bc%d1%8b,%20form%20action%20%d0%be%d0%bf%d1%80%d0%b5%d0%b4%d0%b5%d0%bb%d1%8f%d0%b5%d1%82,%20%d0%b3%d0%b4%d0%b5%20%d0%bd%d0%b0%d1%85%d0%be%d0%b4%d0%b8%d1%82%d1%81%d1%8f%20%d0%be%d0%b1%d1%80%d0%b0%d0%b1%d0%be%d1%82%d1%87%d0%b8%d0%ba%20%d1%84%d0%be%d1%80%d0%bc%d1%8b:%20zakaz1.php,%20%d0%b8%20%d0%ba%d0%b0%d0%ba%d0%b8%d0%bc%20%d0%be%d0%b1%d1%80%d0%b0%d0%b7%d0%be%d0%bc%20%d0%b4%d0%b0%d0%bd%d0%bd%d1%8b%d0%b5%20%d1%84%d0%be%d1%80%d0%bc%d1%8b%20%d0%b1%d1%83%d0%b4%d1%83%d1%82%20%d0%be%d1%82%d0%bf%d1%80%d0%b0%d0%b2%d0%bb%d1%8f%d1%82%d1%8c%d1%81%d1%8f%20%d0%be%d0%b1%d1%80%d0%b0%d0%b1%d0%be%d1%82%d1%87%d0%b8%d0%ba%d1%83:%20%d0%bc%d0%b5%d1%82%d0%be%d0%b4%d0%be%d0%bc%20post-->"><form action=zakaz1.php method=post><!--Открывающий тег формы, form action определяет, где находится обработчик формы: zakaz1.php, и каким образом данные формы будут отправляться обработчику: методом post-->

  • 1696. Разработка базы данных для объекта автоматизации: гомеопатическая аптека
    Курсовые работы Компьютеры, программирование

    В курсовом проекте рассмотрены следующие теоретические вопросы и практические задания:

    1. проведен системно-комплексный анализ выбранного объекта автоматизации
    2. разработана структура пользовательского интерфейса автоматизированной системы
    3. разработан функциональный аспект информационной страты объекта
    4. разработана структура экранных форм пользовательского интерфейса
    5. разработана концептуальная модель базы данных
    6. разработан 1 уровень структурного аспекта информационной страты объекта
    7. разработан 2 уровень структурного аспекта информационной страты объекта
    8. разработан функционально-структурный аспект информационной страты объекта
    9. проведена нормализация полученных отношений (в учебных целях до начала нормализации была введена в 1 из отношений транзитивная зависимость и во 2 отношениемножественная зависимость.) Далее было проверено методом табло и аналитическим методом отсутствие потерь при соединении отношений, разлагаемых при нормализации.
    10. разработан структурно-функциональный аспект информационной страты объекта
    11. проведена разработка проекта в СУБД Visual Fox Pro 6.0
  • 1697. Разработка базы данных для оценки неполной оплаты отгруженной продукции
    Курсовые работы Компьютеры, программирование

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

  • 1698. Разработка базы данных для риэлтерской конторы
    Курсовые работы Компьютеры, программирование

    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.

  • 1699. Разработка базы данных для учета работы продуктового склада
    Курсовые работы Компьютеры, программирование

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

  • 1700. Разработка базы данных и клиентского приложения
    Курсовые работы Компьютеры, программирование

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