Работа с Edit

[s-andriano]

Сообщение от Не_шарю_в_делфи

s-andriano прикольно придумано) очень тяжело будет разобраться как сделать, если не трудно то можно код?

Можно.
Дерзайте.
Я еще никого не засудил за использование моих идей.

[Не_шарю_в_делфи]

s-andriano а как в скроллбаре сделать шаг 0.01? у меня ошибку пишет, могу тольок шаг не меньше 1 сделать
Mrsqler спасибо! если не допетрю скролл буду ковыряться с вашими наработками))

[Не_шарю_в_делфи]

Сделал так:
2 комбобокса и 1 эдит рид онли
в первом комбобоксе числа от 0.01 до 0.34
во втором от 0.02 до 0.49

Edit1.Text:= FloatToStr(1-(StrToFloat(ComboBox1.Text)+StrToFl oat(ComboBox2.Text)));

А в комбобокс1 по умолчанию текст 0.01 иначе ошибку выдает если использовать сначала бокс2 без использования бокс1

Вроде пашет
Спасибо за Ваши идеи, господа!

[s-andriano]

Сообщение от Не_шарю_в_делфи

s-andriano а как в скроллбаре сделать шаг 0.01? у меня ошибку пишет, могу тольок шаг не меньше 1 сделать
Mrsqler спасибо! если не допетрю скролл буду ковыряться с вашими наработками))

Scrollbar имеет диапазон значений всегда от 0 до N в целых числах, поэтому значение, получаемое от скроллбара нужно преобразовать.
Например, если нужен диапазон, скажем, от 0.01 до 0.35, то диапазон скроллбара устанавливается до 34 и значение пересчитывается

х := (ScrollData + 1)*0.01;