__fastcall TfrmCalcLamp(TComponent* Owner);};
//---------------------------------------------------------------------------
extern PACKAGE TfrmCalcLamp *frmCalcLamp;
//---------------------------------------------------------------------------
#endif
Файл ULamp.cpp
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "ULamp.h"
#include "ABOUT.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "HandTuning"
#pragma resource "*.dfm"
TfrmCalcLamp *frmCalcLamp;
//---------------------------------------------------------------------------
__fastcall TfrmCalcLamp::TfrmCalcLamp(TComponent* Owner)
: TForm(Owner)
{}
//---------------------------------------------------------------------------
void __fastcall TfrmCalcLamp::btnCalcClick(TObject *Sender)
{pnlCountLamp->Caption = IntToStr((int)((100*htE->Value * htS->Value *
htKZ->Value * htZ->Value) /
(htN->Value * htPH->Value *
htM->Value * htKr->Value)));}
//---------------------------------------------------------------------------
void __fastcall TfrmCalcLamp::btnClearClick(TObject *Sender)
{htE->Value = 0;
htS->Value = 0;
htKZ->Value = 0;
htZ->Value = 0;
htN->Value = 0;
htPH->Value = 0;
htM->Value = 0;
htKr->Value = htKr->MaxValue;
pnlCountLamp->Caption = 0;}
//---------------------------------------------------------------------------
void __fastcall TfrmCalcLamp::N7Click(TObject *Sender)
{AboutBox->ShowModal();}
//---------------------------------------------------------------------------
void __fastcall TfrmCalcLamp::btnCloseClick(TObject *Sender)
{this->Close();}
//---------------------------------------------------------------------------
4. Пример выполнения программы
Пример 1.
Рисунок 1
Пример 2.
Рисунок 2
Пример 3.
Рисунок 3
Пример 4.
Рисунок 4
Пример 5.
Рисунок 5
Заключение
Рационально устроенное освещение создает достаточную равномерную освещенность производственного помещения, сохраняет зрение рабочего персонала, уменьшает травматизм, позволяет повышать производительность труда, влияет на уменьшение процента брака и улучшение качества.
Итогом работы можно считать созданную программу для вычисления количества светильников, необходимых для общего освещения помещения. Данная программная реализация может служить органической частью решения более сложных задач.
Список использованных источников и литературы
1. Архангельский, А.Я. Программирование в С++ Builder 6. [Текст] / А.Я.Архангельский. – М.: Бином, 2003. С. 1154.
2. Кремер, Н.Ш. Высшая математика для экономистов: учебник для студентов вузов. [Текст] / Н.Ш.Кремер, 3-е издание – М.:ЮНИТИ-ДАНА, 2006. C. 412.
3. Павловская, Т.А. Программирование на языке высокого уровня. [Текст] / Т.А. Павловская. – М.: Питер, 2003. С. 461.
4. Пахомов Б.И. C/C++ 2005 для начинающих. [Текст] / Б.И. Пахомов. – СПб.: БХВ Петербург 2007. C. 464 .
5. Семакин, И.Г. Основы программирования. [Текст] / И.Г.Семакин, А.П.Шестаков. – М.: Мир, 2006. C. 346.
6. Сни, П.П. Естественное и искусственное освещение. [Электронный ресурс] / П.П. Сни. – М.: Стройиздат, 1980. C.342.
7. Справочная книга по светотехнике / Под ред. Ю.Б. Айзенберга. – М.:Энергоатомиздат, 1983.
8. Справочная книга для проектирования электрического освещения / Под ред. Г.М. Кнорринга. – Л.:Энергия, 1976.
9. Эккель Б. Введение в стандартный С++. [Электронный ресурс] / Б.Эккель. – М.:Питер, 2004. С. 572.