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 – проект з використанням компонентів відображення та редагування.


 

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

79194. Убийство при превышении пределов необходимой обороны 32.26 KB
  Общественные отношения обеспечивающие жизнь человека. совершение действий по средствам которых осуществляется физическое механическое химическое или биологическое воздействие на организм человека либо не совершается действие которое лицо должно и могло было совершить для устранения опасности грозящей жизни человека.
79195. Причинение смерти по неосторожности 32.84 KB
  От причинения смерти по неосторожности следует отличать невиновное причинение смерти казус которое исключает уголовную ответственность ст. От умышленного причинения тяжкого вреда здоровью повлекшего смерть потерпевшего по неосторожности ч. 111 УК РФ причинение смерти по неосторожности ст.
79196. Понятие и виды телесных повреждений 34.48 KB
  Понятие вред здоровью в уголовном законе не раскрывается. Определение вида вреда производилось в соответствии судебно медицинской экспертизой тяжести вреда здоровью на основании критериев указанных в постановлении Правительства РФ от 17 августа 2007 г. N 522 Об утверждении правил определения степени тяжести вреда здоровью человека . С медицинской точки зрения под вредом здоровью понимают нарушение анатомической целостности органов и тканей или их физиологических функций либо заболевания или патологические состояния возникшие в результате...
79197. Умышленное причинение тяжкого вреда здоровью. Состав и виды 34.79 KB
  Имеется в виду причинение вреда здоровью опасного для жизни человека который по своему характеру угрожает жизни потерпевшего и может вызвать его смерть. Причинение тяжкого вреда здоровью распространяется и на повреждения неопасные для жизни в момент их причинения но повлекшие угрожающие жизни состояния и заболевания или патологические состояния возникшие в результате воздействия различных внешних факторов и закономерно осложняющиеся угрожающим жизни состоянием или сами представляющие угрозу для жизни человека. В соответствии с...
79198. Заражение ВИЧ-инфекцией. Состав и виды 30.41 KB
  Способы совершения данного преступления различные: в результате полового контакта; при переливании крови или ее препаратов содержащих вирус; при контактах поврежденных поверхностей тела; при использовании для инъекций не стерильных шприцев а также женщинойвирусоносителем при родах либо с молоком матери зараженным вирусом и в других случаях. Состав преступления формальный для окончания преступления не требуется наступления последствий а именно заражения потерпевшего.
79199. Оставление в опасности 30.24 KB
  Преступление небольшой тяжести состав основной простой формальный Объект – общественные отношения обеспечивающие безопасность жизни или здоровья Обязательный признак – потерпевший другой человек находящийся в опасном для жизни или здоровья состоянии и лишенное возможности принять меры к самосохранению по малолетству старости болезни или вследствие своей беспомощности Объективная сторона характеризуется общественноопасным деянием в форме бездействия оставление без помощи вышеуказанного лица обстоятельства совершения...
79200. Общая характеристика преступлений против свободы, чести и достоинства личности 31.93 KB
  Отнесение рассматриваемой главы к разделу о преступлениях против личности которым открывается Особенная часть УК РФ вытекает из конституционных положений об охране свободы защите своей чести и доброго имени достоинства личности например ст. 126128 УК РФ; б честь и достоинство человека включая оценку его личности окружающими и им самим ст.
79201. Похищение человека. Состав и виды. Отличие от незаконного лишения свободы 34.79 KB
  Под похищением человека ст. Но при всех условиях похищение признается оконченным с момента захвата похищенного лица т. Наказание за похищение значительно усиливается при наличии квалифицирующих обстоятельств ч.
79202. Клевета. Состав и виды. Отличие от ложного доноса 34.68 KB
  С объективной стороны клевета определяется как распространение заведомо ложных сведений порочащих честь и достоинство другого лица или подрывающих его репутацию. Имеются в виду измышления заведомо ложные сведения подрывающие положительную оценку окружающими общественным мнением личности и его деятельности как не соответствующих этическим правовым профессиональным критериям. Обязательный элемент понятия клеветы распространение заведомо ложных сведений компрометирующих человека в устной или письменной форме в том числе в официальном...