и еще вопрос в догонку. нужно в edit запретить ввод 2х нулей до запятой т.е. чтобы нельзя было ввести 00,1 или 000,1.
нашел вариант в книге:
Код:
if edt1.text <> '0'
then
edt1.text:= edt1.text + '0';
Но у меня почему то получается что к одному нулю еще ноль прибавляется.