Курсовая: Обьектно ориентированное программирование - текст курсовой. Скачать бесплатно.
Банк рефератов, курсовых и дипломных работ. Много и бесплатно. # | Правила оформления работ | Добавить в избранное
 
 
   
Меню Меню Меню Меню Меню
   
Napishem.com Napishem.com Napishem.com

Курсовая

Обьектно ориентированное программирование

Банк рефератов / Программирование

Рубрики  Рубрики реферат банка

закрыть
Категория: Курсовая работа
Язык курсовой: Русский
Дата добавления:   
 
Скачать
Microsoft Word, 869 kb, скачать бесплатно
Заказать
Узнать стоимость написания уникальной курсовой работы

Узнайте стоимость написания уникальной работы

39 Содержание. Введение ................................................................................................. Часть I . Теорет ическая часть 1.1. Основные понятия ООП.…………………… ……………..……. 1.2. Среда реализации ...................………………………………….... Часть II . Практическая часть 2.1. Постановка задачи............................................................……….. 2.2. Ход работы........................................................................……….. 2.3. Тест программы........................................................................….. 2.4. Инструкция для пользователя..........................................………. Заключение ........................................................................................... Литература............................................................................................. Введение. Объектно-ориент ированное программирование является в настоящее время наиболее популярной т ехнологией программирован ия. Объектно-ориентированное программирование является развитием технологии алгоритмического программир ования, которое представляет алгоритм в виде последовательности разли чных алгоритмических структур (линейная, ветвление, цикл), однако имеет с вои характерные черты. Объектно-ориентированный подход рассматривает все ресурсы, такие как д анные, модули, системы в качестве объектов. Каждый объект содержит некот орую структуру данных, обрамленную некоторыми наборами процедур (метод ов), предназначенных для манипулирования этими данными. Объектно-ориентированное программирование по своей сути – это создание приложений из объектов, по добно тому, как из блоков и различных деталей строятся д ома. Одни объекты приходится полностью создавать с амостоятельно, тогда как другие можно позаимствовать в готовом виде из р азнообразных библиотек. Важное место в технологии объектно-ориентированного п рограммирования занимает событие. В качестве собы тий могут рассматриваться щелчок кнопкой мыши на объекте, нажатие опред еленной клавиши, открытие документа и т.д. В качестве реакции на события в ызывается определенная процедура, которая может изменять свойства объ екта, вызывать его методы и т.д. В системах объектно-ориентирован ного программирования о бычно используется графический интерфейс, который позво ляет визуализировать процесс программирования. Появляется возможност ь создавать объекты, задавать им свойства и поведение с помощью мыши. Теоретичес кая часть. Прежде чем д авать определение понятию объект, рассмотрим, что такое класс. Класс – это определяемый п ользователем тип, который включает в себя данные разных типов и операции над ними. Объект – это экземпляр как ого-либо класса. Таким образом, класс – это описание, а объект – это то, что было создано в соответствии с этим описанием. Например, мы знаем, что такое стол. Стол – это некий предмет, име ю щи й столешницу и ножки. Такое описание стола и будет классом, а конкретный э кземпляр стола, за которым вы сейчас сидите, является объектом данного к ласса. Объект сос тоит из 3 частей: · Имя объекта; · Данные различных типов, называе мые полями объекта; · Заголовки процедур или функций, называемых методами объекта (операциями). Объектно- ориентированный язык программирования характеризуется тремя осно в ными свойствами: 1. Инкапсуля ция – это объединение и скрытие данных и обрабаты вающих их мет о дов от внеш него пользователя внутри класса. Для этого в описании класса используется специфик а тор раздела private , соде ржащий данные и методы, доступные только для самого класса. Назначение инкапсуляции: · защита данных, принадле жащих объекту, от возможных ошибок, которые могут возникнуть при прямом доступе к этим данным; · локализация возможных ошибок в программе, что намного упрощает процесс поиска и исправления этих ошибо к. 2. Наследование – это процесс, который позволяет определять новые классы на основе уже име ющегося (базового) класса. При этом новый класс с о храняет все свойства старого и мож ет добавлять к ним черты, характерные только для него. Класс-предок – это базовый класс, от которого новый класс получает свойства. Новый класс при этом на зывается наследником . Назначен ие наследования: · Не надо каждый раз зано во описывать новый объект, а можно указать базовый класс и описать отлич ительные особенности нового класса. В результате новый класс будет обла дать всеми свойствами класса-предка плюс своими собственными отличите льными чертами. Простой при мер наследования - определение записи, отдел ь ное поле которой является ранее определенной запи сью. 3. Полимор физм – это свойство, которое позволяет одно и то же имя можно использовать для решения нескольких технически разных задач. Назначение полиморфизма · Снижение сложности про грамм на основе разрешения использования одного метода для нескольких взаимосвязанных классов. При этом обращ е ние к одному и тому же методу у объекта-предка и объекта- потомка может приве с ти к разным результатам. Описание класса и объекта: Type <имя класса>= class (<Класс предок>) <поле 1>; <поле 2>; . . . <поле N >; <метод 1>; <метод 2>; . . . <метод M >; end ; Var <имя объекта>:<имя класса>; Для каждого элемента класса можно установить разную видимость. Видимость элемента определяет, где в программе и как будет ви ден данный элемент класса. Для этого в структуре class испол ьзуются 4 ключевых слова private , protected , public , published . · Private (частные) опр еделяет данные и методы, доступные только для самого класса . · Public (общедоступные) определяет элементы класса, которые в идны в любом месте программы. · Protected (защищенные) определяет данные и методы, доступные из класса и любого его класса-потомка (по умолчанию). · Published (опубликованные) определяет элементы класса, имеющи е ту же в и димость, что и public -элементы. Единств енное отличие заключается в том, опубл и кованные элементы порождают информацию о типе времени вы полнения ( RTTI ). Бл а годаря данной информации, Delphi может осуществить проверку принадлежности элементов объекта тому или иному классу. В Delphi имеется понятие абстрактного класса . Абстрактный класс описывает несуществующий объект. Он нужен для того, чт обы оп и сать некоторые фу ндаментальные свойства и методы объектов, которые создаются из а б страктного класса. Все объекты в Delphi созд аны из абстрактного класса TObject . Класс T – пр е док многих простых классов. Этот класс объединяет в себе осно вные методы, которые свойственны всем объектам Delphi . Пример . Type MyClass = class (TObject) Label1: TLabel; Button1: TButton; Button2: TButton; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); private Procedure MyProc; end; Var MyObject: MyClass; Объектно-о риентированное программирование – это программ ирование, которое основано на представлении программы в виде совокупно сти объектов, каждый из которых является реализацией определенного кла сса, а классы образуют иерархию, основанную на принципах инкапсуляции, н аследования и полиморфизма. Библиотеки кл ассов Delphi 7 Studio Основные библиотеки компонентов Delphi 7 Studio Для облегчения работы программиста и ускорения создания приложений в с тандартную поставку Delphi 7 Studio входят н екоторые готовые классы, которые называются компонентами. Эти компонен ты объединены в библиотеки компонентов. Библиотеки компонентов – это хранилища классов, которые обычно состоя т из небольших модулей, разделенных по назначению. Основные библиотеки Delphi 7 Studio : · VCL ( Visual Component Library ) – стандартная библиотека ви зуальных компонентов Delphi . · CLX ( Component Library for Cross Platform ) – библиотека компонентов дл я межплатформенной разработки приложений. Данная библиотека была созд ана для объединения средств разработки приложений Delphi и Kylix . Компоненты Библиотека визуальных компонентов, несмотря на свое название содержит в своем составе : · визуальные компонент ы – видимые во время выполнения приложения ( TButton , TEdit , TLabel и др); · невизуальные компоненты – види мые только на этапе проектирования ( TTimer , TTable , TQuery и др.). Типы компонен тов 1. Стандартный Стандартные компоненты включают в себя поведение элементов управления Windows . К таким компонентам относятс я TListView , TRichEdit , TImageList и др. Все эти компоненты наход ятся на вкладке Win 32 пан ели компонентов Delphi . Ка ждый из этих компонентов представляет собой так называемую оболочку ст андартного элемента управления Windows . Эти компоненты позволяют легко использовать элементы уп равления Windows в ваших пр ограммах. 2. Пользователь ский. К пользовате льским компонентам относятся все компоненты, которые входят в стандарт ную библиотеку компонентов Delphi . Эти компоненты добавляются пользователем в существующий на бор компонентов. Пользовательские компоненты создаются самостоятельн о или приобретаются у других программистов. 3. Графический. Графические компоненты предназначены для создания визуальных элементов управлени я, которые не могут получать фокус ввода. Обычно такие компоненты примен яются для отображения какой-либо информации (текстовой или графической ). В качестве примера можно привести TShape , TLabel , TImage и др. 4. Невизуальный. Невизуальные компоненты не видны пользователю во время выполнения приложения, хотя о ни обладают свойствами, событиями и методами. Примером такого компонент а является TTimer . Структура компонентов Компоненты, как и всякий класс включают в себя поля, свойства, методы и соб ытия. 1. Поля Поле компонента – это данные, хранящиеся в компоненте или классе. Поле п редставляется в виде переменной, которая описывается внутри компонент а или класса. 2. Свойства компонентов Свойства компонента предназначены для доступа пользователя к внутренн им полям компонента. Свойства позволяют изменить атрибуты компонента, в том числе и вычисляемыми значениями. Типы свойств Тип свойства Отображение свойств в окне инспектора о бъектов Простой (Simple ) Числовые, символьные и стро ковые свойства отображабтся соответственно как числа, символы и строки. Разработчик может редактировать значения данных свойств непосредстве нно в окне инспектора объектов. Перечисляемый ( Enumeraded ) Свойства перечисляемых типов (включая логически е типы) отображаются в окне инспектора объектов как редактируемые строк и. Разработчик может, кроме непосредственного ввода значения свойства, п ереключать допустимые значения свойства двойным щелчком в поле значен ия свойства окна инспектора объектов, либо выбрать допустимое значение из раскрывающегося списка. Множество (Set) Свойства типа множество отображаются в окне инспектора объектов как множества. При помощи двойного щелчка на значении свойства разработчик может расширить множество и установить каждому элементу м ножества логическое значение ( True , если данный элемент входит в множество) Объект ( Object ) Свойства такого типа часто имеют свой собственный редактор свойств. Свойства типа объект должны быть потомками класса TPersistent Массив ( Array) Свойства типа массив должны иметь свой собственный редакто р свойств. Окно инспектора объектов Delphi не поддерживает редактирование свойств данного типа. Разработчик должен при регистрации компонента определить редактор сво йств 3. Методы – это процедуры или функции, принадлежащие классу. Методы определяют п о ведение объекта. 4. Событие ( Event ) – это механизм, который связывает к акое-либо системное изменение или дейс т вие пользователя с конкретным кодом, называемым кодом обработчика соб ы тия ( Event handler ) . Иерархия визуальных компонентов Все классы и компоненты являются прямыми или косве нными потомками класса TObject . Класс TObject обеспечивает : · Возможность создан ия, уничтожения и управления экземплярами объектов, а та к же резервирование памяти и ее освоб ождение после уничтожения экземпляра; · Поддержку информации об объекте и типах; · Поддержку обработки сообщений. Следующий базовый класс, являющийся прямым потомком TObject , - класс TPersistent . Данный клсаа является предк ом для всех классов, предназначенных для работы с потоками. Класс TPersistent наследует свойства и мет оды своего предка – класса TObject , и может, кроме того, считывать данные из потока и записывать да нные в поток. Класс TPersistent обеспечивает: · Определение процед ур для загрузки и помещения данных в поток; · Назначение свойствам объекта ко нкретных значений; · Средства для назначения содержи мого одного объекта другому. Потомком класса TPersistent я вляется класс TComponent , баз овый класс всех компонентов библиотеки VCL . Наследники класса TComponent , как и сам данный класс, имеют следующие возможност и: · Способность отража ться на палитре компонентов Delphi , а также способность размещения на форме; · Способность быть обладателем др угих компонентов и управлять ими; · Способность быть преобразованн ым в элемент управления ActiveX или объект Com с помощью мастера. Следующий класс, потомок вышеописанного класса TComponent , - класс TControl . Этот класс является базовым классом для всех визуальных комп онентов, т.е. потомки этого класса будут видны и доступны пользователю во время выполнения приложения. Все классы, являющиеся потомками класса TControl , имеют свойства, мет оды и события, которые определяют особенности отображения данного комп онента, например, положение компонента на экране, размеры и т.д. Потомком класса TControl яв ляется класс TGraphicControl . Дан ный класс предназначен для создания визуальных компонентов, которые не являются окнами, т.е. не могут содержать в себе других компонентов и могут получать фокус ввода. Главное предназначение данного класса – отображ ать графику или текст на форме. Примерами потомков класса TGraphicControl могут выступать такие комп оненты, как TBevel (рамка), TImage (рисунок), TSpeedButton (кнопка быстрого вызова) и др угие. Класс TGraphicControl перед ает своим потомкам свойство Canvas , позволяющее получать доступ к поверхности компонента, на кот орой можно рисовать или писать. Кроме того, класс TGraphicControl передает своим потомкам ме тод Paint . Второй потомок класса TControl – класс TWinControl . Данный класс является базовым классом для всех оконных визуа льных компонентов. Оконный визуальный компонент – это компонент, котор ый: · может получать фоку с ввода во время выполнения приложения; · может содержать в себе другие ко мпоненты. Компонент, который содержит в себе другие компоненты называет ся родительским ( parent ). Ко мпонент, содержащийся в другом компоненте, называется дочерним ( child ); · имеет идентификатор окна Windows ( handle ). Каждый оконный компонент обр абатывается непосредственно операционной системой, поэтому ему назнач ается свой уникальный идентификатор. Примерами оконных компонентов является TEdit (поле редактирования) и другие. Среда реализаци и. Главные сос тавные части среды программирования Delphi 7 Studio Ниже пере числены основные составные части Delphi: 1. Главное окно среды Delphi ( Main Window ) расположено в самом верхнем углу экрана (окно с заголовком Delphi 7 – Project 1 ) . 2. Конструктор Форм ( Form Designer ) – окно, по умолчанию имеющее заголовок Form 1 . 3. Редактор кода ( Code Editor ) – окно, по у молчанию имеющее заголовок Unit 1. pas . 4. Инспектор Объектов ( Object Inspector ). 5. Окно представления объектов в ви де дерева ( Object TreeView ) . Главное окно Delphi Это меню содержит в себе: Меню главного окна Delphi 7 представляет стандартное меню Windows и служит для работы с файлами проекта, для запуска и отла дки проекта, позволяет настраивать среду Delphi и запускать дополнительные утили ты, входящие в состав Delphi 7 . 1. Меню File предназначено для работы с файлами проекта. Данное меню содержит следующие пункты: · New отображает несколько подменю, при выборе любого из них будет созд аваться соответствующий новый объект; · Open отображает диалоговое окно открытия с уществующего проекта или файла проекта; · Open Project отображает диалоговое окно открытия существующего проект а; · Reopen отображает подменю, которое содержит список последних открываемых вами в среде Delphi файлов и проектов, выбрав любой из них, вы откроете данны й файл в среде Delphi ; · Save служит для сохранения текущего файла проекта с возможн остью задания нового имени данному файлу; · Save Project As открывает диалоговое окно сохранения файлов проекта с возможностью назначения н ового имени файлу проекта; · Save All сохраняет все файлы текущего прое кта; · Close закрывает открытый в данный моме нт в редакторе кода файл проекта; · Close All закрывает все открытые в среде Delphi файлы и проекты; · Use Unit открывает диалоговое окно использования модулей. Если ваш проект содержит несколько модулей, то можно указать используемые в данн ом модуле другие модули проекта; · Print распечатывает текущий файл на принтере; · Exit закрывает все открытый файлы и за вершает работу c Delphi 7. Основные задачи при работе с базами данных Модификация набора данных. Процессы редактирования, добавления и удаления д анных можно объединить в едином понятии модификации набора данных Модифицируемость, т.е. возможность изменения набора данных, зависит от р азличных условий. Примером наложения ограничений на модифицируемость таблицы является переключение ее в режим «только для чтения». Если мы хо тим, чтобы возможности пользователя ограничивались только просмотром записей из набора данных без возможности их редактирования или добавле ния новых записей, можно использовать свойство ReadOnly . Данное свойство имеет по ум олчанию значение False . Приведенная ниже строка кода позволяет перевести таблицу данных Table 1 в режим «только для чтения»: Table 1. ReadOnly := True ; Примечани е. Значение свойства ReadOnly можно изменять только в том случае, когда набор данных закры т, т.е. свойство Active наб ора данных установлено в False . Чтобы проверить, можно ли модифицировать набор данных, предусмотрено св ойство CanModify . Это свойс тво имеет значение True , если набор данных можно модифицировать, и False , если нельзя. I . Редактирование набора данных Для редактирования текущей записи набора данных необходимо сначала перевести его в режим редактирования. Перевод набор а данных в состояние редактирования можно осуществить двумя способами: · программно с помощью метода Edit · визуально посредством компон ентов, отображающих данные, например, DBGrid , DBEdit , DBMemo и др. Методы, исп ользуемые для редактирования набора данных: 1. Метод Edit переводит набор данных в режим редактирования. При этом блок ируется доступ к текущей записи других пользователей (временно устанав ливается доступ «только для чтения»). Если запись уже редактируется друг им пользователем, то генерируется исключительная ситуация и выполнени е метода Edit прекращается. 2. Метод Post сохраняет сделанные изменения в наборе данных. Выполняет следующие дей ствия: 1. Записывает новые дан ные в физическую таблицу. 2. Снимает блокировку записи. 3. Переводит набор данн ых в режим просмотра. 3. Метод Cancel предназначен для отмены изменений, сделанных в текущей записи. 4. Метод Refresh заново считывает информацию из набора данных и обновляе т содержимое компонентов. После модификации набора данных может возник нуть ситуация, когда изменения не отображаются в визуальных компонента х. В этих случаях необходимо вызвать метод Refresh . Пример. Изме нение данных в поле FIO . If Table 1. CanModify = True then //если модификация возможна, то begin Table1.Edit; Table1.FieldByName(‘ Fio’ ).AsString:=Edit1.Text; Table1.Post; Table1.Refresh; end else // если редактиров ание невозможно ShowMessage (‘ Редактировани е невозможно’ ); Для редакт ирования текущей записи можно заменить последовательность присваиван ия значений и вызов метода Post методом SetFields . 5. Метод SetFields (<массив значений>) содержит массив з начений, которые присваиваются полям набора данных. При этом порядок пер ечисления значений должен соответствовать порядку следования полей в наборе данных. Если значение какого-либо поля нужно оставить без изменен ий, то в качестве значения указывается nil . После выполнения метода SetFields метод Post выполнять не нужно. Набор данных будет автоматически обновлен и переведен в режим просмотр а. Например , Table1.Edit; Table1.SetFields([‘ Сидоров ’ ,nil, 3400, nil]); Второе и четвертое поля таблицы Table 1 останутся без изменений, а п ервое и третье заменятся на значения «Сидоров» и 3400 соответственно. II. Добавление записей Добавлять н овые записи можно только к модифицируемому набору данных. Для добавления записи следует: 1. Перевести набор данн ых в режим вставки. 2. Задать значение для полей новой записи. 3. Подтвердить добавление новой з аписи или отказаться от нее. Методы, ис пользуемее для добавления записей: 1. Метод Insert выполняет следующие действия: · Переводит набор данн ых в режим вставки записи. · Сдвигает записи на одну вперед , начиная от текущей. · Вставляет на место текущей зап иси новую пустую запись. Таким обр азом, новая запись вставляется перед текущей. Например , Table1.Insert; Table1.FieldByName(‘ Fio’ ).AsString:=Edit1.Text; Table 1. Post ; 2. Метод InsertRecord (<массив значений>) Вставляет в текущую п озицию курсора новую запись, задавая значения ее полей, как в методе SetFields Table1.InsertRecord([‘ Сидоров ’ ,nil, 3400, nil]); 3. Метод Append аналогичен методу Insert за тем исключением, что в ставляет новую запись в конец набора данных, т.е. новая запись будет после дней. 4. Метод AppendRecord (<массив значений>) аналогичен методу InsertRecord , но добавляет новую запись в конец набора данны х, так же как и метод Append . III . Удаление записей Удалить запись можно только из модифицируемого н абора данных. 1. Метод Delete удаляет текущую запись. Если удаление произведено успешно, т о текущей становится следующая запись. Если удалена последняя запись, ку рсор переместится на предыдущую запись. 2. Метод EmptyTable удаляет все записи и з таблицы. Этот метод разрешен только в режиме исключительного доступа к таблице (свойство Exclusive = True ) Постановка задачи. Тема: Разработка базы данных «Трудоустройство и публикация резюме» Пос тановка задачи: Постр оить систему управления базой данных, содержащей публикации резюме для работодателей. Описан ие базы данных. База данных состоит из двух таблиц со следующей структурой: I. Резюме 1. Дата прием а заявки (системное время) 2. Предполага емая должность (берется из второй таблицы) 3. Предыдущие должности: 1 раздел: • Должность (выби рается из того же списка, что и пре дполагаемая должность) . Стаж работы в этой должн ости (1 год, 2 года, 3 года, 4 лет, 5 и более лет) 2 раздел: • Должность (выб ирается из того же списка, что и предполагаемая должность) • Стаж работы в этой должности (1 г од, 2 года, 3 года, 4 лет, 5 и более лет) 3 раздел: • Должность (выб ирается из того же списка, что и предполагаемая должность) • Стаж работы в этой должности (1 г од, 2 года, 3 года, 4 лет, 5 и более лет) 4. Опыт руков одящей работы (варианты: нет, руководство группой, руководство отделом, руководство подразделением, предприятием) 5. возраст 6. пол 7. минимальна я зарплата 8. Тип работы ( варианты: постоянная временная) 9. Информация о себе (поле Memo ) 10. Контактная информация: • Фамилия • Имя . Отчество • Телефон • E-mail 11. Должности 1. Наименов ание должности Опреде ление задач: Создать в с реде Delphi 7 Studio приложение для работы с это й базой данных. 1. Регистрац ия заявок 2. Внесение и зменений в таблицу «Должности» 3. Поиск канд идатов на должность по предполагаемой должности 4. Отчет о ре зюме принятых за текущий день (Фамилия, Имя, Отчество, предполагаемая до лжность, минимальная зарплата) . Ход работы. 1. Запускаем программу Delphi 7. 2. Переходим в окно Конструктор фор м. Используя свойство Caption , изменяем слово Form 1 на текст : «Трудоустройство и публикация рез юме ». 3. Помещаем на форму комп онент MainMenu1 вкладки Standard , создаем пункты меню: Регистрация, Долж ности, Поиск, Отчет. 4. Далее нужно вставить на форму компонен т Table1 , для того что бы можно было связа ться с таблицами базы данных. 5. Так же на форму нужно поместить компон енты: RvProject1 и RvDataSetConnection1 , для того что было можно было создавать отчеты по принят ым за день Заявлениям. 6. Теперь нужно создать новую форму: Реги страция заявок, здесь можно будет заполнять данные о себе при регистраци и на работу. 7. Помещаем на форму компоненты: 22 Label ( текст), 9 ComboBox1 , здесь можно будет выбирать должности н а которых вы хотите работать и на которых уже работали), 3 Bevel ( рамки), Создаем 2 кно пки: принять и отказаться, с помощью них можно будет либо зарегистрирова ть свою заявку либо отказаться от нее. 8. Также на форму помещаем компонент DataSource1 , для того что бы была связь с таблицей. Еще нужно поместить сюда два компонента Table. Это таблицы на которые будет опираться программа. 9. Теперь создаем еще од ну форму Должности, здесь можно будет добавить любые должности било удал ить ненужные. Помещаем на форму компонент DataSource1 , для связи с таблицей и саму таблицу Table1 где находятся сами должности. Ставим компонент DBNavigator1 , для добавления ,удаления и других опер аций с должностями. 10. Теперь нужно создать еще одну форму По иск, здесь можно будет найти нужного кандидата на должность. Помещаем на эту форму 24 компонента Label , 3 компо нента Bevel , 15 компонентов DBEdit, здесь будет находится найденная информация о кандидате ,3 кнопки: Поиск, и две дл я просмотра: Далее и назад. Компонент ComboBox, по которому можно будет искать ка ндидатов на нужную должность, компонент DataSource, для связи с таблицей ,и два ко мпонента Table , сами таблицы. 11. Теперь создаем еще одну форму Отчет, , п ри нажатии на Главной странице по кнопке отчет на этой странице будет вы водиться отчет по принятым за день объявлениям. Текст программы . (База данных) unit Unit 1; interface uses Windows , Messages , SysUtils , Variants , Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons, DB, DBTables; type TForm1 = class(TForm) Table1: TTable; Table2: TTable; BitBtn1: TBitBtn; BitBtn2: TBitBtn; procedure BitBtn1Click(Sender: TObject); procedure BitBtn2Click(Sender: TObject); procedure FormCreate(Sender: TObject); private Private declarations public Public declarations end; var Form1: TForm1; implementation $R *.dfm procedure TForm1.BitBtn1Click(Sender: TObject); begin Table1.CreateTable; ShowMessage(' таблица Резюме создана ') end; procedure TForm1.BitBtn2Click(Sender: TObject); begin Table2.CreateTable; ShowMessage(' таблица Должности создана ') end; procedure TForm1.FormCreate(Sender: TObject); begin end; end. (Главная страница) unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Menus, DB, DBTables, RpCon, RpConDS, RpDefine, RpRave; type TForm1 = class(TForm) MainMenu1: TMainMenu; N1: TMenuItem; N2: TMenuItem; N3: TMenuItem; N4: TMenuItem; Table1: TTable; RvDataSetConnection1: TRvDataSetConnection; RvProject1: TRvProject; procedure N1Click(Sender: TObject); procedure N2Click(Sender: TObject); procedure N3Click(Sender: TObject); procedure N4Click(Sender: TObject); procedure FormCreate(Sender: TObject); private Private declarations public Public declarations end; var Form1: TForm1; implementation Uses Unit2, Unit3, Unit4; $R *.dfm procedure TForm1.N1Click(Sender: TObject); begin Form2.ShowModal; end; procedure TForm1.N2Click(Sender: TObject); begin Form3.ShowModal; end; procedure TForm1.N3Click(Sender: TObject); Begin Form4.Showmodal; end; procedure TForm1.N4Click(Sender: TObject); Var s, s1: String; Systime:TSystemTime; i: integer; begin GetLocalTime (Systime); s1:=DateTimeToStr(SystemTimeToDateTime(Systime)); For i:=1 to 10 do s:=s+s1[i]; ShowMessage('Фомирование отчета по принятым за день объявлениям за '+s); Table1.Filter:='Data='+''''+s+''''; Table1.Filtered:=true; RvProject1.Execute; end; procedure TForm1.FormCreate(Sender: TObject); begin end; end. (Регистрация) object Form1: TForm1 Left = 222 Top = 118 Width = 658 Height = 512 Caption = #1058#1088#1091#1076#1086#1081#1089#1090#1088#1086#1081#1089#1090#1074#1086' '#1080' '#1087#1091#1073#1083#1080#1082#1072#1094#1080#1103' '#1088#1077#1079#1102#1084#1077 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 object MainMenu1: TMainMenu Left = 600 object N1: TMenuItem Caption = #1056#1077#1075#1080#1089#1090#1088#1072#1094#1080#1103 OnClick = N1Click end object N2: TMenuItem Caption = #1044#1086#1083#1078#1085#1086#1089#1090#1080 OnClick = N2Click end object N3: TMenuItem Caption = #1055#1086#1080#1089#1082 OnClick = N3Click end object N4: TMenuItem Caption = #1054#1090#1095#1077#1090 OnClick = N4Click end end object Table1: TTable Active = True TableName = #1041#1072#1079#1072' '#1076#1072#1085#1085#1099#1093'\'#1056#1077#1079#1102#1084#1077 TableType = ttFoxPro Left = 560 end object RvDataSetConnection1: TRvDataSetConnection RuntimeVisibility = rtDeveloper DataSet = Table1 Left = 520 end object RvProject1: TRvProject ProjectFile = 'D:\Documents and Settings\'#1090#1077#1093#1085'2\'#1052#1086#1080' '#1076#1086#1082#1091#1084#1077#1085#1090#1099'\'#1050#1091#1080#1084#1086#1074' '#1070#1088#1072'\'#1050#1091#1088#1089#1086#1074#1072 + #1103' '#1054#1054#1055'\Project1.rav' Left = 480 end end (Должности) object Form2: TForm2 Left = 394 Top = 79 Width = 696 Height = 480 Caption = #1056#1077#1075#1080#1089#1090#1088#1072#1094#1080#1103' '#1079#1072#1103#1074#1086#1082 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label2: TLabel Left = 48 Top = 136 Width = 42 Height = 13 Caption = #1042#1086#1079#1088#1072#1089#1090 end object Label3: TLabel Left = 72 Top = 160 Width = 20 Height = 13 Caption = #1055#1086#1083 end object Label4: TLabel Left = 24 Top = 184 Width = 71 Height = 13 Caption = #1052#1080#1085' '#1079#1072#1088#1087#1083#1072#1090#1072 end object Label5: TLabel Left = 32 Top = 208 Width = 59 Height = 13 Caption = #1058#1080#1087' '#1088#1072#1073#1086#1090#1099 end object Label6: TLabel Left = 104 Top = 112 Width = 102 Height = 13 Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103' '#1086' '#1089#1077#1073#1077 end object Label7: TLabel Left = 224 Top = 344 Width = 129 Height = 13 Caption = #1050#1086#1085#1090#1072#1082#1090#1085#1072#1103' '#1080#1085#1092#1086#1088#1084#1072#1094#1080#1103':' Color = clMenuBar ParentColor = False end object Label8: TLabel Left = 40 Top = 232 Width = 49 Height = 13 Caption = #1060#1072#1084#1080#1083#1080#1103 end object Label9: TLabel Left = 64 Top = 256 Width = 22 Height = 13 Caption = #1048#1084#1103 end object Label10: TLabel Left = 40 Top = 280 Width = 47 Height = 13 Caption = #1054#1090#1095#1077#1089#1090#1074#1086 end object Label11: TLabel Left = 200 Top = 368 Width = 45 Height = 13 Caption = #1058#1077#1083#1077#1092#1086#1085 end object Label12: TLabel Left = 216 Top = 392 Width = 28 Height = 13 Caption = 'E-mail' end object Bevel1: TBevel Left = 304 Top = 32 Width = 305 Height = 73 end object Label1: TLabel Left = 16 Top = 8 Width = 145 Height = 13 Caption = #1055#1088#1077#1076#1087#1086#1083#1086#1075#1072#1077#1084#1072#1103' '#1076#1086#1083#1078#1085#1086#1089#1090#1100 end object Label13: TLabel Left = 376 Top = 16 Width = 124 Height = 13 Caption = #1055#1088#1077#1076#1099#1076#1091#1097#1080#1077' '#1076#1086#1083#1078#1085#1086#1089#1090#1080 end object Label14: TLabel Left = 312 Top = 40 Width = 48 Height = 13 Caption = '1 '#1088#1072#1079#1076#1077#1083':' end object Label15: TLabel Left = 384 Top = 48 Width = 58 Height = 13 Caption = #1044#1086#1083#1078#1085#1086#1089#1090#1100 end object Label16: TLabel Left = 384 Top = 72 Width = 66 Height = 13 Caption = #1057#1090#1072#1078' '#1088#1072#1073#1086#1090#1099 end object Bevel2: TBevel Left = 304 Top = 112 Width = 305 Height = 73 end object Label17: TLabel Left = 312 Top = 120 Width = 45 Height = 13 Caption = '2 '#1088#1072#1079#1076#1077#1083 end object Label18: TLabel Left = 384 Top = 128 Width = 58 Height = 13 Caption = #1044#1086#1083#1078#1085#1086#1089#1090#1100 end object Label19: TLabel Left = 384 Top = 152 Width = 66 Height = 13 Caption = #1057#1090#1072#1078' '#1088#1072#1073#1086#1090#1099 end object Bevel3: TBevel Left = 304 Top = 192 Width = 305 Height = 73 end object Label20: TLabel Left = 312 Top = 200 Width = 45 Height = 13 Caption = '3 '#1088#1072#1079#1076#1077#1083 end object Label21: TLabel Left = 384 Top = 208 Width = 58 Height = 13 Caption = #1044#1086#1083#1078#1085#1086#1089#1090#1100 end object Label22: TLabel Left = 384 Top = 232 Width = 66 Height = 13 Caption = #1057#1090#1072#1078' '#1088#1072#1073#1086#1090#1099 end object DBEdit1: TDBEdit Left = 96 Top = 136 Width = 121 Height = 21 DataField = 'VOZR' DataSource = DataSource1 TabOrder = 0 end object DBEdit3: TDBEdit Left = 96 Top = 184 Width = 121 Height = 21 DataField = 'MIN_Z_P' DataSource = DataSource1 TabOrder = 1 end object DBEdit6: TDBEdit Left = 96 Top = 232 Width = 121 Height = 21 DataField = 'FAM' DataSource = DataSource1 TabOrder = 2 end object DBEdit7: TDBEdit Left = 96 Top = 256 Width = 121 Height = 21 DataField = 'IMIA' DataSource = DataSource1 TabOrder = 3 end object DBEdit8: TDBEdit Left = 96 Top = 280 Width = 121 Height = 21 DataField = 'OTCH' DataSource = DataSource1 TabOrder = 4 end object DBEdit9: TDBEdit Left = 248 Top = 360 Width = 113 Height = 21 DataField = 'TEL' DataSource = DataSource1 TabOrder = 5 end object DBEdit10: TDBEdit Left = 248 Top = 384 Width = 113 Height = 21 DataField = 'E_MAIL' DataSource = DataSource1 TabOrder = 6 end object ComboBox1: TComboBox Left = object Label2: TLabel Left = 48 Top = 136 Width = 42 Height = 13 Top = 128 Width = 58 Height = 13 Caption = #1044#1086#1083#1078#1085#1086#1089#1090#1100 end object Label19: TLabel Left = 384 Top = 152 Width = 66 Height = 13 Caption = #1057#1090#1072#1078' '#1088#1072#1073#1086#1090#1099 end object Bevel3: TBevel Left = 304 Top = 192 Width = 305 Height = 73 end object Label20: TLabel Top = 24 Width = 145 Height = 21 ItemHeight = 13 TabOrder = 7 end object DBEdit2: TDBEdit Left = 96 Top = 160 Width = 121 Height = 21 DataField = 'POL' DataSource = DataSource1 TabOrder = 8 end object DBEdit4: TDBEdit Left = 96 Top = 208 Width = 121 Height = 21 DataField = 'TIP_RABOTI' DataSource = DataSource1 TabOrder = 9 end object DBEdit5: TDBEdit Left = 456 Top = 48 Width = 121 Height = 21 DataField = 'DOLJ_1' DataSource = DataSource1 TabOrder = 10 end object DBEdit11: TDBEdit Left = 456 Top = 72 Width = 121 Height = 21 DataField = 'STAJ_1' DataSource = DataSource1 TabOrder = 11 end object DBEdit12: TDBEdit Left = 456 Top = 128 Width = 121 Height = 21 DataField = 'DOLJ_2' DataSource = DataSource1 TabOrder = 12 end object DBEdit13: TDBEdit Left = 456 Top = 152 Width = 121 Height = 21 DataField = 'STAJ_2' DataSource = DataSource1 TabOrder = 13 end object DBEdit14: TDBEdit Left = 456 Top = 200 Width = 121 Height = 21 DataField = 'DOLJ_3' DataSource = DataSource1 TabOrder = 14 end object DBEdit15: TDBEdit Left = 456 Top = 224 Width = 121 Height = 21 DataField = 'STAJ_3' DataSource = DataSource1 TabOrder = 15 end object BitBtn1: TBitBtn Left = 32 Top = 64 Width = 121 Height = 25 Caption = #1055#1086#1080#1089#1082 TabOrder = 16 OnClick = BitBtn1Click end object Edit1: TEdit Left = 456 Top = 400 Width = 137 Height = 21 TabOrder = 17 end object Edit2: TEdit Left = 200 Top = 400 Width = 121 Height = 21 TabOrder = 18 end object BitBtn2: TBitBtn Left = 248 Top = 352 Width = 75 Height = 25 Caption = #1044#1072#1083#1077#1077 TabOrder = 19 OnClick = BitBtn2Click end object BitBtn3: TBitBtn Left = 400 Top = 352 Width = 75 Height = 25 Caption = #1053#1072#1079#1072#1076 TabOrder = 20 OnClick = BitBtn3Click end object DataSource1: TDataSource DataSet = Table1 Left = 656 Top = 8 end object Table1: TTable Active = True TableName = #1041#1072#1079#1072' '#1076#1072#1085#1085#1099#1093'\'#1056#1077#1079#1102#1084#1077 TableType = ttFoxPro Left = 624 Top = 8 end object Table2: TTable Active = True TableName = #1041#1072#1079#1072' '#1076#1072#1085#1085#1099#1093'\'#1044#1086#1083#1078#1085#1086#1089#1090#1080 TableType = ttFoxPro Left = 624 Top = 40 end end (Отчет) object Form5: TForm5 Left = 182 Top = 182 Width = 696 Height = 480 Caption = 'Form5' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 End Инструкци я для пользователя . · Открыть папку с програм мой. · Найти файл Project1.exe и запустить его. · В открывшемся окне для регистрации перейти на вкладку Регистрация. · На этой вкладке нужно ввести данные о себе, стаж работы и свою предполагаемую должность. Потом нужно нажать к нопку Принять и закрыть окно. · На вкладке должности можно добавля ть и удалять должности, для добавления должности нужно внизу страницы на жать на + и написать желаемую должность затем нажать принять, для удалени я следует нажать -. · На вкладке поиск можно найти различ ных кандидатов на работу по Должности, для этого нужно в списке выбрать с оответствующую должность и нажать на кнопку поиск, появится список канд идатов, их можно просматривать кнопками Далее и Назад. · На вкладке Отчет можно просматрива ть принятые за день Заявления о регистрации. Для этого нужно перейти на вкладку Отче т в открывшемся окне появится список принятых за день заявлений о регист рации. Заключение. Эта програм ма может использоваться при подборе кадров в службе трудоустройства и о тделах кадров предприятий. С помощью нее можно сделать самостоятельно заявку на регистрацию о прие ме на работу, так же можно внести любые должности. Так же с помощью этой пр ограммы можно найти подходящего кандидата на ту или иную должностью. Мож но вывести отчет по принятым за день заявкам о приеме на работу. Литература. 1. Пон амарёв В. Delphi Studio 7- Самоучитель; БХВ- Петербург, 2003 2. Гофман В., Хомоненко А. Delphi 6. – СПБ.: БХВ- Петербург, 2001 3. Гофман В., Хомоненко А. Работа с базами данных в Delphi . – СПБ., БХВ- Петербург, 2000. 4. Кар пов Б. Delphi 5: учебный курс. – СПБ.: Питер , 2001.
1Архитектура и строительство
2Астрономия, авиация, космонавтика
 
3Безопасность жизнедеятельности
4Биология
 
5Военная кафедра, гражданская оборона
 
6География, экономическая география
7Геология и геодезия
8Государственное регулирование и налоги
 
9Естествознание
 
10Журналистика
 
11Законодательство и право
12Адвокатура
13Административное право
14Арбитражное процессуальное право
15Банковское право
16Государство и право
17Гражданское право и процесс
18Жилищное право
19Законодательство зарубежных стран
20Земельное право
21Конституционное право
22Конституционное право зарубежных стран
23Международное право
24Муниципальное право
25Налоговое право
26Римское право
27Семейное право
28Таможенное право
29Трудовое право
30Уголовное право и процесс
31Финансовое право
32Хозяйственное право
33Экологическое право
34Юриспруденция
 
35Иностранные языки
36Информатика, информационные технологии
37Базы данных
38Компьютерные сети
39Программирование
40Искусство и культура
41Краеведение
42Культурология
43Музыка
44История
45Биографии
46Историческая личность
47Литература
 
48Маркетинг и реклама
49Математика
50Медицина и здоровье
51Менеджмент
52Антикризисное управление
53Делопроизводство и документооборот
54Логистика
 
55Педагогика
56Политология
57Правоохранительные органы
58Криминалистика и криминология
59Прочее
60Психология
61Юридическая психология
 
62Радиоэлектроника
63Религия
 
64Сельское хозяйство и землепользование
65Социология
66Страхование
 
67Технологии
68Материаловедение
69Машиностроение
70Металлургия
71Транспорт
72Туризм
 
73Физика
74Физкультура и спорт
75Философия
 
76Химия
 
77Экология, охрана природы
78Экономика и финансы
79Анализ хозяйственной деятельности
80Банковское дело и кредитование
81Биржевое дело
82Бухгалтерский учет и аудит
83История экономических учений
84Международные отношения
85Предпринимательство, бизнес, микроэкономика
86Финансы
87Ценные бумаги и фондовый рынок
88Экономика предприятия
89Экономико-математическое моделирование
90Экономическая теория

 Анекдоты - это почти как рефераты, только короткие и смешные Следующий
Совет женщинам. Не носите одновременно украшения из различных драгоценных металлов: так нелепо смотрятся серебряные серёжки с золотыми зубами.
Anekdot.ru

Узнайте стоимость курсовой, диплома, реферата на заказ.

Обратите внимание, курсовая по программированию "Обьектно ориентированное программирование", также как и все другие рефераты, курсовые, дипломные и другие работы вы можете скачать бесплатно.

Смотрите также:


Банк рефератов - РефератБанк.ру
© РефератБанк, 2002 - 2016
Рейтинг@Mail.ru