Технология разработки программного продукта - Программирование, компьютеры и кибернетика курсовая работа

Технология разработки программного продукта - Программирование, компьютеры и кибернетика курсовая работа




































Главная

Программирование, компьютеры и кибернетика
Технология разработки программного продукта

Создание электронного учебника "Визуальные и не визуальные компоненты Delphi". Основные требования к организации интерфейса. Логическая структура и технические средства. Аппаратно–программный комплекс. Применение программы, тестирование и отладка.


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


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


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


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


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

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.


Понятие компонента является фундаментальным для Delphi. Без компонентов все преимущества визуальной разработки приложения исчезают и говорить становится не о чем. Поэтому соберите все силы и внимательно прочитайте этот раздел, пытаясь усвоить не только формальную сторону вопроса, но и саму суть понятия компонента.
Существует два взгляда на компоненты.
Взгляд снаружи, точнее -- из визуальной среды разработки. С этой точки зрения компоненты -- это самодостаточные строительные блоки, которые вы берете из Палитры Компонентов и переносите на форму для создания собственно приложения. Примеры компонентов вам известны: это кнопки, метки, строки редакторов и т. д.
Существует еще и взгляд изнутри, т. е. взгляд из программы на языке Object Pascal. С этой точки зрения компоненты -- это классы, порожденные прямо или косвенно от класса TComponent и имеющие опубликованные (published) свойства. Экземпляры компонентов -- это объекты этих классов, существующие в качестве полей формы. Среди опубликованных свойств компонентов обязательно присутствует имя (Name), под которым экземпляр компонента представляется в Инспекторе Объектов.
Объединение этих двух точек зрения дает цельное представление о том, что такое компоненты. При работе с компонентами из визуальной среды вы всегда видите их лицевую сторону. Однако как только вы начинаете писать обработчики событий и управлять компонентами программно, вы соприкасаетесь с программной стороной компонентов, суть которой -- объекты. Таким образом, Delphi обеспечивает симбиоз визуального и объектно-ориентированного программирования.
При анализе структуры компонента обнаруживается, что его природа троична и лучше всего описывается формулой:
Компонент =состояние (свойства)+ действия (методы)+ обратные связи (события)
Состояние компонента описывается его свойствами. Свойства -- это атрибуты компонента, которые определяют, как компонент отображается на экране и как функционирует. Свойства бывают изменяемые (для чтения и записи) и неизменяемые (только для чтения). В зависимости от времени установки свойства подразделяются на свойства времени проектирования (design time) и свойства времени выполнения (run-time). Первые устанавливаются для каждого компонента в Инспекторе Объектов и определяют начальное состояние компонента. Во время выполнения приложения эти свойства могут быть изменены операторами программы, соответственно изменится вид и поведение компонента. Вторая группа -- это свойства, которые не отражены в окне Инспектора Объектов и управлять которыми можно только из программы. С точки зрения языка Object Pascal суть различия между свойствами времени проектирования и свойствами времени выполнения совсем проста -- первые объявлены в своем классе в секции published, а вторые -- в секции public.
Действия, выполняемые компонентом, -- это его методы. Вызовы методов компонента помещаются в исходный код программы и происходят только во время выполнения приложения. Методы не имеют под собой визуальной основы.
Обратные связи компонента -- это его события. События обеспечивают интерактивность компонентов, благодаря им приложение на Delphi строится как программный автомат. В Object Pascal нет специальных языковых средств для представления событий, да они и не нужны, поскольку события реализуются с помощью свойств, содержащих указатели на методы.
Все множество компонентов подразделяется на две группы: визуальные и невизуальные компоненты.
Визуальные компоненты (visual components) -- это управляющие элементы пользовательского интерфейса (controls), т. е. кнопки, метки, блоки списков и др. Они видны на экране и выглядят одинаково на стадии проектирования и во время работы приложения. В этом их главное достоинство.
Невизуальные компоненты (nonvisual components) -- это, так сказать, бойцы невидимого фронта, они работают, но сами на экране не видны. К невизуальным компонентам относятся таймер, компоненты доступа к базам данным и др. На стадии проектирования невизуальный компонент представляется на форме небольшим значком. Его свойства устанавливаются в Инспекторе Объектов. Некоторые компоненты хотя и являются невизуальными, могут что-нибудь отображать на экране. Например, невизуальный компонент MainMenu отображает на форме строку главного меню, а невизуальный компонент OpenDialog -- стандартное диалоговое окно выбора файла.
Для изучения компонентов Delphi используется большое количество книг, например: книга Фараонова [1] и Культина [2].
При разработке программы были выявлены и исправлены ошибки. В основном ошибки были в проблеме воспроизведения видео, а так же в эмуляции. Так же были синтаксические ошибки и ошибки при подсчете результата тестирования.
На тестирование и отладку ушло 40% времени от общего времени разработки программного продукта.
Основные ошибки при тестирование программы представлены в Таблице 2
Неправильно производился подсчет в тестировании
Неправильно считалась переменная ответа.
Не отображались html-файлы в Webbrouser
Видео-файл не подгонялся под размер панели
Исправлено, путем добавления процедуры, позволяющая видео пропорционально подгоняться под размер панели
1. Фаронов В.В. «Программирование баз данных в Delphi 6».- СПб.: , 2003. 520 с.
2. Культин Н.Б. «Основы программирования в Delphi 7».- СПб.: БХВ Петербург, 2004.- 597 с.
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, ComCtrls, acProgressBar, jpeg, sSkinManager,
sSkinProvider, Buttons, sSpeedButton, StdCtrls;
procedure btn2Click(Sender: TObject);
procedure btn1Click(Sender: TObject);
procedure btn1MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure btn1MouseLeave(Sender: TObject);
procedure lbl1MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure img1MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure btn2MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure btn2MouseLeave(Sender: TObject);
procedure lbl2MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure TForm1.btn2Click(Sender: TObject);
procedure TForm1.btn1Click(Sender: TObject);
procedure TForm1.btn1MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure TForm1.btn1MouseLeave(Sender: TObject);
procedure TForm1.lbl1MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure TForm1.img1MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure TForm1.btn2MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure TForm1.btn2MouseLeave(Sender: TObject);
procedure TForm1.lbl2MouseMove(Sender: TObject; Shift: TShiftState; X,
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Menus, jpeg, ExtCtrls, acPNG, XPMan, StdCtrls, Buttons, sBitBtn;
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure N4Click(Sender: TObject);
procedure img2MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure img1MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure img3MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure img4MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure FormCreate(Sender: TObject);
procedure img7Click(Sender: TObject);
procedure img6Click(Sender: TObject);
procedure img5Click(Sender: TObject);
procedure N1Click(Sender: TObject);
procedure N5Click(Sender: TObject);
procedure FormHide(Sender: TObject);
procedure N6Click(Sender: TObject);
procedure img8MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure img9Click(Sender: TObject);
procedure N7Click(Sender: TObject);
procedure N3Click(Sender: TObject);
procedure N2Click(Sender: TObject);
procedure sbtbtn1Click(Sender: TObject);
procedure img10MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure N8Click(Sender: TObject);
procedure img11Click(Sender: TObject);
Unit1, Unit3, Unit4, Unit5, Unit6, Unit7, Unit8;
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
procedure TForm2.N4Click(Sender: TObject);
if messagedlg ('Вы действительно хотите выйти?',mtConfirmation,mbOKCancel,0)=1 then
procedure TForm2.img2MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure TForm2.img1MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure TForm2.img3MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure TForm2.img4MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure TForm2.FormCreate(Sender: TObject);
procedure TForm2.img7Click(Sender: TObject);
if messagedlg('Вы действительно хотите выйти?',mtConfirmation,mbOKCancel,0)=1 then
procedure TForm2.img6Click(Sender: TObject);
procedure TForm2.img5Click(Sender: TObject);
procedure TForm2.N1Click(Sender: TObject);
procedure TForm2.N5Click(Sender: TObject);
procedure TForm2.FormHide(Sender: TObject);
procedure TForm2.N6Click(Sender: TObject);
procedure TForm2.img8MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure TForm2.img9Click(Sender: TObject);
procedure TForm2.N7Click(Sender: TObject);
procedure TForm2.N3Click(Sender: TObject);
procedure TForm2.N2Click(Sender: TObject);
procedure TForm2.sbtbtn1Click(Sender: TObject);
img1.Picture.LoadFromFile(dlgOpen1.FileName);
procedure TForm2.img10MouseMove(Sender: TObject; Shift: TShiftState; X,
procedure TForm2.N8Click(Sender: TObject);
procedure TForm2.img11Click(Sender: TObject);
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ComCtrls, sTreeView, OleCtrls, SHDocVw, StdCtrls, sButton, Menus;
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure sTreeView1DblClick(Sender: TObject);
procedure sButton1Click(Sender: TObject);
procedure sButton2Click(Sender: TObject);
procedure N1Click(Sender: TObject);
procedure N2Click(Sender: TObject);
procedure N3Click(Sender: TObject);
procedure N4Click(Sender: TObject);
uses Unit2, Unit1, Unit4, Unit5, Unit8;
procedure TForm3.FormClose(Sender: TObject; var Action: TCloseAction);
procedure TForm3.sTreeView1DblClick(Sender: TObject);
if streeview1.Items.Item[1].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\библиотека VCL\biblvcl.htm');
if streeview1.Items.Item[2].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\библиотека VCL\klastcomp.htm');
if streeview1.Items.Item[4].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\библиотека VCL\svvavkomp.htm');
if streeview1.Items.Item[5].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\библиотека VCL\sobitiya.htm');
if streeview1.Items.Item[3].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\библиотека VCL\metodi.htm');
if streeview1.Items.Item[6].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\библиотека VCL\tipymetod.htm');
if streeview1.Items.Item[8].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\создание визуальных компонент\proverka.htm');
if streeview1.Items.Item[9].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\создание визуальных компонент\isxkod.htm');
if streeview1.Items.Item[10].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\создание визуальных компонент\realiz.htm');
if streeview1.Items.Item[12].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\стандартные компоненты\elemypr.htm');
if streeview1.Items.Item[13].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\стандартные компоненты\additional.htm');
if streeview1.Items.Item[14].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\стандартные компоненты\intfakt.htm');
if streeview1.Items.Item[16].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\Создание не визуальных компонент\dialog.htm');
if streeview1.Items.Item[17].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\Создание не визуальных компонент\mainform.htm');
if streeview1.Items.Item[18].Selected then webbrowser1.Navigate(GetCurrentDir+'\страницы\Создание не визуальных компонент\nevkomp.htm');
procedure TForm3.sButton1Click(Sender: TObject);
procedure TForm3.sButton2Click(Sender: TObject);
if messagedlg('Вы действительно хотите выйти?',mtConfirmation,mbOKCancel,0)=1 then
procedure TForm3.N1Click(Sender: TObject);
procedure TForm3.N2Click(Sender: TObject);
procedure TForm3.N3Click(Sender: TObject);
if messagedlg('Вы действительно хотите выйти?',mtConfirmation,mbOKCancel,0)=1 then
procedure TForm3.N4Click(Sender: TObject);
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Menus, jpeg, ExtCtrls, StdCtrls, Buttons, sBitBtn, acPNG, sPanel;
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure N4Click(Sender: TObject);
procedure N1Click(Sender: TObject);
procedure N3Click(Sender: TObject);
procedure sbtbtn2Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure img2Click(Sender: TObject);
procedure img3Click(Sender: TObject);
procedure img5Click(Sender: TObject);
procedure img6Click(Sender: TObject);
procedure edt1KeyDown(Sender: TObject; var Key: Word;
procedure img7Click(Sender: TObject);
procedure img9DblClick(Sender: TObject);
procedure edt2KeyDown(Sender: TObject; var Key: Word;
procedure img11Click(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure FormHide(Sender: TObject);
procedure img10Click(Sender: TObject);
procedure img12Click(Sender: TObject);
procedure edt3KeyDown(Sender: TObject; var Key: Word;
procedure img13Click(Sender: TObject);
procedure img15Click(Sender: TObject);
procedure img17DblClick(Sender: TObject);
procedure img18Click(Sender: TObject);
procedure edt4KeyDown(Sender: TObject; var Key: Word;
procedure img19Click(Sender: TObject);
procedure img21Click(Sender: TObject);
procedure img23Click(Sender: TObject);
procedure img25Click(Sender: TObject);
procedure img26Click(Sender: TObject);
procedure img16Click(Sender: TObject);
procedure sbtbtn3Click(Sender: TObject);
procedure sbtbtn4Click(Sender: TObject);
procedure pimg2Click(Sender: TObject);
procedure pimg4Click(Sender: TObject);
procedure pimg5Click(Sender: TObject);
procedure pimg7Click(Sender: TObject);
procedure pimg9Click(Sender: TObject);
procedure pimg10Click(Sender: TObject);
procedure pimg12Click(Sender: TObject);
procedure edt6KeyPress(Sender: TObject; var Key: Char);
procedure pimg13Click(Sender: TObject);
procedure pimg15Click(Sender: TObject);
procedure pimg16Click(Sender: TObject);
procedure pimg18DblClick(Sender: TObject);
procedure mmo1KeyPress(Sender: TObject; var Key: Char);
procedure pimg19Click(Sender: TObject);
procedure pimg21Click(Sender: TObject);
procedure mmo2KeyPress(Sender: TObject; var Key: Char);
procedure pimg22Click(Sender: TObject);
procedure pimg24Click(Sender: TObject);
procedure pimg26Click(Sender: TObject);
procedure pimg28Click(Sender: TObject);
procedure FormKeyPress(Sender: TObject; var Key: Char);
procedure pimg30Click(Sender: TObject);
procedure N2Click(Sender: TObject);
procedure TForm4.FormClose(Sender: TObject; var Action: TCloseAction);
procedure TForm4.N4Click(Sender: TObject);
if messagedlg('Вы действительно хотите выйти?',mtConfirmation,mbOKCancel,0)=1 then
procedure TForm4.N1Click(Sender: TObject);
procedure TForm4.N3Click(Sender: TObject);
procedure TForm4.sbtbtn2Click(Sender: TObject);
procedure TForm4.FormCreate(Sender: TObject);
procedure TForm4.img2Click(Sender: TObject);
procedure TForm4.img3Click(Sender: TObject);
spnl1.Caption:='Поставьте около компонента Edit кнопку это компонент Button на вкладке Standart';
procedure TForm4.img5Click(Sender: TObject);
procedure TForm4.img6Click(Sender: TObject);
spnl1.Caption:='Поменяйте название кнопки в свойстве Caption в окне инспектора обьектов (Object Inspector) на Имя';
procedure TForm4.edt1KeyDown(Sender: TObject; var Key: Word;
if (edt1.Text='Имя')or(edt1.Text='имя') then
spnl1.Caption:='Щёлкните по кнопке 2 раза';
procedure TForm4.img7Click(Sender: TObject);
if (edt1.Text='Имя')or(edt1.Text='имя') then
spnl1.Caption:='Щёлкните по кнопке 2 раза';
procedure TForm4.img9DblClick(Sender: TObject);
spnl1.Caption:='Напишите в обработчике событий: Form1.Caption:=Edit1.Text;'
procedure TForm4.edt2KeyDown(Sender: TObject; var Key: Word;
if (Edt2.Text='Form1.Caption:=Edit1.Text;')or(Edt2.Text='form1.caption:=edit1.text;') then
spnl1.Caption:='Поставтье на форму ещё 1 кнопку';
procedure TForm4.img11Click(Sender: TObject);
procedure TForm4.FormShow(Sender: TObject);
procedure TForm4.FormHide(Sender: TObject);
procedure TForm4.img10Click(Sender: TObject);
if (Edt2.Text='Form1.Caption:=Edit1.Text;')or(Edt2.Text='form1.caption:=edit1.text;') then
spnl1.Caption:='Поставтье на форму ещё 1 кнопку';
procedure TForm4.img12Click(Sender: TObject);
spnl1.Caption:='Измените Имя 2 Кнопки на: Выход'
procedure TForm4.edt3KeyDown(Sender: TObject; var Key: Word;
if (Edt3.Text='Выход')or(Edt3.Text='выход') then
spnl1.Caption:='Перейдите на вкладку Events';
procedure TForm4.img13Click(Sender: TObject);
if (Edt3.Text='Выход')or(Edt3.Text='выход') then
spnl1.Caption:='Перейдите на вкладку Events';
procedure TForm4.img15Click(Sender: TObject);
spnl1.Caption:='Щёлкните по процедуре Onclick 2 раза';
procedure TForm4.img17DblClick(Sender: TObject);
spnl1.Caption:='Напишите в обработчик событий следущие строчки: Close;'
procedure TForm4.img18Click(Sender: TObject);
if (Edt4.Text='Close;')or(Edt4.Text='close;') then
spnl1.Caption:='Перейдите на вкладку Run';
procedure TForm4.edt4KeyDown(Sender: TObject; var Key: Word;
if (Edt4.Text='Close;')or(Edt4.Text='close;') then
spnl1.Caption:='Перейдите на вкладку Run';
procedure TForm4.img19Click(Sender: TObject);
spnl1.Caption:='Нажмите на Run на вкладке Run';
procedure TForm4.img21Click(Sender: TObject);
spnl1.Caption:='введите в Edit1 Текст: Моя форма.Нажмите на кнопку имя, и посмотрите на название формы';
procedure TForm4.img23Click(Sender: TObject);
if (edt5.Text='Моя форма') or (edt5.Text='моя форма') then
spnl1.Caption:='Теперь нажмите на кнопку Выход';
procedure TForm4.img25Click(Sender: TObject);
spnl1.Caption:='Поздравляем вы научились пользоваться визуальными компонентами делфи такими как Кнопка Поле Edit И Форма Нажмите в любое место.';
procedure TForm4.img26Click(Sender: TObject);
procedure TForm4.img16Click(Sender: TObject);
if (Edt4.Text='Close;')or(Edt4.Text='close;') then
spnl1.Caption:='Перейдите на вкладку Run';
procedure TForm4.sbtbtn3Click(Sender: TObject);
spnl1.Caption:='Поставьте на форму компонент Edit1 из вкладки Standard';
procedure TForm4.sbtbtn4Click(Sender: TObject);
spnl1.Caption:='Перейдите на вклвдку Dialogs';
procedure TForm4.pimg2Click(Sender: TObject);
spnl1.Caption:='Поставте на форму SaveDialog';
procedure TForm4.pimg4Click(Sender: TObject);
procedure TForm4.pimg5Click(Sender: TObject);
spnl1.Caption:='Перейдите на вкладку standart';
procedure TForm4.pimg7Click(Sender: TObject);
spnl1.Caption:='Поставьте на форму кнопку';
procedure TForm4.pimg9Click(Sender: TObject);
procedure TForm4.pimg10Click(Sender: TObject);
spnl1.Caption:='Переименуйте кнопку в "Сохранить"';
procedure TForm4.pimg12Click(Sender: TObject);
procedure TForm4.edt6KeyPress(Sender: TObject; var Key: Char);
if (edt6.Text='Сохранить')or(edt6.Text='сохранить') then
spnl1.Caption:='Поставьте на вкалдку компонент memo';
procedure TForm4.pimg13Click(Sender: TObject);
if (edt6.Text='Сохранить')or(edt6.Text='сохранить') then
spnl1.Caption:='Поставьте на вкалдку компонент memo';
procedure TForm4.pimg15Click(Sender: TObject);
procedure TForm4.pimg16Click(Sender: TObject);
spnl1.Caption:='Щёлкнете по кнопке 2 раза';
procedure TForm4.pimg18DblClick(Sender: TObject);
spnl1.Caption:='В появившемся окне напишите следующий код "with SaveDialog1, Memo1 do if Execute then begin Lines.SaveToFile(FileName);Memo1.Lines.SaveToFile(FileName);"';
procedure TForm4.mmo1KeyPress(Sender: TObject; var Key: Char);
if mmo1.Text='with SaveDialog1, Memo1 do if Execute then begin Lines.SaveToFile(FileName);Memo1.Lines.SaveToFile(FileName);' then
spnl1.Caption:='Запусите программу щёлкнуш по кнопке Run';
procedure TForm4.pimg19Click(Sender: TObject);
if mmo1.Text='with SaveDialog1, Memo1 do if Execute then begin Lines.SaveToFile(FileName);Memo1.Lines.SaveToFile(FileName);' then
spnl1.Caption:='Запусите программу щёлкнуш по кнопке Run';
procedure TForm4.pimg21Click(Sender: TObject);
spnl1.Caption:='Введите в Поле Мемо следующий текст "Моё первое сохранение"';
procedure TForm4.mmo2KeyPress(Sender: TObject; var Key: Char);
if (mmo2.Text='Моё первое сохранение')or(mmo2.text='моё первое сохранение')then
spnl1.Caption:='Нажмите на кнопку сохранить';
procedure TForm4.pimg22Click(Sender: TObject);
if (mmo2.Text='Моё первое сохранение')or(mmo2.text='моё первое сохранение')then
spnl1.Caption:='Нажмите на кнопку сохранить';
procedure TForm4.pimg24Click(Sender: TObject);
spnl1.Caption:='Введите в поле имя Файла "Сохранение.txt" и нажмите на кнопку сохранить';
procedure TForm4.pimg26Click(Sender: TObject);
if (edt7.text='Сохранение.txt')or(edt7.text='сохранение.txt')then
spnl1.Caption:='На рабочем столе появился файл с нашим назвыанием и расширением TXT Щёллкните по нему левой кнопкой мыши';
procedure TForm4.pimg28Click(Sender: TObject);
spnl1.Caption:='Теперь нажмите Enter';
procedure TForm4.FormKeyPress(Sender: TObject; var Key: Char);
spnl1.Caption:='То что мы писали в Мемо поле записалось и в TXT файли теперь вы научились сохранять файлы из мемо поля для продолжение щёлкните мышкой в любое место';
procedure TForm4.pimg30Click(Sender: TObject);
procedure TForm4.N2Click(Sender: TObject);
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Menus, MPlayer, StdCtrls, Buttons, sBitBtn, ExtCtrls, sPanel,
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure N3Click(Sender: TObject);
procedure N2Click(Sender: TObject);
procedure N1Click(Sender: TObject);
procedure sbtbtn1Click(Sender: TObject);
procedure sbtbtn2Click(Sender: TObject);
procedure sbtbtn3Click(Sender: TObject);
procedure sbtbtn4Click(Sender: TObject);
procedure sbtbtn5Click(Sender: TObject);
procedure sbtbtn6Click(Sender: TObject);
procedure sbtbtn7Click(Sender: TObject);
procedure sbtbtn8Click(Sender: TObject);
procedure sbtbtn9Click(Sender: TObject);
procedure N4Click(Sender: TObject);
procedure TForm5.FormClose(Sender: TObject; var Action: TCloseAction);
procedure TForm5.N3Click(Sender: TObject);
if messagedlg('Вы действительно хотите выйти?',mtConfirmation,mbOKCancel,0)=1 then
procedure TForm5.N2Click(Sender: TObject);
procedure TForm5.N1Click(Sender: TObject);
procedure TForm5.sbtbtn1Click(Sender: TObject);
mp1.FileName:=GetCurrentDir+'\Видео\Основные компоненты Delphi (визуальные).mpg';
procedure TForm5.sbtbtn2Click(Sender: TObject);
mp1.FileName:=GetCurrentDir+'\Видео\Урок Delphi 2010. Компонент ProgressBar..mpg';
procedure TForm5.sbtbtn3Click(Sender: TObject);
mp1.FileName:=GetCurrentDir+'\Видео\Урок Delphi. Компонент MediaPlayer. Воиспр. звуков. файл.mpg';
procedure TForm5.sbtbtn4Click(Sender: TObject);
mp1.FileName:=GetCurrentDir+'\Видео\Урок Delphi. Новая версия. Работаем с компонентом Timage..mpg';
procedure TForm5.sbtbtn5Click(Sender: TObject);
mp1.FileName:=GetCurrentDir+'\Видео\Установка компонента AlphaSkins, Delphi - yaDelphi.ru.mpg';
procedure TForm5.sbtbtn6Click(Sender: TObject);
mp1.FileName:=GetCurrentDir+'\Видео\Форма (Form) Delphi_2.mpg';
procedure TForm5.sbtbtn7Click(Sender: TObject);
procedure TForm5.sbtbtn8Click(Sender: TObject);
Основные требования к составу и параметрам технических средства. Верификация программного продукта. Расширение функционала программы и его реализация. Отладка и тестирование программного продукта. Тестирование программы в граничных и реальных условиях. курсовая работа [1,3 M], добавлен 29.12.2014
Создание компьютерной игры посредством среды программирования Delphi. Инструменты разработки, компоненты и методы для разработки программы. Логическая и физическая структуры, основные функции и элементы управления программы, ее тестирование и отладка. курсовая работа [27,9 K], добавлен 26.07.2014
Использование программы Microsoft Word 2010 при создании электронного учебника. Структура учебника, навигация, полнотекстный поиск, защита информации от изменений. Алгоритм разработки программного продукта. Описание технологических средств учебника. контрольная работа [196,9 K], добавлен 06.05.2014
Создание электронного учебника "Энциклопедия Интернет" для ознакомления пользователя с его функциями. Подготовка к разработке программного продукта. Анализ предметной области. Выбор языка программирования. Работа в интегрированной среде Delphi 7. курсовая работа [1,2 M], добавлен 09.03.2012
Особенности алгоритмов, критерии качества. Создание и применение программного продукта на языке Delphi. Тип операционной системы. Внутренняя структура программного продукта. Руководство пользователя и программиста, расчет себестоимости и цены программы. дипломная работа [1,5 M], добавлен 12.06.2009
Принципы, которыми следует руководствоваться при создании электронного учебника. Возможность построения простого и удобного механизма навигации в пределах электронного учебника. Тестирование и отладка программного продукта, проверка на правильную работу. дипломная работа [2,0 M], добавлен 24.01.2016
Анализ предметной области разрабатываемого программного продукта. Разработка интерфейса пользователя и структурной схемы игровой программы "Крестики-нолики". Отладка и тестирование. Проведение исследования компонентов программной среды Borland Delphi 6.0. курсовая работа [660,4 K], добавлен 08.03.2015
Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д. PPT, PPTX и PDF-файлы представлены только в архивах. Рекомендуем скачать работу .

© 2000 — 2021



Технология разработки программного продукта курсовая работа. Программирование, компьютеры и кибернетика.
Каннабиноидная наркомания
Курсовая Работа На Тему Mathcad
Лекция 10.Типы диалога.
Реферат Модернизация Специального Образования
Реферат: Хронологические схемы по истории философии: Философ, его взгяды (кратко)
Итоговая Контрольная Работа По Биологии 9
Дипломная работа по теме Экономическая модель выпуска и реализации основных сельхозпродуктов на примере Брестской области
Доклад по теме Обзор музеев Санкт-Петербурга, связаных с А.С. Пушкиным
Реферат по теме Загрязнение окружаюшей среды
Контрольная Работа На Тему Разработка Технологического Процесса Термической Обработки Детали
Социальная Психология Практические Работы
Реферат: Иван Грозный: поиск альтернативных путей социально-политического развития Руси
Курсовая работа: Активный полосовой фильтр
Инструменты Качества Реферат
Практическая Работа По Сертификации С Ответами
Реферат по теме Победоносцев К. П. - критик «великой лжи нашего времени»
Реферат: Должностная инструкция зубного врача
Контрольные Работы За Год 5 Класс
Реферат: Задачи с решениями по ценным бумагам
Контрольная Работа Родной Русский 10 Класс
Теоретические основы и практические аспекты муниципального образования - Менеджмент и трудовые отношения отчет по практике
Исследование правового статуса защитника в уголовном судопроизводстве - Государство и право дипломная работа
Организация товароведного процесса в ООО "Стандарт" - Маркетинг, реклама и торговля отчет по практике


Report Page