Модератор: Дед Пахом
Это первое, что приходит в голову всем у кого я спрашиваю.
Код: Выделить всё
!===================================================================================
! Обработка позиционирования в цифровых полях
!
FsFix_C11.EventSelectNums PROCEDURE
CODE
if event()<>event:selected
return
end
SELF.Contr = field()
if SELF.Contr = 0
return
end
case SELF.Contr{prop:type}
of CREATE:entry
orof CREATE:spin
else
return
end
SELF.ContrFormat = SELF.Contr{prop:text}
case sub(SELF.ContrFormat,1,1)
of 'N'
orof 'n'
select(SELF.Contr,1)
select(SELF.Contr)
return
end
case sub(SELF.ContrFormat,1,2)
of '@N'
orof '@n'
select(SELF.Contr,1)
select(SELF.Contr)
end
Это я перебрал. Формат Ravenous работает как надо. Пробуйте. Пустышку не получается выбрать.Игорь Столяров писал(а): ↑28 Июль 2023, 14:13Это первое, что приходит в голову всем у кого я спрашиваю.
К сожалению нет. Формат экстремально допустимый (как и например @S9b) -
но результат как на первом рисунке. Увы !
Ну этот формат тупо подавляет незначащий ноль и не более того.
Это бы сработало, если делать Select(?,1,[длина поля]) ...
Делалось для числовые полей с включенным mask. Без него, возможно, select как написали, не проверял за ненадобностью. Метод класса вызывается сразу после accept и отрабатывает для всех полей, у которых числовой формат.Игорь Столяров писал(а): ↑28 Июль 2023, 16:45Это бы сработало, если делать Select(?,1,[длина поля]) ...
Но нужно либо прописывать для каждого поля, либо разбирать на лету формат ...
И это убирает проблему с выбором, но всё равно незначащие пробелы перед цифрой остаются.
Не поминайте всуе. А то опять свалимся в бессмысленные рассуждения, а есть ли мальчик.
С каким форматом проблем нет? Без десятичных.Игорь Столяров писал(а): ↑30 Июль 2023, 5:57 Я так понимаю, что система ввода чисел заточена под американский форматы "123,456.78" или "123 456,78".
