t) +" A "; - > Caption = "I6 =" + FloatToStrF (I6, ffFixed, 10, t) + "A";
// Розрахунок балансу
// Висновок результату-> Caption = "Pіст =" + FloatToStrF (Pist, ffFixed, 10, t) + "Вт"; -> Caption = "Pнагр =" ; + FloatToStrF (Pn, ffFixed, 10, t) + "Вт"; -> Caption = "Є =" + FloatToStrF (fabs (Pist-Pn)/Pn * 100, ffFixed, 8, t) + "%";
} else {Form1-> Caption = "!! Некоректний введення даних!! "; -> Caption =" "; -> Caption =" "; -> Caption =" "; -> Caption =" " ;; -> Caption = ""; -> Caption = ""; -> Caption = ""; -> Caption = ""; -> Caption = "" ;;}
}
{(Chart1-> Visible == true) {-> Visible = true; -> Visible = false;
} {Chart1-> Visible = true; -> Visible = false;
}
}
// ---------------------------------------- -----------------------------------