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

krapotkin

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

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

  • Посещение

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

    209

Весь контент krapotkin

  1. Это значит, что там работают не все функции обычного устройства. И запуск на эмуляторе совсем не будет значить, что на реальном устройстве будет работать так же. И еще это очень медленно. И еще много всего. При цене дешевых тел на А. менее 10 т.р. вообще неясно, для чего эмулятор может пригодиться.
  2. ProcessMessages оставим в VCL. Не будет тут так работать. Если вычисления в таймере то оно и так нормально должно работать. Значит, что-то умалчивается. TForm2 = class(TForm) tmr1: TTimer; lbl1: TLabel; procedure tmr1Timer(Sender: TObject); private public pc: integer; end; var Form2: TForm2; implementation {$R *.fmx} procedure TForm2.tmr1Timer(Sender: TObject); begin if pc > 10 then begin tmr1.Enabled := false; exit; end; lbl1.Text := format('%d%%', [pc * 10]); inc(pc); end; Вот простейший код. Все обновляется.
  3. проблема в том, что вы пишете "компиляция не работает", а на экране написано совсем другое... и перевести вы в состоянии, просто не желаете. ну а мы и тем более. да и вообще неплохо бы понимать, что компиляция и наличие телефона или эмулятора, пофиг, просто никак не связаны. кроме всего прочего, тут уже не раз и не два писали, что запуск на эмуляторе 1) совершенно не информативен 2) в последних версиях и вовсе не будет работать
  4. если честно, вот вообще непонятна цель "статьи" насколько я понимаю, никому из юзеров не интересно и не узнать ни за что, нативна его программа или нет важно, во сколько обошлась разработка, какие есть ограничения, и другие подобные штуки
  5. у более-менее свежих делфи вроде без проблем удаление проходит штатными средствами и две версии живут вместе тоже нормально например 10.3 и 10.4
  6. Бывает. На функционал обычно не влияет. В делфи как всегда для исправления ошибок - берите версию поновее. Может сторонние пакеты типа CnWizards или типа того есть. Тоже могут влиять.
  7. мир отладки на всем кроме Windows, крайне жесток ... иногда помогает каст string(переменная) но это неточно
  8. var http: THttpClient; pesp: IHttpResponse; http := THttpClient.Create; try resp := http.head(URL); except on e: exception do begin showmessage(e.message); end; end; http.free;
  9. а на андроид как выглядит панель задач?
  10. самая простая проверка - это попытка просто что-то заведомо существующее запросить например http.head('https://www.google.com')
  11. т.е. просто ОГРОМНЫМИ БУКВАМИ НА ВЕСЬ ЭКРАН ???? ну тут да только скейлинг )))
  12. очень странная проблематика любое приложение должно быть адаптировано к тому, что размер экрана, на котором оно запускается, может быть самым разнообразным, ну естественно, в каких-то адекватных рамках на текущий момент разрешения колеблются +- от 720x1200 до 2000x4000 с масштабированием от 1 до 3. 1.333 любит например Самсунг так что используйте Align, контейнеры layouts и проектируйте интерфейс адаптивным
  13. если снизу в скролл добавить пустой элемент достаточной высоты, особо проблем не возникает или я что-то не понимаю?
  14. https://en.delphipraxis.net/topic/1788-android-fileuriexposedexception-file/ теперь работа с файлами сделана через отдельную .опу поэтому ссылки вида file:// не пройдут я вот тут игрался с этим
  15. я две ссылки положил. там готовый код или что не так?
  16. ну и тут вроде решена задача https://en.delphipraxis.net/topic/4564-trying-to-share-a-text-file/
  17. http://aziga.x10.mx/delphi/index.php?option=com_content&view=article&id=23&Itemid=27
  18. насколько я навскидку вижу из исходников FMX.MediaLibrary.Android; TSharingManagerAndroid.AddImage если вместо '.png' указать что-то другое, то будет то что нужно не проверял конечно, но просто покопайтесь в этом коде, скопируйте к себе в папку программы этот файл, добавьте его явно в проект и замените png на txt например если все правильно понимаю, выведется другой список приложений
  19. в примерах делфи есть такой пример, если не ошибаюсь, там, где фото делают
  20. 1. делаем в коде Ctrl+клик по TransferType попадаем в модуль IdFTP выясняем что тип TransferType : TIdFTPTransferType 2. делаем Ctrl+ клик по TIdFTPTransferType и попадаем в модуль IdFTPCommon 3. этот модуль вписываем в uses нашего откуда мы начали это увлекательное путешествие. 4*. (опциональное) в современных версиях принято не просто указывать константу, а еще и тип, чтобы работало автодополнение тогда строка выглядит как ftpbot.TransferType := TIdFTPTransferType.ftBinary; ------------------------------------ Но вообще это какбэ азы совсем.
  21. а что должна обозначать эта запись??? вот конструкции, которые что-то значат FTPBot.TransferType := ftBinary; if FTPBot.TransferType = ftBinary then
×
×
  • Создать...