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

FREEFAR

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

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

  • Посещение

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

    13

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

  1. Like
    FREEFAR отреагировална Равиль Зарипов (ZuBy) в Вывод личных сообщений   
    Оптимального варианта нет, можно сделать на ЛистВью, но сложно. Можно на ЛистБоксе, легко, но будет ужасно лагать. Прочие варианты со СкролБоксом тоже будут лагать.
  2. Like
    FREEFAR отреагировална Евгений Корепов в Требования к целевому уровню API с августа 2018 г.   
    Файл AndroidManifest.template.xml в папке проекта (это шаблон манифеста). 
    Строка:
        <uses-sdk android:minSdkVersion="%minSdkVersion%" android:targetSdkVersion="%targetSdkVersion%" />
    Если вы откомпилируете проект и посмотрите подготовленный средой файл манифеста в папке
    \Android\Debug\AndroidManifest.xml
    то увидите что приложение предназначено для API десятилетней давности:
        <uses-sdk android:minSdkVersion="14" android:targetSdkVersion="14" />
    Гугль от вас просит примерно такого
        <uses-sdk android:minSdkVersion="14" android:targetSdkVersion="26" />
    Измените шаблон AndroidManifest.template.xml:
        <uses-sdk android:minSdkVersion="%minSdkVersion%" android:targetSdkVersion="26" />
     
  3. Like
    FREEFAR получил реакцию от Евгений Корепов в Блокировка компонентов при скроллинге   
    Сам не пробовал еще, но тебе предложу.
    Может есть целевое решение, но мне видится такое
    Проверь отпишись пжл.
    значится в CreateFrom суем 
    FMX.Types.VKAutoShowMode := TVKAutoShowMode.Never;
    Это дело лишит нас открытия клавиатуры при Click на Edit
    а в событии onTap у Edit прописать процедуру открытия клавы
    showKeyboard(Sender);
    procedure Tmainf.showKeyboard(Sender: TObject);
    var
      FService: IFMXVirtualKeyboardService;
    begin
      {$IFDEF MSWINDOWS}
      exit;
      {$ENDIF}
      TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService, IInterface(FService));
      if (FService <> nil) then
      begin
        if not (TVirtualKeyBoardState.Visible in FService.VirtualKeyBoardState) then
          FService.ShowVirtualKeyboard(TFmxObject(Sender));
      end;
      if TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardToolbarService, IInterface(FKService)) then
        begin
          FKService.SetHideKeyboardButtonVisibility(False);
          FKService.SetToolbarEnabled(False);
        end;
    end;
     
  4. Like
    FREEFAR получил реакцию от Вадим Шавров в Блокировка компонентов при скроллинге   
    Костыль года ))
    Tdatetime.hittest = False;
    на него кидаем TLAyout
    Layout.align := talignlayout.contents;
    Layout.hittest = True;
    в onTap у Layout пишем
    datetimepicker.OpenPicker;;
     
  5. Like
    FREEFAR получил реакцию от Вадим Шавров в Блокировка компонентов при скроллинге   
    Сам не пробовал еще, но тебе предложу.
    Может есть целевое решение, но мне видится такое
    Проверь отпишись пжл.
    значится в CreateFrom суем 
    FMX.Types.VKAutoShowMode := TVKAutoShowMode.Never;
    Это дело лишит нас открытия клавиатуры при Click на Edit
    а в событии onTap у Edit прописать процедуру открытия клавы
    showKeyboard(Sender);
    procedure Tmainf.showKeyboard(Sender: TObject);
    var
      FService: IFMXVirtualKeyboardService;
    begin
      {$IFDEF MSWINDOWS}
      exit;
      {$ENDIF}
      TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService, IInterface(FService));
      if (FService <> nil) then
      begin
        if not (TVirtualKeyBoardState.Visible in FService.VirtualKeyBoardState) then
          FService.ShowVirtualKeyboard(TFmxObject(Sender));
      end;
      if TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardToolbarService, IInterface(FKService)) then
        begin
          FKService.SetHideKeyboardButtonVisibility(False);
          FKService.SetToolbarEnabled(False);
        end;
    end;
     
  6. Like
    FREEFAR получил реакцию от Ingalime в ERROR ITMS-90725   
    у меня дома стоит xCode 9.1 вроде и там SDK  >11
  7. Like
    FREEFAR получил реакцию от Ingalime в ERROR ITMS-90725   
    привет.
    ну если ты говоришь что на маке стоит xCode 9.3 то обновлять тебе ничего не надо. А вот SDK в студии стоит настроить посвежее. А также после этого пересобрать приложение
    UPD: впрочем у нас на работе SDK 10.2 недавно публиковались успешно вроде
  8. Like
    FREEFAR отреагировална Martifan в iOS Speech To Text   
    https://github.com/jimmckeeth/FireMonkey-Android-Voice/
  9. Confused
    FREEFAR получил реакцию от Hevard в Как вернуть скролл в начало? TVertScrollBox   
    еще так можно))
    VertScrollBox1.ViewportPosition.Y := 0;
  10. Like
    FREEFAR отреагировална Вадим Шавров в Как вернуть скролл в начало? TVertScrollBox   
    Не помогло.
    Решил поискать ответ по командам, которые вы написали. Нашел такое решение:
    VertScrollBox1.ViewportPosition:=TPointF.Create(0,0); Все работает. Спасибо!
  11. Thanks
    FREEFAR получил реакцию от Вадим Шавров в Как вернуть скролл в начало? TVertScrollBox   
    Попробуй так
    v: TVertScrollBox
    v.ScrollTo(0,0,False);
    v.ScrollBy
  12. Like
    FREEFAR отреагировална МихаилЪ чайковЪ в Tlabel Click   
    lblCompanyMail.HitTest := True; 
    Есть такая строчка у вас?
  13. Like
    FREEFAR отреагировална Ingalime в [Вебинар] FGX Native. Новейшая кроссплатформенная платформа для мобильной разработки на Delphi   
    Отличная и правильная идея писать новости в разделе этого форума!
    Если есть возможность, то также сделайте раздел новостей на форуме на анг. языке.
    Спасибо.
  14. Like
    FREEFAR получил реакцию от Andrey Efimov в Android (iOS) popup   
    Hi there! Try catch onFromKeyUp. There write code like:
    if PopupComponent.Visible then
    begin
    //doSomething....
    key := 0;
    end;
  15. Like
    FREEFAR получил реакцию от rareMax в Приложение для получения раздражителей в работе Магазинов розничной сети   
    Всем привет.
    Смотрю сегодня тренд на публикацию приложений разработанных на Emb'e.
    Вот наше приложение которое тоже на днях поедет в маркеты
    Регаемся по номеру

     
    подтверждаем эСэМэСиной.

    Придумываем пин код и подтверждаем его

     
    После входа приложение покажет магазины в радиусе 500м


    Заходим в меню магазина

    Выбираем категорию  для жалобы ---- жалуемся , если надо прикладываем фото

    Еще кое что

    подтверждаем отправку жалобы

    PROFIT!
  16. Like
    FREEFAR получил реакцию от kami в Странное поведение переменной integer   
    где может быть в другом месте инициализирована CartList  если в конкретном примере она объявлена в процедуре
  17. Like
    FREEFAR отреагировална #WAMACO в Что невозможно сделать на Delphi для Android?   
    Не слушайте никого! Есть разные практики....
  18. Like
    FREEFAR получил реакцию от AngryOwl в Приложение для получения раздражителей в работе Магазинов розничной сети   
    Всем привет.
    Смотрю сегодня тренд на публикацию приложений разработанных на Emb'e.
    Вот наше приложение которое тоже на днях поедет в маркеты
    Регаемся по номеру

     
    подтверждаем эСэМэСиной.

    Придумываем пин код и подтверждаем его

     
    После входа приложение покажет магазины в радиусе 500м


    Заходим в меню магазина

    Выбираем категорию  для жалобы ---- жалуемся , если надо прикладываем фото

    Еще кое что

    подтверждаем отправку жалобы

    PROFIT!
  19. Like
    FREEFAR получил реакцию от mazayhin в Приложение для получения раздражителей в работе Магазинов розничной сети   
    Продолжая выражать благодарность всем тем кто помогал решать задачи которые перед нами ставили с удовольствием предлагаю вашему вниманию собственно само приложение. На Андроид доступно пока попрямой ссылке https://play.google.com/store/apps/details?id=com.wb.PulsM
    На iOS ушли в аудит Apple
  20. Like
    FREEFAR получил реакцию от Rusland в Что невозможно сделать на Delphi для Android?   
    Про красиво - вот наш прототип. Более менее UFriendly



  21. Like
    FREEFAR отреагировална ENERGY в [Отклонение] TFloatAnimation и TFrame   
    Столкнулся с такой же проблемой, если любой компонент (в моем случае TImage ) лежит на фрейме не работает TFloatAnimation вообще.
    Решение: 
    При создании фрейма нужно указывать Self формы, а не  nil.
    : MyFrame := TMyFrame.Create(Self);
  22. Like
    FREEFAR получил реакцию от Ingalime в Изменение стандартного звука а push-уведомлении   
    на iOS свой звук подбрасывается норм. На Андроиде скорее всего печаль
  23. Like
    FREEFAR отреагировална Yarpda в Узнать отображаемый размер видео на контроле Mediaplayer   
    В копилку знаний. Напишу как решил задачу. Может кому-то будет интересно.
    Таких как мне надо параметров у  MediaPlayer'a конечно нет. Но есть свойство VideoSize.X и Y там можно посмотреть реальный размер воспроизводимого видео в пикселях. 
    Берем эти значения, делим высоту на ширину и выясняем астект (соотношение сторон). После чего берем ширину контейнера в котором отображает видео на форме и умножаем на этот аспект. Получаем нужную высоту контейнера. В итоге если у вас контейнер видео с привязкой Top, Bottom то его размер всегда будет пропорционально равным размеру проигрываемого видео-файла, что избавит от ненужный черных рамок.
     
  24. Like
    FREEFAR отреагировална ENERGY в [Android] Есть ли разница под каким SDK собрано приложение   
    Желательно выбирать тот SDK, который советует EMBT т.к. он протестирован = более стабильная программа (прога все равно будет прекрасно работать под последним Android 8). Плюс еще новый SDK сам по себе может быть сырой. 
    Но скоро нам всем придется делать с последними SDK :
    Starting in late-2018, all new and updated apps will be required to target an SDK that is no more than 1 year older than the current codename release.
    https://www.androidpolice.com/2017/12/19/play-store-require-new-updated-apps-target-recent-api-levels-distribute-native-apps-64-bit-support/
  25. Like
    FREEFAR получил реакцию от Равиль Зарипов (ZuBy) в Приложение для получения раздражителей в работе Магазинов розничной сети   
    Всем привет.
    Смотрю сегодня тренд на публикацию приложений разработанных на Emb'e.
    Вот наше приложение которое тоже на днях поедет в маркеты
    Регаемся по номеру

     
    подтверждаем эСэМэСиной.

    Придумываем пин код и подтверждаем его

     
    После входа приложение покажет магазины в радиусе 500м


    Заходим в меню магазина

    Выбираем категорию  для жалобы ---- жалуемся , если надо прикладываем фото

    Еще кое что

    подтверждаем отправку жалобы

    PROFIT!
×
×
  • Создать...