51348

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

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

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

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

Русский

2014-02-09

52 KB

7 чел.

Лабораторная работа 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);

}

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


 

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

24582. Документування аудиторських послуг 26.5 KB
  Документальне оформлення аудиторської перевірки складається з двох видів документації робочої та підсумкової. Аудитор зобов'язаний вести документацію зі справ які стосуються прийнятих рішень за результатами проведеної аудиторської перевірки і які в свою чергу будуть покладені в основу аудиторського висновку. Суть робочої документації Робоча документація це записи за допомогою яких аудитор фіксує проведені процедури перевірки тести отриману інформацію і відповідні висновки які робляться під час проведення аудиторської перевірки....
24583. Договір на проведення аудиту 32 KB
  Договір на проведення аудиту. Порядок укладання договору Після обміну листами між аудитором та його клієнтом укладається договір на проведення аудиту. Договір на проведення аудиту є основним документом який засвідчує факт досягнення домовленості між замовником та виконавцем про проведення аудиторської перевірки він документально стверджує що сторони дійшли згоди з усіх моментів обумовлених у договорі. Договір на проведення аудиту має суттєві відмінності від інших договорів які використовуються в підприємництві.
24584. Клієнти аудиторських фірм (аудиторів), процедури їх вибору то погодження 29 KB
  За організаційноправовими формами клієнтів поділяють на підприємства установи організації об'єднання фонди громадян які самостійно провадять підприємницьку діяльність. Крім цих форм законодавством окремо виділяються господарські товариства підприємства установи й організації створені на засадах угоди між юридичними особами і громадянами шляхом об'єднання їх майна для провадження підприємницької діяльності. За формами власності споживачів аудиторських послуг поділяють на: ♦ індивідуальні підприємства засновані тільки на особистій...
24585. Поняття і види аудиторських послуг 39 KB
  Аудиторські організації та підприємціаудитори які провадять свою діяльність одноосібно можуть проводити аудит і надавати супутні аудиту послуги. Уся інша робота аудитора це супутні аудиту послуги. Поряд із проведенням аудиту Національні стандарти передбачають супутні аудиту послуги: оглядову перевірку операційну перевірку та компіляцію трансформацію обліку. Аудиторські послуги як правило не атестовані тобто не потребують подання аудиторського висновку та формальної звітності аудитора на адресу клієнта.
24586. Планування конкретної аудиторської перевірки 34.5 KB
  Вимоги та рекомендації щодо планування аудиту визначені МСА 300 Планування згідно з яким аудитори й аудиторські фірми України мають право самостійно визначати форми і методи аудиту на підставі чинного законодавства наявних норм і стандартів умов договору із замовником професійних знань та досвіду. Мета планування Метою планування аудиту є концентрація уваги аудитора на найважливіших напрямах аудиту виявленні проблем які слід перевірити якнайдетальніше. Документальне оформлення Характер планування залежить від організаційної форми...
24587. Планування аудиторської діяльності 30 KB
  Планування аудиторської діяльності. Обов'язковою умовою успішної діяльності будьякого підприємства є планування. Нормативна база з аудиту МСА 300 Планування регламентує лише порядок планування аудиторської перевірки визначає порядок підготовки загального плану і розроблення програми проведення аудиту і не визначає порядок планування аудиторської діяльності. У літературі з аудиту питання планування аудиторської діяльності також майже не висвітлювалось.
24588. Контроль якості роботи аудиторів 29 KB
  Контроль якості роботи аудиторів Аудиторська фірма зобов'язана дотримуватися політики і процедур контролю якості аудиторських послуг які гарантують що всі аудиторські перевірки проводяться у відповідності з Національними стандартами аудиту та Законом України Про аудиторську діяльність . Зміст строки й обсяг аудиторських процедур та політики аудиторської фірми щодо контролю якості залежать від таких чинників як розміри і характер діяльності аудиторської фірми її дислокація рівень організації перевірки і відповідних суджень про...
24589. Поняття аудиторської діяльності та її правове забезпечення 32 KB
  Основними нормативними документами що визначають головні засади аудиторської діяльності є Закон України Про аудиторську діяльність Національні стандарти аудиту та Кодекс професійної етики аудиторів України. Згідно з Законом України Про аудиторську діяльність до аудиторської діяльності належить організаційне і методичне забезпечення аудиту практичне виконання аудиторських перевірок аудиту та надання інших аудиторських послуг. За національним законодавством На жаль національне законодавство обмежує рамки аудиту аудитом фінансової...
24590. Суб’єкти аудиторської діяльності 37.5 KB
  Суб’єкти аудиторської діяльності Аудиторська діяльність це один із видів підприємницької діяльності суб'єктами якої можуть бути як фізичні так і юридичні особи. Для здійснення аудиторської діяльності одноособово аудитор повинен маючи чинний сертифікат аудитора зареєструватися як суб'єкт підприємницької діяльності у виконавчому комітеті міської районної ради або районній міст Києва і Севастополя державній адміністрації за місцем проживання даного суб'єкта та в Аудиторській палаті України як суб'єкт аудиторської діяльності. Порядок...