Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / форматы / 5 сообщений из 5, страница 1 из 1
21.07.2010, 09:53
    #36751701
fri
fri
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
форматы
добрый день.
подскажите пожалуйста, столкнулась с такой проблемой, в таблице есть поля с данными в 16-ричном формате, тип данных у этих полей при этом С(5).
можно ли их как-то переделать в десятичный формат, может есть какая функция или команда.
...
Рейтинг: 0 / 0
21.07.2010, 10:05
    #36751717
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
форматы
Если это двоичные целые то CTOBIN(), но там нет пятибайтовых форматов, только 1, 2, 4 и 8 байт.
можно еще функцию написать через коды символов в число преобразовать.

Если там формат с плавающей запятой, то только функцию писать.
...
Рейтинг: 0 / 0
21.07.2010, 10:10
    #36751727
fri
fri
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
форматы
тип данных поля С(5) и числа в 16-ричном формате, надо получить поле N(5) в десятичном формате.
например записано число 0E5B4, а надо 58804 чтоб отображалось.
...
Рейтинг: 0 / 0
21.07.2010, 10:17
    #36751736
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
форматы
Похоже невнимательно прочитал первый пост.
Если 16-ричные, то через EVAL() можно, но только с проверкой правильности значения. Иначе ошибка будет
Код: plaintext
1.
2.
3.
4.
5.
lcHex = '0E5B4'
if chrtran(lcHex, '01234567890ABCDEF', '') == ''
   ? EVAL('0x' + lcHex)
else
   ? 'Это не 16-тиричное число'
endif
...
Рейтинг: 0 / 0
21.07.2010, 10:33
    #36751761
fri
fri
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
форматы
огромное спасибо!!!
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / форматы / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]