PashaXP, вот код:
Код:
{1}
if Form1.Label7.Caption='' then SG3.Cells[2,1]:='0'
else SG3.Cells[2,1]:=Form1.Label7.Caption; (это получение данных с первой формы)
summ:=(StrToFloat(SG3.cells[2,1])+StrToFloat(SG3.cells[8,1])+StrToFloat(SG3.cells[14,1])+StrToFloat(SG3.cells[20,1]))/4;
SG3.Cells[26,1]:=FloatToStr(summ);
Мне надо, чтобы например в первой строчке можно было сложить четыре дробных числа и разделить на 4. Ответ снова получится дробь и этот / ответ надо вывести в указанную ячейку). Кто что может предложить?)
Цитата:
a1:=StrToFloat(Edit1.Text);
Такие вещи лучше в try ... except ... включать.
|
А можете написать применительнок моему коду пожалуйста?)