Перейти к содержанию
Fire Monkey от А до Я

Andrey Efimov

Модераторы
  • Постов

    842
  • Зарегистрирован

  • Победитель дней

    123

Активность репутации

  1. Thanks
    Andrey Efimov отреагировална VladimirBykov в Ошибка "ssl3_get_record wrong version number"   
    Ответ нашелся
    https://community.embarcadero.com/forum/programming/9795-ssl3-get-record-wrong-version-number-error?start=6#14547
     
    Спасибо за внимание
  2. Like
    Andrey Efimov отреагировална willi в Простой график для вывода точек и столбцов   
    Заменил одну кривую графика на функцию синуса:
    Код: вместо линейной функции точек:
       Lx:=-20; Ly:=0;
       for i :=0 to 300 do
        begin
         Larea.Curves.Last.Points.Add(TcvPoint.Create(i,Lx,Ly));
         Lx:=Lx+2; Ly:=120+50*Sin(Lx*0.04);
        end;
    Видно, что для этой данной кривой выводятся не все значения точек, а только указанные...
     

  3. Like
    Andrey Efimov отреагировална krapotkin в THTTPClient авторизация   
    Конечно можно. А что такое "авторизоваться" ?
  4. Like
    Andrey Efimov отреагировална krapotkin в THTTPClient авторизация   
    да блин нет никаких логин и пароль для THttpClient
    есть форма логина. она должна принять от пользователя данные и послать их серверу. Способ передачи и вызываемый URL зависит от конкретного программиста
    В ответ сервер присылает обычно токен или куку или еще что-то в этом духе. 
    и далее при каждом запросе нужно передавать серверу эти присланные данные и возможно что-то еще. Чаще всего в заголовке запроса. Но иногда и в URL. А иногда и там и там нужно что-то передавать, чтобы сервер идентифицировал, от кого ему прилетел запрос.
    и вот этот-то механизм и есть то, что нужно гуглить. если тут есть спецы по WP, они могут знать подробности...
  5. Like
    Andrey Efimov отреагировална willi в Простой график для вывода точек и столбцов   
    Написал в XE10.1 простой модуль для вывода кривых на TImage  в виде графика - есть возможность вывода столбцов для диаграмм, меток с надписями и прочей мелочи.
    В виде компонента не оформлял...    Смысл: вводим массив точек - график сам подбирает область вывода чтобы влезли надписи и выводит с указанными параметрами и стилем кривые (имею в виду зависимости Y от X).
    Есть комментарии в коде - есть пример для тестов - см. проект https://github.com/willi-spb/arTrassing
    желательно тестирование, возможно я что-то упустил - сам модуль: https://github.com/willi-spb/arTrassing/blob/master/FMX.arCurveClasses.pas

  6. Like
    Andrey Efimov получил реакцию от Равиль Зарипов (ZuBy) в Описание Permissions   
    Документация по студии. Например: Mobile Tutorial: Using Location Sensors (iOS and Android) в самом начале указано какие разрешения нужны для использования.
    Документация по Android: Manifest.permission; Normal permissions; Dangerous permissions and permission groups
  7. Like
    Andrey Efimov получил реакцию от ENERGY в Описание Permissions   
    Документация по студии. Например: Mobile Tutorial: Using Location Sensors (iOS and Android) в самом начале указано какие разрешения нужны для использования.
    Документация по Android: Manifest.permission; Normal permissions; Dangerous permissions and permission groups
  8. Like
    Andrey Efimov получил реакцию от Ingalime в Описание Permissions   
    Документация по студии. Например: Mobile Tutorial: Using Location Sensors (iOS and Android) в самом начале указано какие разрешения нужны для использования.
    Документация по Android: Manifest.permission; Normal permissions; Dangerous permissions and permission groups
  9. Like
    Andrey Efimov получил реакцию от Barbanel в Описание Permissions   
    Документация по студии. Например: Mobile Tutorial: Using Location Sensors (iOS and Android) в самом начале указано какие разрешения нужны для использования.
    Документация по Android: Manifest.permission; Normal permissions; Dangerous permissions and permission groups
  10. Like
    Andrey Efimov отреагировална rareMax в Как узнать, что Android приложение свернуто?   
    Прочитайте эту статью: http://delphifmandroid.blogspot.com/2016/09/delphi-android.html
  11. Like
    Andrey Efimov отреагировална Равиль Зарипов (ZuBy) в Как грамотнее закрыть Android -приложение?   
    Обычно достаточно Close, но можно ещё Application.Terminate, MainActivity.finish или Halt(0)
  12. Like
    Andrey Efimov отреагировална Fedor K в Как грамотнее закрыть Android -приложение?   
    Close, Application.Terminate - я бы не советовал использовать на Android. Может оказаться такая ситуация, что часть приложения останется в памяти, а что-то уже убьется. В итоге заново запустить приложение без выкидывания из истории не получится и увидите только черный экран. Желательно обойтись без самоубийства на Android  и лишь свернуть через SharedActivity.moveTaskToBack(True); Если все же самоубийство по плану, тогда лучшие средства  TJProcess.JavaClass.killProcess(TJProcess.JavaClass.myPid); MainActvity.Finish; - как упомянул выше Равиль.  
  13. Like
    Andrey Efimov отреагировална mazayhin в Log.d - что это?   
    API for sending log output.
    Generally, you should use the Log.v(), Log.d(),Log.i(), Log.w(), and Log.e() methods to write logs. You can then view the logs in logcat.
    The order in terms of verbosity, from least to most is ERROR, WARN, INFO, DEBUG, VERBOSE. Verbose should never be compiled into an application except during development. Debug logs are compiled in but stripped at runtime. Error, warning and info logs are always kept.
    Смотреть это можно через monitor.bat идет в составе sdk, ну или abd logcat. В лог выод идет только для debug сборок, в release не выводится
  14. Like
    Andrey Efimov отреагировална ENERGY в Android (iOS) popup   
    Use TListBox as a Popup menu. Does TPopup already work nice on mobile OS?
    Here is how to:
    https://community.embarcadero.com/blogs/sarina-dupont-senior-product-manager/entry/creating-an-overflow-menu-on-android-463
  15. Like
    Andrey Efimov отреагировална FREEFAR в Android (iOS) popup   
    Hi there! Try catch onFromKeyUp. There write code like:
    if PopupComponent.Visible then
    begin
    //doSomething....
    key := 0;
    end;
  16. Like
    Andrey Efimov отреагировална mazayhin в SSDP for Android   
    Как вижу, тут есть 3 варианта.
    1. Взять обертки над SDK от fmxexpress (или сделать самому), и самому написать по примеру выше, но уже на delphi.
    2. Найти подходящее на Java, скомпилировать в jar, создать обертку для delphi (Java2Op) и использовать уже ее.
    3. Наверное, самый удачный вариант, т.к. все это чудо работает по UDP, самому на основе Indy реализовать в своей программе.
  17. Like
    Andrey Efimov отреагировална krapotkin в Hint для Андроид   
    для полноценной подсказки и на windows и на android я в критических местах добавляю малую кнопку с вопросиком ))
  18. Like
    Andrey Efimov отреагировална Barbanel в Узнать объем свободной RAM   
    Пример один
    Пример два
  19. Like
    Andrey Efimov отреагировална Евгений Корепов в NetHttpClient vs idHttp   
    Я уперся рогом и все таки смог найти решение для вас. Гугль любит разработчиков, и обычно оставляет им возможность пользоваться сервисами бесплатно. И в этот раз чутьё не подвело. Вот решение:
    unit Unit1; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Controls.Presentation, FMX.ScrollBox, FMX.Memo, System.JSON, System.Net.HTTPClient, System.NetEncoding; type TForm1 = class(TForm) Memo1: TMemo; procedure FormShow(Sender: TObject); private { Private declarations } public { Public declarations } function GoogleTranslate(const AValue : String) : String; end; var Form1: TForm1; implementation {$R *.fmx} procedure TForm1.FormShow(Sender: TObject); Var S : String; begin S:=GoogleTranslate('Hello world!'); Memo1.Lines.Add(S); end; function TForm1.GoogleTranslate(const AValue : String) : String; const ConstSourceLang = 'en'; ConstTargetLang = 'ru'; var AResponce : IHTTPResponse; FHTTPClient : THTTPClient; AAPIUrl : String; begin AAPIUrl:='https://translate.googleapis.com/translate_a/single?client=gtx&sl=' + ConstSourceLang + '&tl=' + ConstTargetLang + '&dt=t&q=' + TNetEncoding.URL.Encode(AValue); FHTTPClient:=THTTPClient.Create; FHTTPClient.UserAgent:='Mozilla/5.0 (Windows; U; Windows NT 6.1; ru-RU) Gecko/20100625 Firefox/3.6.6'; Result:='Translate Error : '; AResponce:=FHTTPClient.Get(AAPIUrl); if Not Assigned(AResponce) then begin Result:=Result + 'unknow.'; Exit; end; if AResponce.StatusCode <> 200 then begin Result:=Result + AResponce.StatusText; end; try Result:=TJSONArray(TJSONArray(TJSONArray(TJSONObject.ParseJSONValue(AResponce.ContentAsString)).Items[0]).Items[0]).Items[0].Value; except Result:=Result + 'error parse JSON.'; Exit; end; end; end. Подправил код, сделал покрасивее и убрал deprecated encode.
  20. Like
    Andrey Efimov отреагировална krapotkin в Картинку с вебки зеркально отобразить   
    ярослав давал пример оч. давно 
    вроде на BitmapSurface есть метод отражение
  21. Like
    Andrey Efimov получил реакцию от Ingalime в AndroidTV   
    Вот эти "Get started with TV apps" рекомендации выполнены? (обратите внимание, что требуется специальная запись в манифесте)
  22. Like
    Andrey Efimov получил реакцию от Ingalime в Поиск среды (IDE)   
    Нет. Для Андроида - только Android Studio.
  23. Like
    Andrey Efimov получил реакцию от petyaas в TEdit не понятное удаление последнего символа   
    Здравствуйте.
    Это баг, я сообщил о нём ещё в мае (RSP-14928 и RSP-14929), в тех. поддержке предложили временное решение (ответ ниже). (Тема В TEdit стирается предыдущий текст аналогичная).
    find FMX.Platform.Android.pas find procedure TTextServiceAndroid.SetCaretPosition(const Value: TPoint); change code to: procedure TTextServiceAndroid.SetCaretPosition(const Value: TPoint); var SelStart, SelEnd: Integer; begin if FCaretPosition <> Value then begin FCaretPosition := Value; CalculateSelectionBounds(SelStart, SelEnd); if (FTextView <> nil) and not FInternalUpdate then PlatformAndroid.SynchronizeOnUIThread( procedure begin //Fix By [龟山]Aone(1467948783) //https://quality.embarcadero.com/browse/RSP-14928 // if (SelEnd - SelStart) > 0 then // FTextView.setSelection(SelStart, SelEnd) // else FTextView.setCursorPosition(CaretPosition.X); end); end; end;  
     
  24. Like
    Andrey Efimov получил реакцию от Вадим Шавров в TEdit не понятное удаление последнего символа   
    Здравствуйте.
    Это баг, я сообщил о нём ещё в мае (RSP-14928 и RSP-14929), в тех. поддержке предложили временное решение (ответ ниже). (Тема В TEdit стирается предыдущий текст аналогичная).
    find FMX.Platform.Android.pas find procedure TTextServiceAndroid.SetCaretPosition(const Value: TPoint); change code to: procedure TTextServiceAndroid.SetCaretPosition(const Value: TPoint); var SelStart, SelEnd: Integer; begin if FCaretPosition <> Value then begin FCaretPosition := Value; CalculateSelectionBounds(SelStart, SelEnd); if (FTextView <> nil) and not FInternalUpdate then PlatformAndroid.SynchronizeOnUIThread( procedure begin //Fix By [龟山]Aone(1467948783) //https://quality.embarcadero.com/browse/RSP-14928 // if (SelEnd - SelStart) > 0 then // FTextView.setSelection(SelStart, SelEnd) // else FTextView.setCursorPosition(CaretPosition.X); end); end; end;  
     
  25. Like
    Andrey Efimov получил реакцию от Dev в [Статья][Android] AlarmManager - Автозапуск приложения в назначенное время   
    Ссылка: http://delphifmandroid.blogspot.ru/2016/02/alarmmanager-rad-studio.html
    Автор: Ефимов Андрей
    Описание: [AlarmManager] Автозапуск приложения в назначенное время
×
×
  • Создать...