Topic: С помощью скрипта, при перемножении 2 полей, ответ отобразить в 3 поле
Подскажите, как задать условие чтоб при перемножении 2 полей ответ отобразить на 3 поле:
procedure CalculateCourse;
begin
if Payment.Edit1.Value > 0
then Payment.Edit4.Value := Payment.Edit1.Value * Payment.Edit2.Value;
end;
procedure Payment_sumPayment_onChange (Sender: string);
begin
CalculateCourse;
end;
procedure Payment_course_onChange (Sender: string);
begin
CalculateCourse;
end;
begin
end.