Реализовать в среде программирования Delphi средствами языка Object Pascal базу данных «Органайзер»

 

Label

Компонент Delphi Label предназначен для показа текста на форме нашей программы, которые не будет меняются в течение работы программы. Текст надписи компонента Label можно изменить, но делается это только программно. Текст, отображаемые в компоненте, определяются значением свойства Caption. Он прописывается в процессе проектирования или задается программно во время выполнения программы. Например:

 Label1.Caption := ‘текст’;

 Для отображения числовой  информации необходимо использовать  функции FloatToStr и IntToStr например: label1.Caption:=inttostr(123); отображает числовую информацию, а если нужно выполнить какие-то действия с этими числами например сложить то нужно перевести обратно в числовую информацию то нужно выполнить

label2.Caption:=IntToStr(StrToInt(label1.Caption)+1)

Разбиение текста на строки обеспечивает символ «новая строка» (его код равен 10)

label1.Caption:='первая строка'+#10+'вторая строка';

 

Таблица 2.2 – основные свойства компонента Label

Свойство	Определяет
Color	Фон компонента
Font	Cвойство текста
Visible	True(показать), False(скрыть) компонент
WordWrap	Если «True» переносит текст на новую строку
Caption	Надпись отображаемого текста
Alignment	Способ выравнивания текста. может принимать 3 состояния taLeftJustify — по левому краю компонента, taCenter- выравнивание по центру и taRightJustify — выравнивание по правому краю
Transparent	При значение True, фон вывода текста прозрачный т.е. область компонента не закрашивается цветом установленным свойством Color
Name	Имя компонента

 

Edit

Компонент Delphi Edit предназначен для ввода пользовательских данных и представляет собой однострочное поле. Основным свойством sedit’a является text типа данных string т.е. для ввода чисел нужно использовать функции FloatToStr(дробные числа) и IntToStr(целые числа). Перенос строк в этом компоненте по сравнению с label невозможен. Текст, не поместившийся по длине в компонент, просто сдвигается влево и пользователь может курсором перемещаться по этому тексту.

Button

Компонент Delphi sButton это стандартная кнопка делфи, кнопка имеет на поверхности надпись (описывающая её назначение при нажатии). Основное событие для кнопки является OnClick, выполняемое при нажатии, при этом кнопка меняет внешний вид, подтверждая этим происходящее действие визуально. Сразу после отпускания кнопки, выполняется действия в обработчике OnClick. Кнопку можно нажать не только щелчком мыши но и комбинацией клавиш, что бы задать комбинацию необходимо перед символом используемый в комбинации поставить символ амперсанта «&». После чего пользователь вместо щелчка мыши может использовать сочетание клавиш Alt и клавишей выделенного символа.

StringGrid

StringGrid - компонент для отображения различных данных в табличной форме. Как следует из названия, ячейки компонента StringGrid Delphi могут содержать данные, имеющие тип String, а также отображать графику.  

Таблица StringGrid состоит из выделенных серым FixedCols и FixedRows - зафиксированных ячеек-заголовков, и обычных, белых ячеек. Содержимое Fixed ячеек недоступно редактированию, и меняется только программно. За возможность редактирования обычных ячеек отвечает одно из значений свойства Options.

MonthCalendar

Компонент Delphi MonthCalendar (Календарь) находиться на странице Win32 Палитры компонентов. С его помощью легко и быстро можно можно выбрать нужную дату используя мышь.

Поместив компонент на форму, он сразу же будет готов к работе.

Текущая дата указывается выделением красным кружком, внизу развернуто пишется сегодняшнее число. Выбранная дата подсвечена синим цветом. Выбор даты производиться щелчком мыши на нужном дне. Если надо изменить месяц, то щелкаем мышью по кнопкам с треугольничками, расположенными по краям от названия месяца и года, на синем фоне. Если надо будет вернуться на сегодняшнюю дату, то на поле компонента правой кнопкой щелкнуть и в появившемся меню (одна строчка) выбрать пункт "к сегодняшней дате".

 

Memo   

Компонент Delphi Memo это простой текстовый редактор. Delphi Memo позволяет вводить многострочный текст с клавиатуры, загружать его из файла, редактировать и сохранять в файл текстового формата. При изучении работы с Delphi Edit советую посетить страничку работа со строками Delphi, так как там описываются функции Delphi для работы с данными, представленными в текстовой форме, с которыми и оперирует компонент Memo.

ComboBox

Компонент Delphi ComboBox представляет собой комбинацию поля редактирования (Edit) и список (ListBox), что дает возможность ввести данные путем набора на клавиатуре или выбора из списка. Работа с ComboBox почти не отличается от работы со списком ListBox.

При нажатии на стрелку появляется выпадающий список похожий на ListBox. С помощью компонента ComboBox место на форме программы экономится для размещения других элементов. При необходимости раскрытие можно вообще запретить с помощью свойства Style.

UpDown

Компонент Delphi UpDown находится на странице Win32 Палитры компонентов. Его основное предназначение быть счетчиком. Он может уменьшать или увеличивать числовое поле на заданную целую величину, равную свойству Increment, по умолчанию единице. Диапазон значений задается свойствами Min и Max (возможные значения от  -32768 до 32767).

UpDown не имеет поля вывода в котором отображалось бы изменяемое число. В процессе проектирования приложения его связывают с другим оконным элементом управления. Это может быть одно: строчный редактор Edit или компонент StaticText. Надпись Label для этих целей использовать нельзя, т.к. это не оконный элемент. Можно использовать даже компонент Memo.

 

 

 

 

 

 

 

 

ЗАКЛЮЧЕНИЕ

 

Данный курсовой проект был выполнен в полном соответствии поставленному заданию и отлажен в среде DELPHI XE5. В ходе выполнения курсовой работы была разработана база данных «Органайзер (Ежедневник)».

Благодаря компонентам Delphi программа приобрела оригинальный графический интерфейс.

В программе имеется возможность добавлять новые записи событий, найти необходимую запись по времени и дате или по названию события и места, и удалять запись.

В результате выполнения данной курсовой работы рассмотрены широкие возможности языка программирования Delphi XE5, повторены и обобщены знания по программированию на языке Delphi.

 

 

СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ

 

1. Архангельский А.Я.. Программирование в Delphi 7 – 2003.
2. Баженова И. Ю. Delphi 7. Самоучитель программиста – 2003.
3. Бобровский С. И. Delphi 7. Учебный курс – 2004.
4. Вальвачев, А. Н., Сурков, К. А., Сурков, Д.А., Четырько, Ю.М. Программирование на языке Delphi. Учебное пособие. – 2005.
5. Карпов Борис «Delphi Специальный справочник» Издательский дом.
6. Кулагин Н.Б. Программирование в Turbo Pascal 7.0 и Delphi. – СПб.:BHV, 2000
7. Мануйлов В.Г. Разработка программного обеспечения на Паскале. –М.:Приор,1996
8. Фаронов В. Программирование баз данных в Delphi 7 (учебный курс) - 2009
9. Фаронов В. В. Искусство создания компонентов Delphi – 2009.

 

 

 

ПРИЛОЖЕНИЕ А

 

 

 

unit Unit1;

 

interface

 

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, ComCtrls, StdCtrls, Grids;

 

type

  TForm1 = class(TForm)

    MonthCalendar1: TMonthCalendar;

    Button1: TButton;

    Button2: TButton;

    sgTab: TStringGrid;

    procedure Button1Click(Sender: TObject);

    procedure Button2Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

 

var

  Form1: TForm1;

 

implementation

 

uses Unit2, Unit3;

 

{$R *.dfm}

 

procedure TForm1.Button1Click(Sender: TObject);

begin

Form1.Visible:=true;

Form2.Visible:=true;

end;

 

procedure TForm1.Button2Click(Sender: TObject);

begin

Form1.Visible:=true;

Form3.Visible:=true;

end;

 

procedure TForm3.Button1Click(Sender: TObject);

begin

Form1.Visible:=true;

Form3.Visible:=false;

end;

 

end.

 

ПРИЛОЖЕНИЕ Б

 

Рисунок 1 - Главная форма

 

Рисунок 2 - Форма добавления новой записи

Рисунок. 3 - Форма поиска записи