42077

Створення Delphi- проектів з використанням компонентів відображення даних

Лабораторная работа

Информатика, кибернетика и программирование

Створити Delphi-проект, головна форма якого має вигляд, зображений на рис.1. Для надписів “конкурсант А” ,“конкурсант В” , “конкурсант С” використати компоненти типу TLabel (текстові мітки), для введення балів – компоненти типу TEdit, для графічного відображення результатів – компоненти типу TProgressBar. Для заборони введення в полях любих символів крім цифр використано подію OnKeyPress для поля Edit. Для полівEdit2Edit3 в інспекторі обєктів для події OnKeyPress вибрано зі списку цю ж саму процедуру.Керування доступом до кнопки “ пітсумкиâ€здійснено з використанням події OnChge для поляEdit1.

Русский

2013-10-27

71.53 KB

8 чел.

Завдання:

Створити Delphi-проект, головна форма якого має вигляд, зображений на рис.1. Для надписів конкурсант А ,конкурсант В , конкурсант С використати компоненти типу TLabel (текстові мітки), для введення балів – компоненти типу TEdit, для графічного відображення результатів – компоненти типу TProgressBar.

Відображення результатів – компонент типу TProgressBar.

Графічне відображення результатів повинно здійснюватися після натискання кнопки (компоненти типу TButon) з надписом “підсумки”. Надписи на текстових мітках здійснювати на червоному, синьому та зеленому фоні відповідно.

Змн.

Лист

№ докум.

Підпис

Дата

Арк.

1

ПР. ООП.10.7-8.ТЗ

Розроб.

Зеленюк

Перевір.

Чемолосова

.

Створення Delphi- проектів з використанням компонентів відображення даних.

Літ.

Аркушів

3

ЧІК, гр.РП-31

Бали в полях введення повинні відображатися кольорами,відповідними фону надписів. Кнопка повинна мати доступ лише при наявності даних в полях введення. В полях введення дозволити лиш введення цифр.

Хід виконання роботи:

Розташовано на формі компоненти, передбачені завданням таким чином, як показано на Рис.1 та надано їм заданих властивостей.

Рис.1 Інтерфейс проекту

2. Для заборони введення в полях любих символів крім цифр використано подію OnKeyPress для поля Edit. Для полівEdit2,Edit3 в інспекторі об’єктів  для події OnKeyPress вибрано зі списку цю ж саму процедуру.

3.Керування доступом до кнопки “ пітсумки”здійснено з використанням події OnChage для поляEdit1.для полів Edit2,Edit3 в інспекторі об’єктів для події OnChage вибрано зі списку цю ж саму процедуру.

4.для відображення результатів конкурсу в графічні формі використати подію OnClick для кнопки підсумки”. В ній повинні виконуватися такі дї:

- визначення максимального результату.

- присвоєння праві границі інтервалів індикаторів максимального значення.

- визначення поточних положень індекаторів відповідно до результатів конкурсу.

5. творити нову версію проекту, змінивши вигляд інтерфейсу наступним чином:

- смуги в індикаторі зробити суцільними;

- індикатори зробити вертикальними;

Рис.2 Інтерфейс проекту

6. Створюю нову версію проекту, використовуючи в якості індикаторів компоненти Gauge ( вертикальний або горизонтальний)

Змн.

Арк.

№ докум.

Підпис

Дата

Арк.

2

ПР. ООП.21.7-8ТЗ

Рис.3 “ інтерфейс створеної програми”

Код програми:

procedureEdt1Change(Sender:TObject);

Unit Unit1;                                                                                     procedure Button1Click (Sender: TObject);

Interface{ Private declarations}

Uses                                                                                                    publik

Windows, Messages, SysUtils, variants,Classes,                        {Publik declarations}

Graphigs, StdCtrls,ComCtrls;                                                         end;

Type                                                                                                    var

Lebel1: TLabel;                                                                                 Form1:TForm1;

Lebel2: TLabel;                                                                                 key: char;         

Lebel3: TLabel;                                                                                  implementation

Змн.

Арк.

№ докум.

Підпис

Дата

Арк.

2

ПР. ООП.10.7-8ТЗ

Edit1:TEdit;                                                                                        {$*.dfm}

Edit2:TEdit;                                                                                  //заборонавведеннясимволів, крімциф

Edit3:TEdit;procedureTForm1.Edit1keyPress(Sender: TObjekt)

ProgressBar1: TProgressBar;                                                        begin    

ProgressBar2: TProgressBar;                                                       case kkey of

ProgressBar3: TProgressBar;                                                      “0”..”9”:;

Button1: TButton;                                                                          else key:=chr(0)

Procedure Edit1KeyPress ( Sender: TObject; var Key: Char);    end;

Висновок : Створено Delphi – проект з використанням компонентів відображення та редагування.


 

А также другие работы, которые могут Вас заинтересовать

19772. Механика грунтов 440 KB
  Физические свойства грунтов Степень уплотненности грунта в условиях природного залегания оценивается на основе физических характеристик выявляемых путем постановки опытов в полевых условиях или испытания в лабораториях. Рассматрив...
19773. Строительные конструкции 6.62 MB
  71. Конструктивные схемы прокладки линейной части трубопроводов Основной составляющей магистрального трубопровода является линейная часть непрерывная нить сваренная из отдельных труб или секций и уложенная вдоль трассы тем или иным способом. В настоящее время су
19774. Сооружение и ремонт резервуарных парков 3.72 MB
  81. Стальные вертикальные цилиндрические резервуары с плавающими крышами. Для сокращения потерь нефтепродуктов от испарения поверхность жидкости в резервуаре закрывают круглой мембраной понтоном или плавающей крышей рис.1.. Основное отличие данного типа резервуар...
19775. Технология металлов 109.5 KB
  91. Что называется скрапом в металлургической промышленности. Скрап Вторичный металл металлическое сырьё в виде лома и отходов производства предназначаемое для переплавки с целью получения годного металла. Процесс производства стали основан на методах плавления ч
19776. Защита трубопроводов от коррозии 471 KB
  101. Основной принцип катодной защиты. Катодная защита рис. 1 защита подземного металлического трубопровода при наложении электрического поля от внешнего источника тока создающего катодную поляризацию на трубопроводе. При этом коррозионному разрушению подвергаетс
19777. Сварка трубопроводов и конструкций 342 KB
  111. Источники питания сварочным током применяемые в трассовых условиях их назначение и устройство. Для обеспечения сварочного процесса в трассовых условиях или на строительной площадке установки обычно комплектуют источником питания сварочной дуги сварочным агре
19778. Диагностика и контроль качества 1.17 MB
  121. Методы диагностики магистральных трубопроводов. Методы диагностирования позволяют обнаружить дефекты различного происхождения определять их характер и размеры а следовательно появляется возможность классифицировать их по степени опасности и устанавливать оч...
19779. Обустройство промыслов 6.68 MB
  131. Классификация нефтяных и газовых месторождений. Под залежью нефти и горючих газов понимается естественное скопление жидких и газообразных углеводородов приуроченное к одному или нескольким пластамколлекторам с единой гидродинамической системой. По начальном
19780. IDE Borland C++ Builder. Структура проекту 16.82 KB
  Borland C Интегри́рованная среда́ разрабо́тки ИСР англ. IDE система программных средств используемая программистами для разработки программного обеспечения ПО на языках Си и C для DOS Windows и Windows NT. Потомок Turbo C. Его отладчик Turbo Debugger был написан для защищённого режима DOS....