fl
"РЛ" - Н А Ч И Н А Ю Щ И М
U
и
---------------------------------------------------------------------------------------------------------------
©
#include <vd.h>
#pragma hdrstop
#indude “Unit2.h”
/
Вместо Unit2.h у вас будет стоять цифра, которую задаст компьютер.
/
Это зависит от попытки, которую вы будете делать ©.
/
И еще настоятельно прошу: не удаляйте то, что написано не вами!
И
---------------------:----------------------------;-------------------------------------------------------------
#pragma package(smartjnit)
#pragma resource “*.dfm”
TForml *Form
1
;
//---------------------------------------------------------------------------------------------------------------
_fastcall TForml ::TForm
1
(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------------------------------------------
void
_fastcall TForml ::BirttonlClick(TObject ’Sender)
{
float r
1
,r2, r
1
2;
/
Объяснения этого кода я дал выше.
М = StrToFloat(Ed it
1
->Text);
r
2
= StrToFloat(Edit2->Text);
if (RadioButton
1
->Checked)
{
П
2
= г
1
+r
2
;
}
else
r
12
= (r
1
* r
2
)/(r
1
+r
2
);
Label3->Caption = FloatToStrF(r
1
2,ffGeneral,6,2) + “ Ом";
}
II
----------------------------------------:------------------------------------ ;---------------------------------
Как вы понимаете, это не един-
ственный вариант воплощения
данной программы, ее можно и
нужно модернизировать. К примеру,
вы можете сделать большее коли-
чество резисторов. Можете также
экспериментировать с кодом:осно-
вы останутся те же, но можно мно-
го чего изменить. Аналогичным об-
разом можно сделать программы и
для других деталей. Поле действий
большое - было бы желание!
Если возникли какие-то вопросы,
читайте подшивку журнала “Р а-
диолюбитель”, а если и там не
нашли ответа - пишите мне на
e-m ail.
М а л е н ь к и е х и т р о с т и
Андрей Кашкаров
г. С-Петербург
Огромная армия радиолюбителей-знтузиастов занимается самостоятельным конструированием и изготов-
лением радиоэлектронных устройств широкого назначения, внося безусловный вклад в научно-технический
прогресс. Этот важный рационализаторский процесс нельзя отпускать “на самотек”, и радиолюбители могут
обменяться опытом на страницах нашего журнала. Такой опыт, уверен, придется по вкусу всем!
Изготовление электронных узлов и деталей в домашней лаборатории (дома) подчас сопряжено с трудностя-
ми, вызванными отсутствием технологической оснастки, ограничениями в выборе материалов, недостатком
опыта радиолюбителя.
Предлагаемые читателю простые и доступные рекомендации, изложенные ниже, актуальны не только в ра-
диоэлектронике непосредственно, но и в вспомогательных работах, без которых радиолюбителю в практичес-
кой деятельности не обойтись.
Практические рекомендации даны на основе многолетней практики автора.
У Радиолюбитель - 0 2 /2 0 0 8
предыдущая страница 36 Радиолюбитель 2008-02 читать онлайн следующая страница 38 Радиолюбитель 2008-02 читать онлайн Домой Выключить/включить текст