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

Ry Koo

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

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

  • Посещение

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

  1. Like
    Ry Koo получил реакцию от Евгений Корепов в [Android] Как отключить клавиатуру в приложении?   
    у формы есть событие FormVirtualKeyboardShown, где можно в общем обработать событие показа\скрытия клавиатуры.
    там и флаг есть KeyboardVisible.
    а в частности, для конкретного поля показывать\скрывать вот так можно как вариант:
    procedure Tform1.Memo1Tap(Sender: TObject; const Point: TPointF);
    var
      KeyboardService: IFMXVirtualKeyboardService;
    begin
      if TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService, IInterface(KeyboardService)) then   // Запрашиваем сервис виртуальной клавиатуры
        KeyboardService.HideVirtualKeyboard;
     //KeyboardService.ShowVirtualKeyboard(Memo1); для показа
    end;
  2. Like
    Ry Koo получил реакцию от Barbanel в [Android] Как отключить клавиатуру в приложении?   
    у формы есть событие FormVirtualKeyboardShown, где можно в общем обработать событие показа\скрытия клавиатуры.
    там и флаг есть KeyboardVisible.
    а в частности, для конкретного поля показывать\скрывать вот так можно как вариант:
    procedure Tform1.Memo1Tap(Sender: TObject; const Point: TPointF);
    var
      KeyboardService: IFMXVirtualKeyboardService;
    begin
      if TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService, IInterface(KeyboardService)) then   // Запрашиваем сервис виртуальной клавиатуры
        KeyboardService.HideVirtualKeyboard;
     //KeyboardService.ShowVirtualKeyboard(Memo1); для показа
    end;
  3. Like
    Ry Koo получил реакцию от Martifan в Фотография из альбома   
    я делал так:
    создайм стандартный экшн TakePhotoFromLibrary
    у экшна событие DidFinishTaking:
    procedure TForm1.TakePhotoFromLibraryAction1DidFinishTaking(Image: TBitmap); // Здесь забираю выбранную фотку к себе в каталог и отображаю её в приложении
    begin
    image.SaveToFile(TPath.GetDocumentsPath+PathDelim+'OurImage.png');
    Image1.Bitmap:=image;
    end;
    Здесь юзера спрашиваю разрешения порыться в его картинках:
      PermissionsService.RequestPermissions([JStringToString(TJManifest_permission.JavaClass.READ_EXTERNAL_STORAGE)],
          procedure(const APermissions: TArray<string>; const AGrantResults: TArray<TPermissionStatus>)
          begin
            if (Length(AGrantResults) = 1) and (AGrantResults[0] = TPermissionStatus.Granted) then
            // Юзер разрешил читать файлы. Выполняем экшн.
            TakePhotoFromLibraryAction1.Execute;
          end);
    Вот. У меня работает.
  4. Like
    Ry Koo получил реакцию от Ingalime в NotificationCenter1.CancelALL отменяет только одно уведомление   
    создаю несколько локальных уведомлений с периодом вывода в минуту, всё ОК, выводятся. При попытке отменить их всех, отменяется только созданное первым, остальные продолжают выводиться и ничего уже с этим не поделать, отменить далее их невозможно. Поимённая отмена NotificationCenter1.CancelNotification(имя напоминания) тоже не действует. Погуглив наткнулся на пост, размещённый более года назад:
    https://stackoverflow.com/questions/34719635/delphi-tnotificationcenter-multiple-repeating-notifications-has-unexpected-behav
    С тех пор много воды утекло, не нашли ли нормального лекарства от этого глюка? Может что делаю не так?
    Кстати, там и решение предложено и оно работает https://github.com/dangas56/SendCancelNotification/blob/master/System.Android.Notification.pas
    Просто не верится что до сих пор приходится переписывать самим внутренние файлы.
×
×
  • Создать...