ВУЗ:
Составители:
Рубрика:
SetActive(1,0,1,0,0,0);
Label5->Caption="R=p/((2*pi*L))*ln(4*L)/d";
type_script="Трубчатый у поверх.";
zazem_type=3;
Image1->Picture->LoadFromFile("im3.bmp");
}
//---------------------------------------------------------------------------
void __fastcall TForm5::RadioButton12Click(TObject *Sender)
{
SetActive(1,0,1,1,0,0);
Label5->Caption="R=(p/(2*pi*L))*(ln*(2*L)/d+(1/2)*ln(4t+L)/(4t-L)))";
type_script="Трубч. в земле";
zazem_type=4;
Image1->Picture->LoadFromFile("im4.bmp");
}
//---------------------------------------------------------------------------
void __fastcall TForm5::RadioButton13Click(TObject *Sender)
{
SetActive(1,0,1,0,0,0);
Label5->Caption="R=(p/(pi*L))*ln((2*L)/d)";
type_script="Протяженный на пов.";
zazem_type=5;
Image1->Picture->LoadFromFile("im5.bmp");
}
//---------------------------------------------------------------------------
void __fastcall TForm5::RadioButton14Click(TObject *Sender)
{
SetActive(1,0,1,1,0,0);
Label5->Caption="R=(p/(2*pi*L))*ln((L*L)/(d*t)";
type_script="Протяж. в земле";
zazem_type=6;
Image1->Picture->LoadFromFile("im6.bmp");
}
//---------------------------------------------------------------------------
void __fastcall TForm5::RadioButton15Click(TObject *Sender)
{
SetActive(0,1,1,0,0,0);
Label5->Caption="R=(p/(2*pi*pi*D))*ln((8*D)/d)";
type_script="Кольцев. на поверх.";
zazem_type=7;
Image1->Picture->LoadFromFile("im7.bmp");
}
//---------------------------------------------------------------------------
void __fastcall TForm5::RadioButton16Click(TObject *Sender)
{
SetActive(0,1,1,1,0,0);
Label5->Caption="R=(p/(2*pi*pi*D))*ln((4*pi*D*D)/(d*t))";
type_script="Кольцевой в земле.";
