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


 

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

81082. Проектирование аппаратной центра обработки данных 5.64 MB
  Решения, обеспечивающие отказоустойчивость на различных уровнях ЦОД значительно увеличивают надежность информационной системы. При этом избыточность, необходимая для реализации отказоустойчивости по возможности использована для увеличения эффективной нагрузки на узлы центра обработки данных.
81083. Влияние водного режима на качественный и количественный состав флавоноидов календулы 114.12 KB
  Одним из активно изучаемых классов защитных веществ растений являются фенольные соединения. внедрение в геном чудеродных для данного вида генов с целью получения трансгенных растений источников биологически активных соединений в частности флавоноидов...
81084. ЗЛОУПОТРЕБЛЕНИЕ СУБЪЕКТИВНЫМИ ГРАЖДАНСКИМИ ПРАВАМИ НА ПРИМЕРЕ КОРПОРАТИВНЫХ ПРАВООТНОШЕНИЙ 172.47 KB
  Актуальность темы дипломной работы обусловлена необходимостью решения одной из самых неоднозначных проблем гражданского права - злоупотребления правом на примере корпоративных правоотношений. Необходимо отметить, что правоприменительная практика сталкивается с большим количеством корпоративных...
81085. ФЕМИНИСТИЧЕСКАЯ ТЕОЛОГИЯ КОНЦА 20-ГО ВЕКА В ПОИСКАХ МЕТОДОЛОГИИ 266 KB
  В период раннего капитализма традиционная точка зрения на положение женщины в обществе подвергается пересмотру: впервые говорится о различии в общественной сфере занятости необходимости строгого разграничения частного и общественного.
81087. ПРИОРИЕТЫ БЮДЖЕТНО-НАЛОГОВОЙ ПОЛИТИКИ РФ 45.51 KB
  Полнота бюджета, как правило, прямо пропорциональна благосостоянию граждан. Бюджет, его формирование и статьи расходов являются важным разделом в экономической науки, требующим большого внимания со стороны не только занимающих высокие посты экономистов и политиков, но и рядовых граждан.
81088. Электронные выпрямители, преобразователи, защита электронных устройств и основные характеристики 468.06 KB
  Инвертор который формирует частоту напряжения электродвигателя. Преобразователи частоты различаются по режиму коммутации используемому для регулирования напряжения питания электродвигателя.
81089. СОЗДАНИЕ ГОСУДАРСТВЕННОГО СТАНДАРТА ISO 21500:2012 30.93 KB
  Задачей рабочей группы по созданию стандарта было взять за основу опыт существующих организаций по управлению проектами (Института управления проектами PMI (США), Британского института стандартизации BSI и Международной ассоциации управления проектами IPMA) и свести его в лучшую практику – универсальный стандарт.
81090. Изменения в системе государственного управления при правлении Ивана III 50 KB
  Иван III заложил основы российского самодержавства не только значительно расширив территорию своего государства но и укрепив его политический строй государственный аппарат резко возвысив международный престиж Москвы. Иван III явился фактическим создателем Московского государства.