Лидеры

Так их же выложили сразу же... ссылочку можно для прямого скачивания? https://mega.nz/#!wpESRTxQ!VK0o8Eo9U63Ho4RTYAY7L5QxjWeSrY8P0Swdm9XSDow а для FMX нету? https://mega.nz/#!vAkxGBJL!8K6ZUvF0oDqCqEeorjNxlqOUDXU0QIrhtu6ABQ95Qhs

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

Не похоже нет. См. демонстрационное видео https://www.youtube.com/watch?v=3voFs62PYl0&feature=youtu.be&t=260 Если у вас сохранилось имя файла, то можно заново загрузить все изображения с новыми параметрами и в числе прочего с новым цветом прозрачности. Хотя параметры изображения действительно применяются только в момент загрузки. Потому, что это все-таки не фотошоп и исходник картинки не хранится в FMX. То, что попадает в FMX это часто результат обработки с потерей данных. Т.е. если исходное изображение 128x128 сначала сделать 16х16, а потом 32х32, то качество количество деталей будет как у 16х16. Поэтому цвет и размеры применяются только один раз в момент загрузки, что позволяет минимизировать потери. В FMX-файле данные хранятся только в png-формате (во всяком случае на текущий момент). Редактор в IDE использует функцию TCustomBitmapItem.CreateBitmap. MultiresBitmap имеет свойства Width, Height, TransparentColor, SizeKind. Каждый элемент этой коллекции MultiresBitmap имеет свойство FileName, Scale. Функция CreateBitmap на основе этих данных создает TBitmap. Если она вернула не nil, то вы можете присвоить эту картинку элементу коллекции TMultiresBitmap. Кактотак мы перегружаем все изображения. MultiresBitmap.BeginUpdate; try for I := 0 to TMultiresBitmap.Count - 1 do begin FmxBitmapSource := MultiresBitmap[I].CreateBitmap; try if Assigned(FmxBitmapSource) then begin MultiresBitmap[I].Bitmap.Assign(FmxBitmapSource); end else begin MultiresBitmap[I].Bitmap.SetSize(0, 0); MultiresBitmap[I].FileName := ''; end; finally FreeAndNil(FmxBitmapSource); end; end; finally MultiresBitmap.EndUpdate; Если у вас TransparentColor не clNone, то просто попиксельно заменяется указанный цвет на полностью прозрачный. Если TransparentColor = clDefault, то используется цвет нижней левой точки. Исходники CreateBitmap доступны, так что можете взять за основу, и сделать что-то подобное, если данные грузятся не из файла. А что касается добавления картинок в TImageList, то можно посмотреть статью http://community.embarcadero.com/blogs/entry/timagelistxe8ru и демку, которая поставляется в составе Delphi, или взять её отсюда http://sourceforge.net/p/radstudiodemos/code/HEAD/tree/trunk/Object%20Pascal/FireMonkey%20Desktop/ImageList

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

Загрузка картинки будет выглядеть примерно так. procedure TForm11.Button2Click(Sender: TObject); const SourceName = 'Картинка'; procedure LoadPicture(const Source: TCustomSourceItem; const Scale: Single; const FileName: string); var BitmapItem: TCustomBitmapItem; TmpBitmap: TBitmap; begin BitmapItem := Source.MultiResBitmap.ItemByScale(Scale, True, True); if BitmapItem = nil then begin BitmapItem := Source.MultiResBitmap.Add; BitmapItem.Scale := Scale; end; BitmapItem.FileName := FileName; TmpBitmap := BitmapItem.CreateBitmap; try if TmpBitmap <> nil then BitmapItem.Bitmap.Assign(TmpBitmap); finally TmpBitmap.Free; end; end; var NewSource: TCustomSourceItem; NewDestination: TCustomDestinationItem; NewLayer: TLayer; begin if ImageList1.Source.IndexOf(SourceName) = -1 then begin NewSource := ImageList1.Source.Add; NewSource.Name := SourceName; NewSource.MultiResBitmap.TransparentColor := TColorRec.Fuchsia; NewSource.MultiResBitmap.SizeKind := TSizeKind.Custom; NewSource.MultiResBitmap.Width := 16; NewSource.MultiResBitmap.Height := 16; LoadPicture(NewSource, 1, 'D:\Мои веселые картинки\Icons\16x16\alarm16.bmp'); LoadPicture(NewSource, 1.5, 'D:\Мои веселые картинки\Icons\24x24\alarm24.bmp'); NewDestination := ImageList1.Destination.Add; NewLayer := NewDestination.Layers.Add; NewLayer.SourceRect.Rect := TRectF.Create(TPoint.Zero, NewSource.MultiResBitmap.Width, NewSource.MultiResBitmap.Height); NewLayer.Name := SourceName; ControlAction1.ImageIndex := NewDestination.Index; end; end; Здесь как видно грузится деве картинки 16х16 и 24х24, при этом используются масштабы 1 и 1,5. После загрузки меняется свойство ImageIndex у действия ControlAction1. Загруженная картинка должна автоматом появится на всех кнопках, которые используют ControlAction1.

Попробую. Выкладывайте на всеобщее обозрение здесь, или в комментариях к статье.