'' 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: Остается поработать с БД, отчетом и справкой

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

Новые блоги и статьи Все статьи Все блоги /
Решил проблему с ошибкой пагинации сообщений с сервера на алгоритме обхода дерева "Эстафета хвоста". Hrethgir 12.07.2026 Проблема была в том, что удалялась именно новая кнопка, а не старая. Ни один ИИ не обнаружил это, а сам я смог только когда с работой стало попроще и когда заставил работать будущее автономное. . .	сукцессия 25. Хронология ошибок anaschu 12.07.2026 # От 50-тонного гриба до устойчивого леса: хроника ошибок при построении модели вековой сукцессии микоризы ## О чём эта статья В процессе построения ОДУ-модели (система дифференциальных. . .	сукцессия 24. Промежуточное общее описание модели anaschu 12.07.2026 Хендофф: модель АМ→ЭКМ сукцессии микоризы (ризосфера, 50 лет) Содержание проекта Симуляция вековой (50 лет) экологической сукцессии в почве леса Основные участники: АМ-гриб, ЭКМ-гриб,. . .	сукцессия 23. Более физиологичная физиология, более экологичная экология, более диффурные диффуры. anaschu 12.07.2026 Что реально нашли и починили за эти 5 часов Правило Линдемана (КПД конверсии сахара в тело, kEff) — раньше 100% полученного углерода шло прямо в биомассу гриба; теперь только kEff=0. 5 (после. . .
сукцессия 22. От артефактов к физиологии: калибровка агентной модели грибной сукцессии для воспроизведения сезонной динамики и pH-плато anaschu 11.07.2026 Аннотация В данной работе представлена калибровка агентной модели динамики грибных сообществ (fungal-succession), направленная на устранение нефизичных артефактов (коллапс биомассы, мгновенное. . .	Сукцессия 20. Война автоботов. Делаем ставки. Лёд против "пш-пш!". anaschu 11.07.2026 Битва ИИ в ризосфере: Как мы скрестили жесткие ОДУ, закон Фика и «подземный шантаж» Уважаемые коллеги! Хочу поделиться уникальным опытом ведения междисциплинарной компьютерной разработки. Прямо. . .	Сукцессия 19. Какие выводы я сделал из модели? Часть 2.Внутримикоризный стехиометрический буфер и хроно-дискретные зоны экспансии anaschu 11.07.2026 Био-Инженерный Ликбез: Архитектура Модели Ризосферы Математический аппарат моделирования	Сукцессия 18. Какие выводы я сделал из войны грибов с деревьями? Часть 1- рассказ и немного про термины anaschu 11.07.2026 Био-Инженерный Ликбез: Архитектура Модели Ризосферы Математический аппарат моделирования Система ОДУ описывает динамику изменения массы различных компонентов системы во времени. Ключевой. . .

@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

Решение