ВУЗ: Не указан
Категория: Не указан
Дисциплина: Не указана
Добавлен: 15.09.2024
Просмотров: 34
Скачиваний: 0
AB
|
|
|
|
|
F Tran |
sf |
|
|||
|
|
|
|
D |
|
|
|
|||
|
|
Y |
P |
|
|
|
|
or |
e |
|
B |
Y |
|
|
|
|
|
|
|
m |
|
|
|
|
|
|
|
buy |
r |
|||
|
|
|
|
|
|
|
2 |
|||
|
|
|
|
|
|
|
|
0 |
||
|
|
|
|
|
|
|
to |
|
|
. |
|
|
|
|
|
|
here |
|
|
|
|
|
|
|
|
Click |
|
|
|
|
||
w |
|
|
|
|
|
m |
||||
|
|
|
|
|
|
|
||||
|
|
w |
w. |
|
|
|
|
o |
||
|
|
|
|
|
|
|
. |
|
||
|
|
|
|
|
A BBYY |
c |
|
|||
|
|
|
|
|
|
|
#include «Controls.hpp> #include <Stdctrls.hpp> #include <Forms.hpp>
class Tforml : public Tform
{
__published: // Ide-managed Components Tlabel *Label1;
Tlabel *Label2;
Tlabel *Label3;
Tedit *Editl;
Tedit *Edit2;
Tbutton *Buttonl;
Tbutton *Button2;
Tlabel *Label4;
void__fastcall Buttonlclick(Tobject *Sender); void__fastcall Button2click(Tobject *Sender);
private: |
// User declarations |
public: |
// User declarations |
__fastcall Tforml(Tcomponent* Owner); };
extern PACKAGE Tforml *Form1; #endif
Лістинг 2.7. Модуль форми (Amper_1.cpp)
#include <vcl.h>
AB
|
|
|
|
|
F Tran |
sf |
|
|||
|
|
|
|
D |
|
|
|
|||
|
|
Y |
P |
|
|
|
|
or |
e |
|
B |
Y |
|
|
|
|
|
|
|
m |
|
|
|
|
|
|
|
buy |
r |
|||
|
|
|
|
|
|
|
2 |
|||
|
|
|
|
|
|
|
|
0 |
||
|
|
|
|
|
|
|
to |
|
|
. |
|
|
|
|
|
|
here |
|
|
|
|
|
|
|
|
Click |
|
|
|
|
||
w |
|
|
|
|
|
m |
||||
|
|
|
|
|
|
|
||||
|
|
w |
w. |
|
|
|
|
o |
||
|
|
|
|
|
|
|
. |
|
||
|
|
|
|
|
A B BYY |
c |
|
|||
|
|
|
|
|
|
|
51
AB
|
|
|
|
|
F Tran |
sf |
|
|||
|
|
|
|
D |
|
|
|
|||
|
|
Y |
P |
|
|
|
|
or |
e |
|
B |
Y |
|
|
|
|
|
|
|
m |
|
|
|
|
|
|
|
buy |
r |
|||
|
|
|
|
|
|
|
2 |
|||
|
|
|
|
|
|
|
|
0 |
||
|
|
|
|
|
|
|
to |
|
|
. |
|
|
|
|
|
|
here |
|
|
|
|
|
|
|
|
Click |
|
|
|
|
||
w |
|
|
|
|
|
m |
||||
|
|
|
|
|
|
|
||||
|
|
w |
w. |
|
|
|
|
o |
||
|
|
|
|
|
|
|
. |
|
||
|
|
|
|
|
A BBYY |
c |
|
|||
|
|
|
|
|
|
|
#pragma hdrstop
#include "Amper_l.h" #ragma package(smart_init) #pragma resource "*.dfm" Tform1 *Form1;
__fastcall Tforml::tforml(Tcomponent* Owner) : Tform(Owner)
{
}
// клацання на кнопці Обчислити
void__fastcall Tforml::buttonlclick(Tobject *Sender)
{
float u; // напруга
AB
|
|
|
|
|
F Tran |
sf |
|
|||
|
|
|
|
D |
|
|
|
|||
|
|
Y |
P |
|
|
|
|
or |
e |
|
B |
Y |
|
|
|
|
|
|
|
m |
|
|
|
|
|
|
|
buy |
r |
|||
|
|
|
|
|
|
|
2 |
|||
|
|
|
|
|
|
|
|
0 |
||
|
|
|
|
|
|
|
to |
|
|
. |
|
|
|
|
|
|
here |
|
|
|
|
|
|
|
|
Click |
|
|
|
|
||
w |
|
|
|
|
|
m |
||||
|
|
|
|
|
|
|
||||
|
|
w |
w. |
|
|
|
|
o |
||
|
|
|
|
|
|
|
. |
|
||
|
|
|
|
|
A B BYY |
c |
|
|||
|
|
|
|
|
|
|
float r; // опір
//отримати дані з полів введення
//можливе виключення
try
{
u = Strtofloat(Editl->text);
r = Strtofloat(Edit2->text);
}
catch (Econverterror &e)
{
Showmessage("При введенні дробових чисел використову кому.");
return;
52
AB
|
|
|
|
|
F Tran |
sf |
|
|||
|
|
|
|
D |
|
|
|
|||
|
|
Y |
P |
|
|
|
|
or |
e |
|
B |
Y |
|
|
|
|
|
|
|
m |
|
|
|
|
|
|
|
buy |
r |
|||
|
|
|
|
|
|
|
2 |
|||
|
|
|
|
|
|
|
|
0 |
||
|
|
|
|
|
|
|
to |
|
|
. |
|
|
|
|
|
|
here |
|
|
|
|
|
|
|
|
Click |
|
|
|
|
||
w |
|
|
|
|
|
m |
||||
|
|
|
|
|
|
|
||||
|
|
w |
w. |
|
|
|
|
o |
||
|
|
|
|
|
|
|
. |
|
||
|
|
|
|
|
A BBYY |
c |
|
|||
|
|
|
|
|
|
|
}
//обчислити силу струму
//можливе виключення
AB
|
|
|
|
|
F Tran |
sf |
|
|||
|
|
|
|
D |
|
|
|
|||
|
|
Y |
P |
|
|
|
|
or |
e |
|
B |
Y |
|
|
|
|
|
|
|
m |
|
|
|
|
|
|
|
buy |
r |
|||
|
|
|
|
|
|
|
2 |
|||
|
|
|
|
|
|
|
|
0 |
||
|
|
|
|
|
|
|
to |
|
|
. |
|
|
|
|
|
|
here |
|
|
|
|
|
|
|
|
Click |
|
|
|
|
||
w |
|
|
|
|
|
m |
||||
|
|
|
|
|
|
|
||||
|
|
w |
w. |
|
|
|
|
o |
||
|
|
|
|
|
|
|
. |
|
||
|
|
|
|
|
A B BYY |
c |
|
|||
|
|
|
|
|
|
|
try
{
i = u/r;
}
catch (Ezerodivide &e)
{
Showmessage("Опір не має дорівнювати нулю"); Edit1->setfocus(); // курсор в полі Опір return;
}
// вивести результат в полі влучні Label4->caption = "Струм : "
+
Floattostrf(i,ffgeneral,7,3);
}
// клацання на кнопці Завершити
void__fastcall Tforml::button2click(Tobject *Sender)
{
Forml->close(); // закрити вікно програми
}
Слід зазначити, що значну кількість роботи по генерації програмної коду виконав C++ Builder. Він повністю сформував головний модуль(Amper.cpp) заголовний файл
модуля форми (Amper_l.h) значну частину модуля форми (Amper_l.cpp). Крім того, C++
Builder, аналізуючи дії програміста, сформував опис форми, файл проекту і файл
ресурсів проекту.
53