Курсовая работа: Расположение оптимального количества светильников нужного типа в помещении

#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;}