• Registered: 2016-02-07
  • Posts: 15

Topic: Помогите разобраться со скриптом.

В базе есть таблица Produkt, где есть поле цены (Price) и цены с НДС (PriceNDS). На форме нового продукта (addProdukt), нужно чтобы при вводе цены, автоматически проставлялась цена с НДС. Пробовал сделать по примеру с этой темы, (http://myvisualdatabase.com/forum/viewtopic.php?id=1053) но выбивает ошибку скрипта.

Post's attachments

Attachment icon Книга рецептов.rar 14.52 kb, 355 downloads since 2016-07-25 

svarogg22's Website

2 Reply by iacovlogica (edited by iacovlogica 2016-07-25 11:50:19)

  • From: Краснодарский край Крымск
  • Registered: 2015-09-22
  • Posts: 121

Re: Помогите разобраться со скриптом.

AddProdukt.Edit3.Value := AddProdukt.Edit2.Value + ((AddProdukt.Edit2.Value / 100) * 20); // calculate

Так же имеет смысл у полей которые предназначены для ввода только цифр поставит галочку у свойства NumbersOnly

Post's attachments

Attachment icon Книга рецептов.7z 15.1 kb, 343 downloads since 2016-07-25 

  • Registered: 2016-02-07
  • Posts: 15

Re: Помогите разобраться со скриптом.

Забыл уточнить момент: у меня версия 1.46. Скрипт я копировал из источника с подменной форм и полей на свои названия. Проблема в том, что скрипты не работают в версии 1.46. Ваш тоже выбивает ту же ошибку, что была у меня: "Undeclared identifier: 'Value' at 3.27.

svarogg22's Website

  • From: Краснодарский край Крымск
  • Registered: 2015-09-22
  • Posts: 121

Re: Помогите разобраться со скриптом.

Тоды ручками считаем )))

AddProdukt.Edit3.Text := floattostr(StrToFloat(AddProdukt.Edit2.Text) + ((StrToFloat(AddProdukt.Edit2.Text) / 100) * 20)); // calculate

  • Registered: 2016-02-07
  • Posts: 15

Re: Помогите разобраться со скриптом.

Спасибо, все работает.

svarogg22's Website