-
Постов
1 204 -
Зарегистрирован
-
Посещение
-
Победитель дней
26
Весь контент Rusland
-
Попробуйте Query1.SQL.Add('SELECT * FROM Tab_Izv WHERE OTDEL like '+#39+bsSkinComboBox1.Text+'%'+#39+ ' AND DATA BETWEEN TO_DATE ('+ Ot+', "dd.mm.yyyy") AND TO_DATE ('+ Doo+', "dd.mm.yyyy") ORDER BY NOMER;' );
- 13 ответов
-
Должно быть #012 - это символ перевода строки \n Попробуйте убрать через StringReplace.
-
Работал когда-то. В то время на Seattle делал
-
Достаточно добавить test_classes.jar в Libraries и все заработает. PS. На Xiaomi не заработало
-
Так вот у меня на планшете Lenovo Tab 2 a8-50l (Android 5) с этим кодом ни в какую координаты не передаются, значок GPS не появляется. Не пойму отчего это зависит
-
Вот в Xiaomi (RN4) у меня как раз заработало!
-
Значек GPS у меня и на планшете Lenovo (андроид 5) не появился... что-то не так с кодом
-
@M1shQa насколько помню, подключение измененных System.Android.SensorsDD, System.SensorsDD требовалось для Seattle. Зачем их сейчас подключать? На Берлине с обычными System.Android.Sensors, System.Sensors будет работать
-
Какая версия Delphi? PS. От Indy компонентов лучше отказаться
-
Выложи проект, проверю на своем Xiaomi
-
Чего? Если после insert сделать select, то что выдает?
-
Лучше сразу с ListView начинать
-
Вот так получаю список файлов: procedure TForm1.GetFileList(); var Link,Mem:String; Code:Integer; begin RESTRequest1.Params.Clear; RESTRequest1.Params.Add; RESTRequest1.Params[0].Kind:=TRESTRequestParameterKind.pkHTTPHEADER; RESTRequest1.Params[0].name:='Authorization'; RESTRequest1.Params[0].Options:=[poDoNotEncode]; RESTRequest1.Params[0].Value:='OAuth ' + OAuth2Authenticator1.AccessToken; RESTRequest1.AddParameter('path', 'disk:/'); RESTRequest1.AddParameter('limit', '100'); // ограничение списка файлов до 100 RESTRequest1.AddParameter('media_type', 'video'); // не срабатывает этот фильтр RESTRequest1.Resource:='/disk/resources'; RESTRequest1.Method:=rmGet; RESTRequest1.Execute; if RESTRequest1.Response.StatusCode=200 then begin Memo1.Lines.Text:=RESTRequest1.Response.Content; // TODO дальше надо бежать по списку и найдя нужный файл скачать его end else Memo1.Lines.Add('запрос ссылки - ошибка '+RESTRequest1.Response.StatusCode.ToString); end; Почему не срабатывает ограничение 'media_type', 'video' ?
-
А на более новых устройствах нет возможности протестировать?
-
Евгений Корепов где-то давал ссылку как писать эту политику и даже сайт свой предлагал для ее размещения
-
Выкладывай, проверим
-
Работает!!! Кстати, а почему фон у значка становиться зеленым?
-
Вот кто хулиганил
-
Synapse еще жив? Вроде для VCL они
-
Зато мне откуда-то пуши валяться... это не вы случайно отправляете что-то типа asdasd?
-
@marsden В Берлине, в отличии от Токио, у RESTRequest нет метода AddFile. Как это обойти? Попробовал скопировать в папку с проектом файлы REST.Client.pas, REST.Types.pas, IPPeerAPI.pas из Токио, при компиляции получаю ошибку: [dcc32 Fatal Error] IPPeerAPI.pas(1260): F2051 Unit REST.HttpClient was compiled with a different version of IPPeerAPI.IIPMultipartFormDataStream