Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / XSuperObject / 6 сообщений из 6, страница 1 из 1
10.06.2020, 00:22
    #39967653
rgreat
rgreat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
XSuperObject
Есть пара:
"f401_gvn" : "62"

Как бы проигнорировать кавычки и считать значение как integer?

А то так работает Item.AsObject.S['f401_gvl'], а так Item.AsObject.S['f401_gvl'] - нет.

Invalid Class Typecast.

Не хочется уйму костылей типа StrToInt вставлять.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.06.2020, 00:55
    #39967659
X-Cite
X-Cite
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
XSuperObject
По спецификации json "62" - это строка...

Любой адекватный парсер должен воспринимать по стандарту

Numeric
String

Передавайте без кавычек или просите стороннее api передавать без кавычек если там ожидаются числа...
Иначе не избежать
Код: pascal
1.
Item.AsObject.S['f401_gvl'].AsInteger();
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.06.2020, 01:04
    #39967662
rgreat
rgreat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
XSuperObject
Это-то понятно.
Но вот сделали такой сервис (не мы) а мне с ним тра... в смысле работать.

Сахару-бы...

Кстати, не "AsInteger()" а "ToInteger".
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.06.2020, 06:50
    #39967672
Exteris
Exteris
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
XSuperObject
rgreat
А то так работает Item.AsObject.S['f401_gvl'], а так Item.AsObject.S['f401_gvl'] - нет.

Один я не вижу отличий в этих двух вариантах?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.06.2020, 06:55
    #39967673
rgreat
rgreat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
XSuperObject
Exteris,

Копи-паста не срослась.

Должно быть так:

А то так работает Item.AsObject.S['f401_gvl'], а так Item.AsObject.I['f401_gvl'] - нет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.06.2020, 07:21
    #39967678
Exteris
Exteris
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
XSuperObject
Как вариант, предварительно убрать кавычки во всем тексте регуляркой?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / XSuperObject / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 310ms
Закрыть
start [/forum/topic.php?fid=58&mobile=1&tid=2038236]:
 0ms
get settings:
 6ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 25ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 24ms
get tp. blocked users:
 1ms
others: 233ms
total:  310ms
x
x
Закрыть


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