48651 (Разработка программы на Delphi)

Введение

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

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

Например: к сгоранию элементов материнской платы, поражению файлов на жестком диске, автодозвонам в другие государства и т.д.

Тема моего курсового проекта – создание программы справочника по визуальным компонентам интегрированной среды Delphi. Эта программа должна быть простой в обращение и удобной для использования при разработке других приложений. Она нацелена на выведении справки о компоненте по средствам поиска по базе данных или выбора компонента из списка. Задача программы –это помощь в изучении свойств и назначений визуальных компонентов интегрированной среды Delphi.

1 Разработка эскизного и технического проектов программы

1.1 Назначение и область применения

Назначение – справочная информация. Данная программа может использоваться для обучения начинающего программиста. Для получения справки во время выполнения практических работ в Delphi. Использование приложения «справочная система» гораздо облегчит работу начинающего программиста, поможет запомнить и усвоить информацию, исключит вариант «копания» в книжке чтобы ответить на простой вопрос «А для чего нужен этот компонент на форме?» тем самым сэкономит время.

1.2 Технические характеристики

1.2.1 Постановка задачи

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

Реализовать систему поиска по файлу, создать информационное сообщение выводимое при ошибке поиска. Создать справку о пользовании программой.

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

Создать прокручиваемый список визуальных компонентов, по нажатию на которые будет выводиться справочная информация.

Для того чтобы внести в данные свои замечания и пометки нужно открыть прилагающийся в папке с программой файл «1.ТХТ» и вписать туда вручную. Для корректной работы программы информация о компонентах в файле ограничивается метками «***» поэтому следует не нарушать границы меток при введении информации. К примеру:

***Edit***

Edit-представляет собой поле ввода-редактирования строки символов.

Здесь можно ввести свою информацию.

***

Для пользователей есть справка о пользовании программой, для вызова справки нужно нажать по надписи «Справка» у верхней границы диалогового окна программы.

Для выхода из программы следует нажать «Меню» - «Выход».

1.2.2 Организация входных и выходных данных

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

stroka: string- переменная, которой присваивается выбранный в меню объект, точнее его название.

s: string- переменная в цикле, в неё строки из файла помещаются.

F: TextFile;- переменная в цикле, текстовый файл в котором хранится информация.

1.2.3 Выбор состава технических и программных средств

В последнее время резко возрос интерес к программированию. Это связано с развитием и внедрением в повседневную жизнь информационно-коммуникационных технологий. Если человек имеет дело с компьютером, то рано или поздно у него возникает желание, а иногда и необходимость, программировать.

Среди пользователей персональных компьютеров в настоящее время наиболее популярно семейство операционных систем Windows и, естественно, что тот, кто собирается программировать, стремится писать программы, которые будут работать в этих системах. Несколько лет назад рядовому программисту оставалось только мечтать о создании собственных программ, работающих в среде Windows, т. к. единственным средством разработки был Borland C++ for Windows, явно ориентированный на профессионалов, обладающих серьезными знаниями и опытом.

Бурное развитие вычислительной техники, потребность в эффективных средствах разработки программного обеспечения привели к появлению систем программирования, ориентированных на так называемую "быструю разработку", среди которых можно выделить Borland Delphi и Microsoft Visual Basic. В основе систем быстрой разработки (RAD-систем, Rapid Application Development — среда быстрой разработки приложений) лежит технология визуального проектирования и событийного программирования, суть которой заключается в том, что среда разработки берет на себя большую часть рутинной работы, оставляя программисту работу по конструированию диалоговых окон и функций обработки событий. Производительность программиста при использовании RAD-систем — фантастическая! Среда программирования – Delphi – весьма быстрая и удобная для разработки приложений различного назначения для Windows. Для нормальной работы программы необходим IBM совместимый компьютер с тактовой частотой процессора не ниже 144МГц и выше, оперативной памятью 16 Мб, жесткий диск объемом не менее 500Мб.

2. Разработка рабочего проекта

1. Разработка программы

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

В настоящее время существует достаточно большое количество программных систем, позволяющих создавать и использовать локальные (dBASE, FoxPro, Access, Paradox) и удаленные (Interbase, Oracle, Sysbase, Infomix, Microsoft SQL Server) базы данных.

В состав Delphi входят компоненты, позволяющие создавать программы работы с файлами данных, созданными различными системами: от SE до Infomix и Oracle. Delphi также позволяет программисту, используя утилиту Borland Database Desktop, создавать файлы баз данных в Различных форматах.

2.2 Спецификация программы

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

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

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

База данных — это набор файлов (таблиц), в которых находится информация. Как правило, база данных состоит из нескольких таблиц, которые размещают в одном каталоге. Каталог для новой базы данных создается обычным образом, например, при помощи Проводника.

2.3 Текст программы

nit Unit5;

interface

uses

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

Dialogs, Menus, StdCtrls, Unit2, Buttons, ExtCtrls, Mask, Grids, CheckLst,

ActnCtrls, ToolWin, ActnMan, ActnMenus, TeeProcs, TeEngine, Chart,

ValEdit, ComCtrls;

type

TForm1 = class(TForm)

MainMenu1: TMainMenu;

ComboBox1: TComboBox;

Memo2: TMemo;

N1: TMenuItem;

Edit3: TEdit;

Label3: TLabel;

Button2: TButton;

Label1: TLabel;

N2: TMenuItem;

N3: TMenuItem;

Label2: TLabel;

N4: TMenuItem;

N5: TMenuItem;

(процедуры используемые в программе)

procedure ComboBox1Change(Sender: TObject);

procedure Edit1KeyPress(Sender: TObject; var Key: Char);

procedure Button2Click(Sender: TObject);

procedure N2Click(Sender: TObject);

procedure N3Click(Sender: TObject);

procedure N5Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

F: TextFile;

implementation

uses Unit4;

{$R *.dfm}

procedure TForm1.ComboBox1Change(Sender: TObject);

var stroka, s: string;

begin

stroka:=Combobox1.Items.Strings[Combobox1.ItemIndex]; // присвоение переменной "stroka" названия выбранного компонента в ComboBox

AssignFile(F, '1.txt'); // привязка текстового файла к файловой переменной F

Reset(F); // открытие файла F для чтения

Repeat // цикл с постусловием. в переменную S считываются строки из файла до тех пор, пока строка в файле не совпадёт с выбранным элемнтом в ComboBox

readln(F,s)

until s='***'+stroka+'***';

Memo2.Lines.Text:='';

readln(F,s); // опять считывается

while s<>'***' do begin // цикл с предусловием.

Memo2.Lines.Text:=Memo2.Lines.Text+s; // в Memo дописываются данные из переменной s

readln(F,s); // считывается строка из файла в переменную S

end;

CloseFile(F); // закрытие файла

end;

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

begin

Memo2.LINES.Text:='Работает'

end;

procedure TForm1.Button2Click(Sender: TObject);

var stroka, s: string;

label W;

begin

stroka:=Edit3.Text; // присвоить переменной текст из поля Edit3

AssignFile(F, '1.txt'); // привязка текстового файла к файловой переменной F

Reset(F); // открытие файла F для чтения

Repeat // цикл с постусловием. в переменную S считываются строки из файла до тех пор, пока строка в файле не совпадёт с выбранным элемнтом в ComboBox

readln(F,s);

if seekEof(F) then begin // условие о совпадении

Edit3.Text:='Компонент не найден или вы ошиблись в написании!!!!'; // если не совпадет то вывести надпись

goto w;

end;

until s='***'+stroka+'***';

Memo2.Lines.Text:=''; // очищение поля Мемо2

readln(F,s); // опять считывается

while s<>'***' do begin // цикл с предусловием.

Memo2.Lines.Text:=Memo2.Lines.Text+s; // в Memo дописываются данные из переменной s

readln(F,s);