R.is

Пользователи
  • Публикаций

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

  • Посещение

Информация о R.is

  • Звание
    Продвинутый пользователь

Посетители профиля

496 просмотров профиля
  1. Спасибо за ответ. Установил 10.3, там добавили System.Permissions, который решает проблему.
  2. Господа, нужна помощь. Запилил приложение, протестировал, все работает на ура и радостный иду загружать в Google Play, по требованию Google Play перед загрузкой в AndroidManifest.template.xml нужно поставить targetSdkVersion не ниже 26. Как только ставлю targetSdkVersion="26", то некоторые функции приложения перестают работать, а если обратно изменить targetSdkVersion на 16, то все начинает работать. В чем может быть проблема? 1) Кнопка "Поделиться" - использую стандартный ActionList procedure TForm2.ShowShareSheetAction1BeforeExecute(Sender: TObject); begin ShowShareSheetAction1.Bitmap.Assign(Image1.Bitmap); end; и получаю вот что: 2) Кнопка "Сохранить" - сохраняю картинку в папку Pictures: Uses Permissions: Read external storage = true Write external storage = true procedure TForm2.Button2Click(Sender: TObject); begin Image1.Bitmap.SaveToFile(TPath.Combine(TPath.GetSharedPicturesPath,'phone.jpg')); end; и получаю следующую ошибку Прикрепляю тестовый проект. demo.rar
  3. R.is

    TVertScrollBox загрузка Images

    Использовать TListBox или TListView
  4. /storage/emulated/0/Android/data/com.embarcadero.Project2/files/1.pdf Прикрепил проект OpenPDF.zip
  5. Спасибо, но хотелось бы бесплатного решения
  6. Так тоже пробовал, но не работает, он пытается открыть F2 как вебссылку
  7. Добрый день господа! Искал на форуме, но ответа не нашел. Кто нибудь открывал локальный pdf webbrowser-ом? В Deployment есть два файла: '1.pdf' и '2.html', расположение assets\internal F1, F2: string; begin F2 := TPath.Combine(TPath.GetDocumentsPath, '1.pdf'); WebBrowser1.Url := ('file://' + F2); end; begin F1 := TPath.Combine(TPath.GetDocumentsPath, '2.html'); WebBrowser1.Url := ('file://' + F1); end; HTML страница загружается без проблем а вот pdf не загружается, в чем может быть проблема? При открытии intent-ом предлагает выбрать читалку для открытия, что не очень красиво. Кто чем пользуется/открывает pdf?
  8. Help! Никак не могу разобраться с проблемой. Нужно воспроизводить аудиоподкаст, который находится на сайте, если сделать так: MediaPlayer1.FileName :='http://ol7.mp3party.net/online/8514/8514311.mp3'; то все работает, но программа зависает на пару секунд. а если сделать в потоке, то ничего не происходит procedure MyThread.Execute; begin inherited; Form4.MediaPlayer1.FileName :='http://ol7.mp3party.net/online/8514/8514311.mp3'; end; и в логах ничего( прикрепил проект на всякий случай. mp.zip
  9. Решили вопрос? Очень интересует этот вопрос, нужно при запуске приложения включить моб.интернет отправить на сервер данные и выключить моб.интернет. Все устройство на которых будет использоваться программка одинаковые Lenovo Tab 7 Android 4.4.2
  10. Примерно месяц назад было такое весь вечер мучился, а на утро все было хорошо.
  11. На данный момент я использую SharedActivity, но размер VideoView похож на квадрат по середине экрана, я не знаю, влияет ли это как-то на это или нет, но размер ничем изменить не могу. У меня тоже самое появляется квадрат и там показывает видо, его размер и положение не полчается изменить и еще почему то внизу квадрата появляется значок fmx
  12. R.is

    [DX10] Drag-and-Drop Пример

    Можете дать ссылку на видео? А-то у меня она что то не открывается
  13. R.is

    [DX10] Drag-and-Drop Пример

    Добрый день Помогите разобраться с перетаскиванием компонента, маленький простой пример как перемещать Button или Image по Panel или по любому другому компоненту. Нижеприведенный код работает для VCL, а вот как сделать тоже самое для FMX? procedure TForm1.FormDragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean); begin if Source = Panel1 then Accept := True else Accept := False; end; procedure TForm1.FormDragDrop(Sender, Source: TObject; X, Y: Integer); begin Panel1.Left := X; Panel1.Top := Y; end;