Цитата:
|
Сообщение от Vocabulary
В предложенном коде есть логическая ошибка:
В процедуре Edit1Change программа НИКОГДА не выполнит код, который записан по альтернативной ветке (else) в условии if length(s)=1 then.
|
Да неужели)))
Показываю уличную магию:
Воодим в эдит1 число скажем 5.
Далее копируем число скажем 55555555,
и вводим в эдит1 через Ctrl+V.
И вуаля и код после елс выполнен.
Вы думаетет я не проверял прогу, перед тем как закинуть на сайт? оО
Цитата:
|
Сообщение от Vocabulary
---
Ошибка там сопряжена с тем, что в файле dfm имя объекта TRichEdit не определено (пустое). Надо просто указать это имя - RichEdit1.
|
А тут вы правы, просто спешил когда копировал.