'' is not valid floating type value

@Neo_AVE · Регистрация: 04.05.2011

Студворк — интернет-сервис помощи студентам

is not valid floating type value - такое сообщение появляется во время работы программы после нажатия кнопки, код:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
//По нажатию кнопки "Вывести результат"
void __fastcall TFrmVpl::Btn21Click(TObject *Sender)
{
     FrmVpl->PgCont1->Pages[1]->Show(); //Отобразить панель "Результат"
     StGr2->FixedCols=0; 
     StGr2->FixedRows=0;
     StGr2->ColCount=a11;       //Задаем размер по ширине
     StGr2->RowCount=b11;       //Задаем размер по длине
     for(i=0;i<FrmVpl->StGr1->ColCount;i++)  //столбец
        for(j=0;j<FrmVpl->StGr1->RowCount;j++){  //строка
           sum1+=StrToFloat(StGr1->Cells[i][j]);   //Сумма всей ячейки
        }
        sum1=sum1/(FrmVpl->StGr1->ColCount*FrmVpl->StGr1->RowCount);//Ср.знач всей матрицы
        Lbl12_6->Caption=String(sum1);
        for(i=0;i<FrmVpl->StGr1->ColCount-1;i++)    
           for(j=0;j<FrmVpl->StGr1->RowCount-1;j++){    
              sum2=StrToFloat(StGr1->Cells[i][j])+StrToFloat(StGr1->Cells[i][j+1])+
                   StrToFloat(StGr1->Cells[i+1][j])+StrToFloat(StGr1->Cells[i+1][j+1]);
              sum3=sum2/4;    //ср. отметка кажд ячейки
              FrmVpl->StGr2->Cells[i][j]=sum1-sum3; 
              FrmVpl->StGr2->Cells[i][j]=(a1/(FrmVpl->StGr1->ColCount)*(b1/(FrmVpl->StGr1->RowCount))*(sum1-sum3));  //вывод на таблицу
            }
            //дальше ошибка вычисления и до конца
           double rst=StrToFloat(FrmVpl->StGr2->Cells[i][j]);
           if(rst>0)   //Если значения больше нуля, то складываются
           {
                    vpos+=StrToFloat(FrmVpl->StGr2->Cells[i][j]);
            }
              else if(rst<0)    //Если значения меньше, то складываются
              {
                      srezka+=StrToFloat(FrmVpl->StGr2->Cells[i][j]);
              }
              matr+=vpos-srezka;  
           Lbl1_3->Caption="Общий объём:\n" + String(matr)+"куб.м.\nОбъём посыпки:\n"+
              String(vpos)+"куб.м.\nОбъём срезки:\n"+
                 String(srezka)+"куб.м.";
}

Заранее спасибо!

@Neo_AVE · 16.05.2011, 00:52 **[ТС]**

сейчас спать, сегодня днем продолжу, а то голова совсем не варит.

cpp_developer · 16.05.2011, 01:13

хорошая мысль, присоединяюсь

@Neo_AVE · 16.05.2011, 16:42 **[ТС]**

Вот думаю, а возможно выполнять два условия? Просто реально получается что одно условие выполняется, другое - игнорируется.

Добавлено через 28 минут

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
//По нажатию кнопки "Вывести результат"
void __fastcall TFrmVpl::Btn21Click(TObject *Sender)
{
     FrmVpl->PgCont1->Pages[1]->Show(); //Отобразить панель "Результат"
     StGr2->FixedCols=0; 
     StGr2->FixedRows=0;
     StGr2->ColCount=a11;       //Задаем размер по ширине
     StGr2->RowCount=b11;       //Задаем размер по длине
     for(i=0;i<FrmVpl->StGr1->ColCount;i++)  //столбец
        for(j=0;j<FrmVpl->StGr1->RowCount;j++){  //строка
           sum1+=StrToFloat(StGr1->Cells[i][j]);   //Сумма всей ячейки
        }
        sum1=sum1/(FrmVpl->StGr1->ColCount*FrmVpl->StGr1->RowCount);//Ср.знач всей матрицы
        Lbl12_6->Caption=String(sum1);
        for(i=0;i<FrmVpl->StGr1->ColCount-1;i++)    
           for(j=0;j<FrmVpl->StGr1->RowCount-1;j++){    
              sum2=StrToFloat(StGr1->Cells[i][j])+StrToFloat(StGr1->Cells[i][j+1])+
                   StrToFloat(StGr1->Cells[i+1][j])+StrToFloat(StGr1->Cells[i+1][j+1]);
              sum3=sum2/4;    //ср. отметка кажд ячейки
              FrmVpl->StGr2->Cells[i][j]=sum1-sum3; 
              FrmVpl->StGr2->Cells[i][j]=(a1/(FrmVpl->StGr1->ColCount)*(b1/(FrmVpl->StGr1->RowCount))*(sum1-sum3));  //вывод на таблицу
           double x=(a1/(FrmVpl->StGr1->ColCount)*(b1/(FrmVpl->StGr1->RowCount))*(sum1-sum3));
           //FormatFloat("0.000",x));
           if(x>0.0)
           {
                    vpos+=(a1/(FrmVpl->StGr1->ColCount)*(b1/(FrmVpl->StGr1->RowCount))*(sum1-sum3));
            }
              else if(x<0.0)
              {
                      srezka+=(a1/(FrmVpl->StGr1->ColCount)*(b1/(FrmVpl->StGr1->RowCount))*(sum1-sum3));
              }
            }   //Здесь переместила скобку от for(...)
            matr+=vpos-srezka;
            AnsiString smatr=FormatFloat("0.000",matr);
            AnsiString svpos=FormatFloat("0.000",vpos);
            AnsiString ssrezka=FormatFloat("0.000",srezka);
            matr+=vpos-srezka;  
           Lbl1_3->Caption="Общий объём:\n" + String(matr)+"куб.м.\nОбъём посыпки:\n"+
              String(vpos)+"куб.м.\nОбъём срезки:\n"+
                 String(srezka)+"куб.м.";
}

Вот сама решила проблему!!! Ура!!! :dance3: Остается поработать с БД, отчетом и справкой

, думаю за неделю успею написать

Новые блоги и статьи Все статьи Все блоги /
Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .

@Neo_AVE 89 / 36 / 5 Регистрация: 04.05.2011 Сообщений: 239
	16.05.2011, 00:52 [ТС]
	Сообщение было отмечено как решение Решение сейчас спать, сегодня днем продолжу, а то голова совсем не варит. 0

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	16.05.2011, 01:13
	хорошая мысль, присоединяюсь 0

'' is not valid floating type value

Решение