Помогите с REST разобраться

[Syb]

Я могу совсем что то не правильно делать, хочу получить данные согласно API :

 

 

http://glonasssoft.ru/wiki/?wiki_name=API

var jValue:TJSONValue; s,s1:string;
begin
RestClient1.BaseURL:='http://dev.glonasssoft.ru/auth/login';
Restrequest1.Execute;
jValue:=RESTResponse1.JSONValue;
s:=jValue.ToString;
s1:= copy(s,pos('AuthID:"',s)+11,pos('","U',s)-pos('AuthID:"',s)-11);//достал ключ
RestClient2.BaseURL:='http://dev.glonasssoft.ru/vehicles_';

Restrequest2.Params[0].Value:=s1; -здесь параметр типа HttpHeader задан X-Auth в него сую ключ
Restrequest2.Execute; - говорит не авторезирован
jValue:=RESTResponse2.JSONValue;
s:=jValue.ToString;

что я не так делаю?

Изменено 9 ноября, 2015 пользователем Syb

[Равиль Зарипов (ZuBy)]

зачем тебе REST компоненты? чем обычный idHTTP не устраивает?

проверить не получится, нет учетки

[Syb]

demo учетка там есть l:demo p:demo

[Syb]

зачем тебе REST компоненты? чем обычный idHTTP не устраивает?

проверить не получится, нет учетки

demo учетка там есть l:demo p:demo

[Syb]

зачем тебе REST компоненты? чем обычный idHTTP не устраивает?

проверить не получится, нет учетки

таже фигня

s:=IdHTTP1.Get('http://dev.glonasssoft.ru/auth/login?username=demo&password=demo');
IdHTTP1.Request.RawHeaders.AddValue(' X-Auth',copy(s,pos('AuthID:"',s)+11,pos('","U',s)-pos('AuthID:"',s)-11));
s:=IdHTTP1.Get('http://dev.glonasssoft.ru/info/profile'); 

[Syb]

получилось)

[Равиль Зарипов (ZuBy)]

получилось)

ну так выложи решение, вдруг кому пригодится

[Syb]

 

получилось)

ну так выложи решение, вдруг кому пригодит

 

 

я ошибся в в строке ключ без символа передавал так что любой из вариантов выше рабочий там просто нужно было 12 сдвиг делать , а не 11

Изменено 10 ноября, 2015 пользователем Syb

[Syb]

Теперь проблема в парсинге пробую superobject, что то пока не пойму как по объекту ходить... Может есть лучше спопсоб , как перебирать записи ?

[Равиль Зарипов (ZuBy)]

Теперь проблема в парсинге пробую superobject, что то пока не пойму как по объекту ходить... Может есть лучше спопсоб , как перебирать записи ?

есть два варианта, вот тут есть код. может поможет

[Syb]

 

Теперь проблема в парсинге пробую superobject, что то пока не пойму как по объекту ходить... Может есть лучше спопсоб , как перебирать записи ?

есть два варианта, вот тут есть код. может поможет

 

БОЛЬШОЕ спасибо сразу все встало на места))