С Новым годом! Форум программистов, компьютерный форум, киберфорум
C++ Builder: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
13 / 13 / 0
Регистрация: 14.08.2011
Сообщений: 62

Расчет по таблице

16.10.2012, 20:54. Показов 1507. Ответов 14
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем привет!
Ситуация такая.
Мне необходимо сделать Раасчет по конкретным строкам.
не по всем конечно.

Код:
void __fastcall TForm1::Button3Click(TObject *Sender)
{

Table3->First();
while(!Table3->Eof)
{
if (Table3Familiya->Text!= "Rukovoditel") // Для проверки Чтобы недавала Ошибку
{
DataSource3->DataSet->Edit();

if (Table3PlastikProc->Text=="")
{
DataSource3->DataSet->FieldByName("PlastikProc")->Value = StrToFloat(Form2->DBEdit2->Text);
}

DataSource3->DataSet->FieldByName("Summa")->Value = floor(SummaN);
DataSource3->DataSet->FieldByName("Plastik")->Value = floor(Plastik);
DataSource3->DataSet->FieldByName("Naruki")->Value = floor(Nalich);

//
} //Конец Проверки
DataSource3->DataSet->Post();
Table3->Next();
}
Table3->First();

}
//---------------------------------------------------------------------------
Ошибку почему даёт Я знаю, дело в том что в ней добовляются
пустые строки с именем Rukovoditel. Но как избежать чтобы программа Пустые строки
пропускала и не делала по ним Расчет.
Мне нужно если в поле записи содержиться значение Rukovoditel,
то по этой строке Не делать расчет. А в остольных случаях делать.
if (Table3Familiya->Text!= "Rukovoditel")
{
//Делать Расчёт
}
но он почему-то это не пропускает и даёт ошибку
is not a valid floating point value.

Как я могу сделать расчет вычислений по всем строкам Кроме
поля в котором содержиться значение Rukovoditel....
Надеюсь изложил свою речь Полностью.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
16.10.2012, 20:54
Ответы с готовыми решениями:

Расчет в таблице
Всем добрый вечер. Очень нужна ваша помощь. В Microsoft Excel 2007 у меня есть таблица со спортивными результатами. После каждой дисциплины...

Расчет PR по таблице.
недавно нашел в сети таблицу Расчета PR по количеству внешних ссылок. Немного "причесал" и выложил на своем сайте. Для новичков я...

Расчет стипендии в таблице
Ребят помогите рассчитать стипендию,последовательность значений не знаю,допускаю ошибки в формуле,решить не получается Задание с...

14
 Аватар для Sasha
4956 / 2420 / 531
Регистрация: 05.06.2008
Сообщений: 7,518
Записей в блоге: 3
17.10.2012, 00:29
А зачем надо делать проверку на Editax если можно проверить содержимое самого поля?
1
13 / 13 / 0
Регистрация: 14.08.2011
Сообщений: 62
17.10.2012, 14:10  [ТС]
вот я и думаю как сделать Проверку чтобы он пропускал Пустые строки...
и делал расчет. Разницы нету по Editam или по другому. Главное чтобы Программа Пропускала
строки с именем Руководитель....

Добавлено через 9 минут
Вот я и думаю как сделать чтобы расчет шел дальше, а пустые строки он пропускал.
Где есть значение поля Rukovoditel.
0
13 / 13 / 0
Регистрация: 14.08.2011
Сообщений: 62
17.10.2012, 14:16  [ТС]
вот картинка
Миниатюры
Расчет по таблице  
0
 Аватар для Sasha
4956 / 2420 / 531
Регистрация: 05.06.2008
Сообщений: 7,518
Записей в блоге: 3
17.10.2012, 16:28
Тебе надо проверить не пустоту поля Rukovoditel, а пустоту полей которые находятся с надписью Rukovoditel. Так что не путай

Добавлено через 4 минуты
А именно проверить пустоту полей Коэффициент, Сумма, Удержание, Пластик всех сразу или какого-то одного поля?
1
13 / 13 / 0
Регистрация: 14.08.2011
Сообщений: 62
17.10.2012, 17:28  [ТС]
У строки в котором есть значение Rukovoditel- То по этой строки Нельзя делать расчёт.
Дело в том что Это строка Вставляется после расчёта Без разницы там пустые или не пустые строки. Она суммирует все солбцы.
Например 5000 + 5000 + 2000.... и выводит сумму и Хозяин этой суммы Rukovoditel.
Руководитель получает всю их суммму За них.
Мне нужно сделать Расчёт по всем полям Кроме строки со столбцами у кого есть значение Rukovoditel.
0
 Аватар для Sasha
4956 / 2420 / 531
Регистрация: 05.06.2008
Сообщений: 7,518
Записей в блоге: 3
17.10.2012, 17:56
Ну тогда надо так

C++
1
2
3
4
if(Table3->FieldByName("Фамилия")->AsString !="Rukovoditel")
{
//делай вычисления
}
1
13 / 13 / 0
Регистрация: 14.08.2011
Сообщений: 62
17.10.2012, 18:06  [ТС]
Такая проверка тоже не пропускает эту строку. Она начинает ее расчитывать и выдавать Ошибку.
0
 Аватар для Sasha
4956 / 2420 / 531
Регистрация: 05.06.2008
Сообщений: 7,518
Записей в блоге: 3
17.10.2012, 18:21
А ну поставь перед циклом вот это
C++
1
DataSource3->OnDataChange = NULL;
А после цикла вот это
C++
1
DataSource3->OnDataChange = DataSource3DataChange;
1
13 / 13 / 0
Регистрация: 14.08.2011
Сообщений: 62
17.10.2012, 18:27  [ТС]
тоже самое дает

DataSource3->OnDataChange = NULL;

Table3->First();

while(!Table3->Eof)
{

if(Table3->FieldByName("Familiya")->AsString !="Rukovoditel")
{

Summa = StrToFloat(Form2->DBEdit1->Text);

SummaN = Summa*(0.01)*StrToFloat(Table3Koeficient->Text) - Table3Uderjeno->Value;

Plastik = (Table3Summa->Value)*(0.01)*(Table3PlastikProc->Value);
Nalich = SummaN - Plastik;

DataSource3->DataSet->Edit();
//

// DataSource3->DataSet->FieldByName("OtRChasi")->Value = StrToFloat(Edit2->Text);
if (Table3PlastikProc->Text=="")
{
DataSource3->DataSet->FieldByName("PlastikProc")->Value = StrToFloat(Form2->DBEdit2->Text);
}

DataSource3->DataSet->FieldByName("Summa")->Value = floor(SummaN);
DataSource3->DataSet->FieldByName("Plastik")->Value = floor(Plastik);
DataSource3->DataSet->FieldByName("Naruki")->Value = floor(Nalich);
} //Конец Проверки для старост

//
DataSource3->DataSet->Post();
Table3->Next();


}
Table3->First();

DataSource3->OnDataChange = DataSource3->OnDataChange;
0
 Аватар для Sasha
4956 / 2420 / 531
Регистрация: 05.06.2008
Сообщений: 7,518
Записей в блоге: 3
18.10.2012, 09:08
Цитата Сообщение от Vasiliy-1821 Посмотреть сообщение
Такая проверка тоже не пропускает эту строку. Она начинает ее расчитывать и выдавать Ошибку.
А какую вообще ошибку даёт?
1
13 / 13 / 0
Регистрация: 14.08.2011
Сообщений: 62
18.10.2012, 13:58  [ТС]
Картинка.
Миниатюры
Расчет по таблице  
0
 Аватар для Sasha
4956 / 2420 / 531
Регистрация: 05.06.2008
Сообщений: 7,518
Записей в блоге: 3
18.10.2012, 14:42
У DataSource есть свойство RequestLive поставь его значение в true
1
13 / 13 / 0
Регистрация: 14.08.2011
Сообщений: 62
18.10.2012, 17:50  [ТС]
В object inspector? что-то я такого свойства найти немогу.
0
 Аватар для Sasha
4956 / 2420 / 531
Регистрация: 05.06.2008
Сообщений: 7,518
Записей в блоге: 3
18.10.2012, 19:32
Извини я перепутал это свойство есть в компоненте Query
Проверь свойство ReadOnly у компонента Table
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
18.10.2012, 19:32
Помогаю со студенческими работами здесь

Сортировка в DataGridView и расчет по таблице
Доброй ночи, столкнулся с такой проблемой... Есть код, который сортирует по Месяцу...А проблема вот в чем, не знаю как сделать расчет по...

Расчет в таблице Word 2013
Необходимо рассчитать значения ячеек. Никак не разберусь, в нумерации ячеек, если использовать обозначение LEFT, то в диапазон попадают...

Расчет Показателей производства в таблице (Подбор параметра,Поиск решения.)
Ребят помогите пожалуйста сделать расчеты,не умею работать с этими надстройками Расчеты в таблицах прикрепил

Расчет сумм в формуле и расчет xi должны быть оформлены в виде отдельных функций.
День добрый товарищи специалисты, помогите пожалуйста с примером m=((1/n)*\sum_{i=1}^{n}{x}_{i}){}^{2}-\sum_{i=1}^{n}{x}_{i} ,n=5 ф-ция...

Расчет сумм в формуле и расчет xi должны быть оформлены в виде отдельных функций
Расчет сумм в формуле и расчет xi должны быть оформлены в виде отдельных функций. На СИ


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
15
Ответ Создать тему
Новые блоги и статьи
Новый CodeBlocs. Версия 25.03
palva 04.01.2026
Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .
Модель микоризы: классовый агентный подход
anaschu 02.01.2026
Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути
Programma_Boinc 01.01.2026
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru