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

Superator

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

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

  • Посещение

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

  1. Like
    Superator отреагировална Tumaso в Как собрать apk для android 8.1 не имея устройства с такой версией android?   
    В Rio да, укажите api 28
  2. Like
    Superator отреагировална Savage в Изменение стандартного звука а push-уведомлении   
    Задачу решил.
    Вот измененная процедура, ну и добавил вытягивание параметра sound
        private Builder buildNotification(String msgTitle, String msgText, String msgSound, PendingIntent contentIntent) {
            int icon = this.mContext.getApplicationContext().getApplicationInfo().icon;
            Builder mBuilder = new Builder(this.mContext);
            mBuilder.setSmallIcon(icon);
            mBuilder.setTicker(msgTitle);
            mBuilder.setContentTitle(msgTitle);
            mBuilder.setContentText(msgText);
            mBuilder.setContentIntent(contentIntent);
    // savage
            if (msgSound == "") {
               mBuilder.setSound(RingtoneManager.getDefaultUri(2));
            }
            else
            {
              mBuilder.setSound(Uri.parse("android.resource://" + this.mContext.getPackageName() + "/raw/"+msgSound));
            }
    //
            return mBuilder;
        }
    Звуковой файл надо добавить в Deployment
    Расположение res/raw/
    При формировании push-сообщения имя файла указывается без расширения. К примеру, если звуковой файл был event1.mp3, то в пуше посылаем "sound":"event1"
     
    Во вложении патченый файл.
    Сборка fmx.jar и classes.dex как в этой теме
     
    NotificationPublisher.zip
  3. Like
    Superator отреагировална Brovin Yaroslav в Как я могу скрыть / показать клавиатуру под "Android"?   
    Русский
    За управление виртуальной клавиатурой в FireMonkey отвечает сервис IFMXVirtualKeyboardService (Embarcadero Doc Wiki). Который позволяет отображать и скрывать клавиатуру.
    Для скрытия клавиатуры достаточно выполнить следующий код:
    uses FMX.Platform, FMX.VirtualKeyboard; procedure TForm5.ButtonHideKeybordClick(Sender: TObject); var KeyboardService: IFMXVirtualKeyboardService; begin // Запрашиваем сервис виртуальной клавиатуры if TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService, IInterface(KeyboardService)) then KeyboardService.HideVirtualKeyboard; end; Чтобы показать клавиатуру для контрола:
    procedure TForm5.ButtonShowKeyboardClick(Sender: TObject); var KeyboardService: IFMXVirtualKeyboardService; begin // Запрашиваем сервис виртуальной клавиатуры if TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService, IInterface(KeyboardService)) then KeyboardService.ShowVirtualKeyboard(Edit1); end;

    English 
    FireMonkey has special service for managing Virtual Keyboard. It is IFMXVirtualKeyboardService (Embarcadero Doc Wiki). It allows show and hide keyboard.
    For showing virtual keyboard use next code: uses FMX.Platform, FMX.VirtualKeyboard; procedure TForm5.ButtonHideKeybordClick(Sender: TObject); var KeyboardService: IFMXVirtualKeyboardService; begin // Request service of visrtual keyboard if TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService, IInterface(KeyboardService)) then KeyboardService.HideVirtualKeyboard; end; For showing virtual keyboard for control:
    procedure TForm5.ButtonShowKeyboardClick(Sender: TObject); var KeyboardService: IFMXVirtualKeyboardService; begin // Request service of visrtual keyboard if TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService, IInterface(KeyboardService)) then KeyboardService.ShowVirtualKeyboard(Edit1); end;
  4. Like
    Superator отреагировална Равиль Зарипов (ZuBy) в Items + KeyItems   
    Кто вам мешает создать TListBoxItem
    var   item: TListBoxItem; begin   item := TListBoxItem.Create(nil);   item.text := 'combo item';   item.parent := Combobox1;   Item.tag := 1000; end; доступ к значению (по памяти)
    ComboBox1.ListItems[0].Tag
  5. Like
    Superator отреагировална rareMax в Через NetHTTPClient передать фотографию на сервер   
    В общем рабочее время подходит к концу - поэтому держи:
    Function SampleSendFile(Const Url, FileName: String): Boolean; var lHttp: THTTPClient; lSendData: TMultipartFormData; lResponse: IHTTPResponse; Begin lHttp := THTTPClient.Create; lSendData := TMultipartFormData.Create; try lSendData.AddFile('FileField', FileName); lResponse := lHttp.Post(Url, lSendData); Result := lResponse.StatusCode = 200; finally lSendData.Free; lHttp.Free; end; End;  
  6. Like
    Superator отреагировална Gvozdik в Получение полного пути файла из галереи Android   
    На этот модуль то я внимание обратил, но мне необходимо реализовать следующие действия:
    1) После нажатия на кнопку открывается галерея картинок (или другое приложение для открытия картинок), пользователь выбирает файл;
    2) После выбора файла в моем приложении появляется его миниатюра и файл методом POST отправляется на upload сайта.
    Так вот чтобы отправить файл мне необходимо вывести полный путь к этой картинки из галереи которую выбрал пользователь.
    Т.е. вот тут нужно вставить полный путь этого самого Image (TBitmap) которое возвращает TakePhotoFromLibraryAction1DidFinishTaking:
    Fileweb:=TIdMultipartFormDataStream.Create; Fileweb.AddFile('qqfile',Путь к файлу); Fileweb.AddFormField('subaction','upload'); Response:= Form1.IdHTTP1.Post(SiteUrl + 'engine/ajax/upload.php',Fileweb); Fileweb.Free;  
  7. Like
    Superator отреагировална sinuke в Не открывается меню загрузить файл в android   
    я так понимаю должен открыться выбор файла? ну на андройде логику выбора файла придется реализовывать самому... стандартного нет
  8. Like
    Superator отреагировална haword в Не открывается меню загрузить файл в android   
    что то типа этого
     
  9. Like
    Superator отреагировална Brovin Yaroslav в Есть ли какая-нибудь возможность вставить тире в package файла AndroidManifest.xml   
    Нет. Название Java пакета не поддерживает "-" в названии. Только латинские буквы в нижнем и верхнем регистрах, числа и '_'.
    https://developer.android.com/guide/topics/manifest/manifest-element?hl=ru#package
     
  10. Like
    Superator отреагировална krapotkin в Как заменить цвет фона TextButton в listview   
    по мне, так лучше сделать собственного наследника TDrawable по примеру того как сделана сама эта кнопка. я делал такое, когда мне надо было иконки, уголки и другие нестандартные элементы
  11. Like
    Superator отреагировална krapotkin в Как получить содержимое item при событии OnDeleteItem в ListView   
    off: но это конечно фу ))
    то что вы из базы просто что-то куда-то пишете и не заботитесь о том, как будете потом это искать.
    Использование невизуального свойства Data у ListViewItem имхо гораздо предпочтительнее
  12. Like
    Superator отреагировална Евгений Корепов в Как получить содержимое item при событии OnDeleteItem в ListView   
    procedure TForm1.ListView1DeleteItem(Sender: TObject; AIndex: Integer); Var AMyItemIndex : Integer; begin AMyItemIndex:=(ListView1.Items.Item[AIndex] as TListViewItem).Detail.ToInteger; ... end;  
  13. Like
    Superator отреагировална rareMax в Как сделать плиточное меню в приложении?   
    ModernListView
    GridLayout(в названии мог ошибиться)
    Либо на скроллБокс кидаешь нужные тебе компоненты.
  14. Like
    Superator получил реакцию от Anatoliy в Кириллица в ListView выводится в виде вопросительных знаков   
    Всем спасибо. Это все моя невнимательность. Ошибка крылась в синтаксисе php файла, а не в delphi. Не указал $mysqli->set_charset("utf8").
  15. Thanks
    Superator отреагировална rareMax в Функция возвращает разное значение на andoroid и win   
    {$ZEROBASEDSTRING ON} и работай с учётом что строка с 0 начинается.
     
    Либо юзай хелперы
×
×
  • Создать...