51348

Разработка расширенного интерфейса программ: динамические объекты

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

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

Цель работы: Создать программу, которая, в соответствии с выбранным в объекте ComboBox числом, будет динамически(!) создавать соответствующее число объектов типа TEdit. По нажатию на кнопку "Подсчёт", ваша программа должна посчитать сумму введённых в формы TEdit чисел и вывести их на экран в любой форме (например, в новый TEdit).

Русский

2014-02-09

52 KB

8 чел.

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

Разработка расширенного интерфейса программ: динамические объекты

Выполнил: Шуклецов М.А.

 ФРТ, гр. 2106

Цель работы: Создать программу, которая, в соответствии с выбранным в объекте ComboBox числом, будет динамически(!) создавать соответствующее число объектов типа TEdit. По нажатию на кнопку "Подсчёт", ваша программа должна посчитать сумму введённых в формы TEdit чисел и вывести их на экран в любой форме (например, в новый TEdit).

Общий вид программы следующий:

Здесь мы видим следующие элементы управления:

«Создать массив TEdit» - Создает массив из окон TEdit

«Подсчет результатов» - Считает сумму всех чисел введенных выше

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

//---------------------------------------------------------------------------

#include <vcl.h>

#pragma hdrstop

#include "Unit1.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

       : TForm(Owner)

{

}

//---------------------------------------------------------------------------

TEdit *edit[5];   //Резервирование памяти под элементы

       TButton *result_button;

       TEdit *result_field;

       int col=5;

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{

for (int i=0; i<col; i++)   //Цикл создания 1 кнопки

       {

       edit[i] = new TEdit(this);  //Объявление 

       edit[i]->Parent = this;   //Расположение на этой форме

       edit[i]->Name = "Edit"+AnsiString(i); //Написание имени

       edit[i]->Height = 21;   //Размеры

       edit[i]->Width = 201;

       edit[i]->Left = 10;   //Положение У

       edit[i]->Top = 40+i * edit[i]->Height; //Положение Х

       edit[i]->Text = "0";   //Заполнение 0

       }

result_button = new TButton(this);

result_button->Parent = this;

result_button->Name = "Button2" ;

result_button->Width = 201;

result_button->Height = 25;

result_button->Left = 10;

result_button->Top = 145;

result_button->Caption = "Подсчет результатов";  //Надпись

 result_button->OnClick = Button2Click;   //Привязка действия к кнопке

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender) //Действие по нажатию на кнопку 

{    int i=0, s=0;

       result_field = new TEdit(this);

       result_field = new TEdit(this);

       result_field->Parent = this;

       result_field->Name = "Edit10";

       result_field->Height = 21;

       result_field->Width = 201;

       result_field->Left = 10;

       result_field->Top = 170;

       for ( i=0; i<col; i++)   //Подсчет суммы

       { s=s+StrToInt(edit[i]->Text); }

       result_field->Text = IntToStr(s);

}

Вывод: Мы научились создавать объекты самостоятельно, и использовать их в работе.


 

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

20785. Физико-химические процессы протекающие в воде 1 контура и основы водного режима реакторов ВВЭР 166 KB
  б уметь: показать влияние примесей в воде 1 контура на скорость коррозии конструкционных материалах; обосновать ведение калийаммиачного водного режима 1 контура при борном регулировании. Задание на самостоятельную подготовку: самостоятельно проработать вопросы классификации коррозионных процессов показатели коррозионной стойкости коррозии стали в паре. Введение ВХР АС должен обеспечивать работу основного и вспомогательного теплоэнергетического оборудования без повреждений и снижения экономичности и при...
20786. Системы реагентного хозяйства и «чистого» конденсата 361 KB
  Целевая установка: В результате изучения материала лекции студенты должны: а знать: назначение состав принцип действия и основы эксплуатации систем боросодержащей воды и борного концентрата; назначение состав принцип действия и основы эксплуатации узла реагентов реакторного отделения ТВ20; назначение состав принцип действия и основы эксплуатации системы чистого конденсата дистиллята. Назначение состав принцип действия и основы...
20787. Организация ВХР 1 контура 486 KB
  Целевая установка: В результате изучения материала лекции студенты должны: а знать: назначение ведения ВХР 1 контура; назначение средств обеспечения ВХР 1 контура; нормы качества теплоносителя 1 контура при работе энергоблока на энергетическом уровне мощности; нормы качества подпиточной воды воды подаваемой на уплотнения ГЦН и растворов хим.реагентов; ограничения по эксплуатации РУ при отклонении нормируемых показателей; характерные причины отклонения ВХР 1 контура и методы их устранения; диагностические...
20788. Вводная лекция по дисциплине «Водный режим контуров АЭС» 117.5 KB
  Основные понятия физики и химии воды. Виды и показатели качества воды. Выводы по лекции.
20789. Подготовка воды для заполнения и подпитки контуров 302 KB
  Целевая установка: В результате изучения материала лекции студенты должны: а знать: технологию предварительной очистки природных вод; основные методы опреснения и обессоливания воды; использование очистки воды методом дистилляции на АЭС; принципы ионного обмена между смолами и водными растворами; основные показатели качества ионитов; основные методы очистки воды от растворенных газов применяемых на АЭС;...
20790. Работа с приложением Ansys 3.4 MB
  Цель работы – Придумать и реализовать 2 проекта при помощи приложения Ansys, предоставить развернутое описание своих действий в помощь те, кто будет заниматься этим в дальнейшем, основываясь на достигнутых мною результатах. В этой работе мы рассмотрим общие сведения об Ansys и его возможностях, а так же пронаблюдаем процесс создания модели, задания различных данных и работы с получившимися результатами на примере двух несложных проектов.
20791. Проект мероприятий по совершенствованию системы сбыта предприятия (на примере ООО «НАРМИ», г. Александровск) 849 KB
  В результате анализа основных технико-экономических показателей деятельности ресторана «НАРМИ» в прогнозном периоде по сравнению с отчетным была выявлена экономическая эффективность внедрения как всего комплекса предложенных мероприятий, так и отдельных направлений.
20792. Юридичні особи в міжнародному праві 159 KB
  Обґрунтування критеріїв визначення статусу юридичних осіб, порядку їх утворення, основних закономірностей функціонування в різних країнах світу, висвітлення проблем національності юридичних осіб; показати їхню важливість та одночасно принципи формування у сучасному світі.
20793. Микропроцессоры (МП) 88.5 KB
  Закон функционирования управляющего автомата УА может быть задан двумя способами: в виде жесткой логики автомат Мили и автомат Мура; в виде микропрограмм закодированных определенным образом в виде микрокоманд. Учитывая что микроразрядность ОБ может достигать нескольких десятков разрядов а число устройств 816 автоматов то число состояний такого автомата может достигать астрономических цифр и описать их в виде графа автоматов Мили или Мура не представляется возможным. Тема: Представление закона функционирования микропроцессора...