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

Erlan_krg

Пользователи
  • Постов

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

  • Посещение

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

  1. Like
    Erlan_krg отреагировална Brovin Yaroslav в [TMultiView] Как избежать задержки при первом появлении TMultiView?   
    Так, я посмотрел. Сохраняем себе такую процедуру:
    procedure PreloadContent(const Control: TControl); var I: Integer; begin if Control is TStyledControl then TStyledControl(Control).ApplyStyleLookup; for I := 0 to Control.ControlsCount - 1 do PreloadContent(Control.Controls[I]); end; Она форсирует загрузку стилей. Задержка при появлении TMutliView заключается в том, что стиль загружается не сразу у любого контрола, а только по мере появления контрола. Обычно это происходит при первой отрисовки. Это правило касается всех контролов.
     
    Поэтому, в этом случае, вам нужно форсировать загрузку стилей. Это можно сделать при помощи моей процедуру PreloadContent.
    Добавьте в TForm.OnCreate и это решит задержку при первом появлении:
    PreloadContent(MultiView1);
  2. Like
    Erlan_krg отреагировална krapotkin в ошибка при удаление ListViewItem   
    нельзя удалять себя из обработчика себя
    нужно запустить
    TTask.Run(procedure begin TThread.Synchronize(procedure begin ваше действие с компонентом end) end);
  3. Like
    Erlan_krg отреагировална ENERGY в непонятное поведение fgActivityDialog в Delphi Tokyo   
    Я делаю проще, вот мультиплатформенный вариант: обычная форма,  Transparent := true;
    на форме AniIndicator Align = HorzCenter.
    В результате получаем отображается только AniIndicator  по центру экрана. Можно добавить и label на Tlayout вместе с AniIndicator, а у Tlayout поставить Align = HorzCenter или VertCenter. 
    Форму конечно, как и все остальные формы создавать нужно динамически и уничтожать когда не нужно.
     
    Можно еще сделать чтобы весь остальной фон, кроме текущей формы был затемненный - установите цвет у формы с AniIndicator в #AA000000 (Kind = Solid).
    А можно еще сделать чтобы фон плавно затемнялся после появления загрузочной формы. 
    class procedure TfrmDial.ShowForm; begin   if frmDial = nil then     frmDial := TfrmDial.Create(nil);   frmDial.Fill.Color := TColorRec.Null;   frmDial.Show;   Application.ProcessMessages;   TAnimator.AnimateColor(frmDial, 'Fill.Color', FADE_OUT_COLOR, 0.3); end;  
    И да кстати, Tokyo пока нельзя использовать для разработки Android приложений, до выхода первого Update, там есть критические баги, скорее всего проблема ТС - как раз связана с этими багами.
  4. Like
    Erlan_krg отреагировална Andrey Efimov в Странный Splash   
    Вот так подготовили Как добавить "резиновый" SplashScreen в XE7 ?
     
    p.s. Старайтесь прикладывать проекты к темам, так будет проще вам помочь.
  5. Like
    Erlan_krg отреагировална alexbirukov в [Статья] PHP сервер для рассылки Push на Android и iOS   
    Ссылка на статью. Автор: Александр Бирюков В статья я максимально подробно попытался описать работу с PHP скриптом для рассылки Push сообщений из любой программы вне зависимости от платформы. Затрагивается вопроса от экспорта скриптов до кода программы: отправка и получение Push, регистрация устройств.
     
    Надеюсь кому-нибудь пригодится. Буду рад комментариям, обоснованной критике и доработкам.
     
×
×
  • Создать...