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

float в базе на каждый параметр (lat, lon)

Обновил TMapsEngine с выходом Delphi 10 Seattle
Вырезал нативный сенсор (т.к. исправили TLocationSensor) переименовал методы, в соответствии с используемым API Добавил Yandex Locator API (определение координат по IP, WI-FI, GSM) для определения своих координат, достаточно отправить пустой IP адрес, yandex сам распознает откуда был запрос сделан
 
модуль TMapsEngine_Seattle_10.zip

enatechno, kitty спасибо. Уже выложили. 
 
Даже ZuBy там засветился c TMapsEngine  

Делаю так:
После 
implementation   uses Общие библиотеки   {$IFDEF ANDROID} , андройд библиотеки    {$ENDIF} {$IFDEF IOS} , iOS библиотеки  {$ENDIF} ;   Например: uses System.Threading, IdMultipartFormData, System.Json {$IFDEF ANDROID}, Androidapi.JNI.JavaTypes, Androidapi.JNI.Os, Androidapi.JNI.GraphicsContentViewText, Androidapi.Helpers {$ENDIF} {$IFDEF IOS}, iOSapi.UIKit, iOSapi.Foundation, Macapi.Helpers {$ENDIF} ;   Если только андройд библиотеки нужны так пропишите после implementation {$IFDEF ANDROID} uses Androidapi.JNI.Media, Androidapi.Helpers; {$ENDIF}

С ZuBy приедем с Астаны в Алмату, мы будем 2 октября , также предлагаю обмыть встречу в Алмате, кто за и кто будет? Будем пить и не мало, надеюсь Ярослав выпьет со своими форумчанами 

OnClose попробуй или OnSaveState

procedure TForm22.Button1Click(Sender: TObject); var aParams: TMapsEngineYandexLocator; params, values: array of string; begin // 37.151.215.206 Астана, Казахстан SetLength(params, 1); SetLength(values, 1); params[0] := 'Внешний IP'; InputQuery('Введите...', params, values, procedure(const AResult: TModalResult; const AValues: array of string) begin if AResult = mrOk then begin mEngine.SetOptionsYandexLocator(''); aParams.IP.IPAddress_v4 := AValues[0]; TTask.Run( procedure begin mEngine.YandexLocator(aParams, TMapsEngineYandexLocatorType.IP, myLoc); mEngine.SetOptionsYandex(''); // получить через Yandex mEngine.Geocoding(myLoc, aData); TThread.Synchronize(nil, procedure begin lbCoordinate.Text := 'lat: ' + myLoc.Latitude.tostring + ' lon: ' + myLoc.Longitude.tostring; lbAddress.Text := aData.CountryCode + ' ' + aData.City + ' ' + aData.FormattedAddress; end); end); end; end); end;

ссылочку можно для прямого скачивания?

TLocationSensor больше не выключает сенсоры на самсунге (можно снова использовать его для Android)
TMapView->LayerOptions
Traffic PointsOfInterest Buildings UserLocation Появилась точка вашего местонахождения

TLocationSensor больше не выключает сенсоры на самсунге (можно снова использовать его для Android)
TMapView->LayerOptions
Traffic PointsOfInterest Buildings UserLocation Появилась точка вашего местонахождения

Минусы
1. Баг с использованием старых стилей, ждём новые Premium Styles (спасает стандартные стили которые генерирует BitmapStyleDesigner)
2. TMultiView -> Drawer не перекрывает TMapView
3. Работа со стилями в рантайме через TStyleManager изменили
4. В старых проектах нужно удалять все uses'ы и дать среде самой сгенерировать uses'ы
 
Плюсы
1. Исправили TLocationSensor
2. TMapView новые фичи
3. Среда шустрей запускается
 
Пока все что заметил

Минусы
1. Баг с использованием старых стилей, ждём новые Premium Styles (спасает стандартные стили которые генерирует BitmapStyleDesigner)
2. TMultiView -> Drawer не перекрывает TMapView
3. Работа со стилями в рантайме через TStyleManager изменили
4. В старых проектах нужно удалять все uses'ы и дать среде самой сгенерировать uses'ы
 
Плюсы
1. Исправили TLocationSensor
2. TMapView новые фичи
3. Среда шустрей запускается
 
Пока все что заметил

https://mega.nz/#!vAkxGBJL!8K6ZUvF0oDqCqEeorjNxlqOUDXU0QIrhtu6ABQ95Qhs

OnClose попробуй или OnSaveState

Минусы
1. Баг с использованием старых стилей, ждём новые Premium Styles (спасает стандартные стили которые генерирует BitmapStyleDesigner)
2. TMultiView -> Drawer не перекрывает TMapView
3. Работа со стилями в рантайме через TStyleManager изменили
4. В старых проектах нужно удалять все uses'ы и дать среде самой сгенерировать uses'ы
 
Плюсы
1. Исправили TLocationSensor
2. TMapView новые фичи
3. Среда шустрей запускается
 
Пока все что заметил

Минусы
1. Баг с использованием старых стилей, ждём новые Premium Styles (спасает стандартные стили которые генерирует BitmapStyleDesigner)
2. TMultiView -> Drawer не перекрывает TMapView
3. Работа со стилями в рантайме через TStyleManager изменили
4. В старых проектах нужно удалять все uses'ы и дать среде самой сгенерировать uses'ы
 
Плюсы
1. Исправили TLocationSensor
2. TMapView новые фичи
3. Среда шустрей запускается
 
Пока все что заметил

например при сворачивании/выходе из программы и прочие события из-за которых приложению нужно сохранить данные

... и Создание сервисов доступно только на Delphi...
 
 
АП. Пока заметил улучшения в скорости загрузки среды и в скорости открытия проектов.

это невозможно, ну если только телефон на котором вы тестите слабый. а так реальное устройство всегда и правильней и быстрей. эмулятор не учитывает особенности разных телефоном и прошивок. так что тестировать в эмуляторе можно только дизайн, как приложение будет выглядеть на разных экранах

TMapView точно исправили, поверх можно кидать компоненты, думаю TWebBrowser тоже исправили
 
UPDATE: TMultiView+TMapView=конфликтуют

доступ через USSD команды и подключение API работы с телефоном.
примеры звонилок есть в интернете и родной Action в RAD Studio

это невозможно, ну если только телефон на котором вы тестите слабый. а так реальное устройство всегда и правильней и быстрей. эмулятор не учитывает особенности разных телефоном и прошивок. так что тестировать в эмуляторе можно только дизайн, как приложение будет выглядеть на разных экранах

Кто сказал что через ini нельзя?
Всё прекрасно работает

uses   AndroidAPI.Helpers,   AndroidAPI.JNI.GraphicsContentViewText;   type   TForm1 = class(TForm)     procedure FormCreate(Sender: TObject);   private     { Private declarations }   public     { Public declarations }     function BatteryPercent(const aContext: JContext): Integer;   end;   var   Form1: TForm1;   implementation   {$R *.fmx}   function TForm1.BatteryPercent(const aContext: JContext): Integer; var   filter: JIntentFilter;   battery: JIntent; begin   filter := TJIntentFilter.Create;   filter.addAction(TJIntent.JavaClass.ACTION_BATTERY_CHANGED);   battery := aContext.registerReceiver(NIL, filter);   result := battery.getIntExtra(StringToJString('level'), -1) end;   procedure TForm1.FormCreate(Sender: TObject); var   myContext: JContext; begin   myContext := SharedActivityContext;   Showmessage(BatteryPercent(myContext).ToString); end;   а еще по другим параметрам испанец круто обсосал тут http://neftali.clubdelphi.com/?p=3157 а если надо модель, серийный то это у вас на компе Delphi\Samples\Object Pascal\Mobile Snippets\DeviceInfo  (но тут хоть ИОС есть).

Вот вам и что нового!
http://docwiki.embarcadero.com/RADStudio/Seattle/en/What%27s_New