Отправлено: 27.08.09 01:11. Заголовок: GET

Всем привет !

Нужно было изменить DOS прогу без исходников. Декомпилировал, исправил, собрал - все работает. В этой проге создается GET объкт для ввода значений разного типа. Если вводить дробное число и нажать на точку (для перехода к дробной части), то к точке разделяющей целую и дробную части добавляется еще одна точка. Соответственно разрядность дробной части числа уменьшается на 1. При выходе из GET вторая точка пропадает. В чем тут проблема ?

 Отправлено: 27.08.09 09:28. Заголовок: get - picture

возможно формат picture у этого GET выглядит как "XXXXXX.XX"
можно изменить на "99999.99" ( тогда только цифры)
или на "XXXXXXXX" (после ввода можно определять корректность числовых величин - удалять не цифры)

 Отправлено: 27.08.09 11:29. Заголовок: Естественно, я сразу..

Естественно, я сразу проверил Picture - все нормально.( 999999.99), даже явно прописал. При нажатии символа "," - все нормально - курсор перемещается на первую позицию после точки. А вот при нажатии символа "." перемещается в первую позицию после разделителя и заменяет содержимое этой позиции на точку. Причем, если вручную установить курсор на первую позицию после разделителя и нажать ".", то точка в эту позицию вставится (и только в эту позицию)

 Отправлено: 27.08.09 13:46. Заголовок: get picture

для стандартного GETSYS из 5.2e поведение не типичное для числовых величин
.....getsys.prg....
IF ( oGet:type == "N" .AND. ( cKey == "." .OR. cKey == "," ) )
oGet:toDecPos()
ELSE
......
Возможно - переписан \source\sys\GETSYS.prg ?
Или ввод символьных величин в формат "99999.99" ?

 Отправлено: 28.08.09 00:29. Заголовок: Надоело разбираться ..

Надоело разбираться чего там накрутил rescue5 - просто перехватил нажатие точки и положил в буфер клавиатуры запятую. Все заработало.