Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
14 дек 2024, 20:43

Обыкновенное уравнение (в отчёте)

Автор Ник8, 05 мар 2015, 18:49

0 Пользователей и 1 гость просматривают эту тему.

Ник8

Отчёт->макет->табличный документ насколько я понимаю...

К примеру, в ячейке r1c1 задано значение x1, в r1c2 значение x2, а в r1c3 должна получиться сумма x1 и x2. Как это записать на встроенном языке?

ТабДок.Область("R1C3").Текст = Число(ТабДок.Область("R1C1").Текст) + Число(ТабДок.Область("R1C2").Текст);

Так тоже ничего:

ТабДок.Область("r1c3").Значение = ТабДок.Область("r1c1").Значение + ТабДок.Область("r1c2").Значение;

P.S. Ячейки r1c1 и r1c2 в виде текста и параметра пробовал ставить

P.P.S. Посоветуйте литературу по теме

Ник8

&НаКлиенте
Процедура ТабДокПриИзмененииСодержимогоОбласти(Элемент, Область)

ПриИзмененииДанныхОбластиТабДока(Элемент, Область, ЭтаФорма);

КонецПроцедуры


&НаКлиенте
Функция ПриИзмененииДанныхОбластиТабДока(Элемент, Область, Контекст) Экспорт

ПозицияКолонки = Найти(Область.Имя,"C");
Строка = Сред(Область.Имя, 1, ПозицияКолонки-1);
Колонка = Сред(Область.Имя, ПозицияКолонки);

Если Колонка = "C1" или Колонка = "C2" Тогда
Попытка
Контекст[Элемент.Имя].Область(Строка+"C3").Текст = Число(Контекст[Элемент.Имя].Область(Строка+"C2").Текст) + Число(Контекст[Элемент.Имя].Область(Строка+"C1").Текст);
Исключение
КонецПопытки;
КонецЕсли;

КонецФункции


Это сложение двух чисел, а как реализовать решение системы уравнений? Хотя бы типа таких?
x-y=-5
2x+y=-7

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск