OnChange

[Plohoy]

Я и тот и этот вариант попробывал такчто работает все норм

[RUSt88]

хакер 90 года выпуска

При удалении всех символов в Edit вылазиет ошибка ""is not a valid floating point value.". Как быть?

при удалении всех символов!!!! т.е. обработчик события пытается преобразовать ПУСТУЮ строку, ПУСТУЮ!!!

а вот уже стандартный обработчик исключений стоит включить в проверку условия, к-рая описана мной постом выше

[Plohoy]

а как запретить ввод букв

[Hacker19_90]

Сообщение от RUSt88

хакер 90 года выпуска


при удалении всех символов!!!! т.е. обработчик события пытается преобразовать ПУСТУЮ строку, ПУСТУЮ!!!

И чё??? Типа исключение не сгенирируется? С помощью Try отлично ловится такая ошибка!

[aRise]

используй маску ввода например.
или простенький обработчик нажатия кнопки

[Plohoy]

if not (Key in ['0'..'9', ',']) then Key := #0;
Можно так но тогда не работает Backspace

[aRise]

дык фильтруй печатные символы

[Hacker19_90]

Сообщение от Plohoy

if not (Key in ['0'..'9', ',']) then Key := #0;
Можно так но тогда не работает Backspace

Я не уверен но попробуй так

if (not (Key in ['0'..'9', ','])) and (ord(Key) <> VK_BACK) and (ord(Key) <>VK_DELETE) then Key :=  #0;