Поиск сообщества

Всем доброго времени суток. Среда: Rad Studio 10 Seattle (без Update 1) Платформа: Android Столкнулся с необходимостью генерации QR-кода для отображения на TImage. Воспользовался информацией, взятой тут http://zarko-gajic.iz.hr/firemonkey-mobile-android-ios-qr-code-generation-using-delphi-xe-5-delphizxingqrcode/ У автора возникла проблема с опцией DisableInterpolation на платформе Android (тот же код отлично работает на Windows), а именно, на Android это не работает (изображение получается размытым) Перепробовал всё, что приходило в голову, а так же было нагуглено.... но все попытки безуспешны. Подскажите, как изменить размер изображения, чтобы оно не становилось мутным?

Здравствуйте, хочу собрать на сервисе сохранение местоположения в файл на мобильном, можете привести пример как это сделать? Сохранение должны идти к примеру в текстовый документ. Сервис работает, просто хочу разобраться как надо выполнять переодичное действие на нём.

Здравствуйте. Задаю высоту и размер шрифта в TEdit. Под Windows все нормально. Под Android размер шрифта меняется, но высота TEdit нет. На рисунке во вложенном файле видно, как усекается текст. Хотя высота TEdit задана в 2 раза больше, чем размер шрифта. эффект такой же, даже если сделать Edit на всю высоту окна. В чем может быть причина?

Здравствуйте! Прошу извинить если вопрос уже обсуждался (весь форум прочел не нашел). Вопрос в том как создаваемому на RS приложению для Android предоставить root права, естественно по согласию пользователя для доступа к системным файлам типа /dev/ttyACM0 (для записи/чтения serialport). Получаю сообщение типа "Permission denied". Root на устройстве включены, а как Пересмотрел все пункты в Uses permission моего проекта так и не понял какой пункт отвечает за root. Root на устройстве получены, а как сделать чтобы программа запускалась от имени super user не пойму. Если кто-то сталкивался прошу подсказать или дать наводку на верный путь.

Доброго времени суток. Столкнулся со следующей проблемой: есть два приложения на Андроид. Подключаются друг к другу через Tethering. Когда оба телефона подключены к одной сети, все работает без проблем. Если на одном из телефонов создать точку доступа и подключить второй к этой сети, то они не подключаются друг к другу через Tethering. В чем может быть проблема?

Привет Всем! vkbdhelper.pas Давно пользовался vkbdhelper'ом, но он был только для андроида. руки добрались и до этого, теперь его можно использовать и на IOS изменения * почистил uses секцию * убрал зависимость от платформ (кросс-платформенный) * добавил глобальную переменную VKOffset VKOffset - расстояние между контролом и клавиатурой для тех случаев когда включены подсказки/автозамена и контрол оказывается под доп. панелькой Не все клавиатуры включают доп. панели в свой размер! Например для IOS нужно всегда прибавлять 30-32 пикселя, панель с кнопкой Done перекрывает контрол {$IFDEF IOS} VKOffset := 31; {$ELSE} VKOffset := 0; // на свой вкус // не знаю как определить размер доп. панельки // когда она не входит в размер клавиатуры // и определить есть ли панелька вообще... {$ENDIF} vkbdhelper.zip

Добрый день. Столкнулся с проблемой. Приложение изначально писал на XE6, потом перенес на XE7 - все работало без проблем. Обновился до XE8 и код перестал работать. Причем никаких ошибок не выкидывает. Просто зависает не отрабатывает процедура. Прошу не бить ногами за дилетантский код. Главное до этого нормально работал. Суть такая: есть два приложения под Андроид. Связаны между собой по сети. Назовем их сервер и клиент (вернее 4 клиента). Одно из них посылает сообщение на другой и при получении сообщения должна отрабатывать эта процедура. Взависимости от того кто и когда послал сообщение, появляются разные картинки. procedure TForm1.ShowPlus(a,b:byte); //a - Номер строки //b - Цвет команды begin but[a]:=b; case a of 1: begin case b of 1: begin form1.PlusImage1.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'bplus.png'); form1.MinusImage1.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'bminus.png'); end; 2: begin form1.PlusImage1.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'yplus.png'); form1.MinusImage1.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'yminus.png'); end; 3: begin form1.PlusImage1.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'gplus.png'); form1.MinusImage1.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'gminus.png'); end; 4: begin form1.PlusImage1.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'rplus.png'); form1.MinusImage1.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'rminus.png'); end; end; end; 2: begin case b of 1: begin form1.PlusImage2.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'bplus.png'); form1.MinusImage2.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'bminus.png'); end; 2: begin form1.PlusImage2.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'yplus.png'); form1.MinusImage2.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'yminus.png'); end; 3: begin form1.PlusImage2.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'gplus.png'); form1.MinusImage2.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'gminus.png'); end; 4: begin form1.PlusImage2.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'rplus.png'); form1.MinusImage2.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'rminus.png'); end; end; end; 3: begin case b of 1: begin form1.PlusImage3.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'bplus.png'); form1.MinusImage3.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'bminus.png'); end; 2: begin form1.PlusImage3.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'yplus.png'); form1.MinusImage3.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'yminus.png'); end; 3: begin form1.PlusImage3.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'gplus.png'); form1.MinusImage3.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'gminus.png'); end; 4: begin form1.PlusImage3.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'rplus.png'); form1.MinusImage3.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'rminus.png'); end; end; end; 4: begin case b of 1: begin form1.PlusImage4.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'bplus.png'); form1.MinusImage4.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'bminus.png'); end; 2: begin form1.PlusImage4.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'yplus.png'); form1.MinusImage4.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'yminus.png'); end; 3: begin form1.PlusImage4.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'gplus.png'); form1.MinusImage4.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'gminus.png'); end; 4: begin form1.PlusImage4.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'rplus.png'); form1.MinusImage4.Bitmap.LoadFromFile(System.IOUtils.TPath.GetDocumentsPath + PathDelim+'rminus.png'); end; end; end; end; end; Буду рад любой помощи в исправлении ошибок или оптимизации кода.

Ссылка на статью. Автор: Александр Бирюков В статья я максимально подробно попытался описать работу с библиотекой Libbass под Android для проигрывания сетевых потоков. Надеюсь кому-нибудь пригодится. Буду рад комментариям, обоснованной критике и доработкам.

Столкнулся с проблемой взаимодействия своего приложения Android с сервером MySQL в локальной сети. Задача простая: скачать на планшет таблицу с данными с сервера MYSQL в локальной сети, выполнить на планшете действия с данными, выгрузить обратно на MySQL уже в другую таблицу результат действий. Начал разбираться, пересмотрел и перечитал множество примеров других разработчиков. Оказалось, что в RAD Studio 10 Seattle нет компонентов, способных заставить работать Android устройство напрямую с сервером MySQL. Конечно есть FireDAC, dbExpress. По факту, хоть разработчики dbExpress и заявляют, что компонент TSQLConnection работает с Android platform, но при попытке открыть соединение с MySQL сервером на Android устройстве сообщает об ошибке. На Windows компонент отрабатывает соединение нормально. Разработчики FireDAC честно заявили, что их соединение с MySQL на Android работать не будет. Какие есть выходы: 1. Создать DataSnap сервер, который будет установлен на сервере и взаимодействовать с Android клиентом и сервером MySQL. DataSnap будет являться прослойкой между Android и MySQL, через него можно осуществлять обмен данными, обернутыми в JSON. Для меня этот вариант не подходит, потому что по различным причинам устанавливать на сервер (или даже рабочую станцию) дополнительный сервер приложений не представляется возможным. 2. Использовать дополнительные компоненты, позволяющие работать с MySQL из-под Android и iOS. Поиск нужных компонентов для RAD Studio показал, что все они платные. И уж если бесплатных не найти, покупать нужно хороший продукт, которые поддерживает как минимум MySQL, SQLite, SQLServer. Не буду начинать холивар, скажу только, что для меня наиболее подходящим оказался компонент UniDAC от Харьковской компании Devart. Решающими факторами стали: удобнная политика лицензирования, приемлемая для задач цена, быстрая скорость ответа технической поддержки, конечно, поддержка всех распространенных серверов баз данных и нужных мне платформ, работа с большими объемами данных (более 100 тыс. записей), возможность 2 месяца тестировать компоненты, получить существенную скидку при покупке, рекомендации разработчиков с форума www.fire-monkey.ru . На сайте www.devart.com выбрал свою версию RAD Studio и скачал инсталяторы компонентов UniDAC и MyDAC. Установил и запустил RAD Studio. В главном меню RAD Studio появились соответствующие пункты меню, а в палитру компонентов добавились три закладки. Вы самостоятельно может скачать и попробовать компоненты можно по этой ссылке https://www.devart.com/unidac/ Реализация кода: Итак, я собрал тестовый стенд. На котором разместил 3 соединения, 3 набора данных, три кнопки для соединения и разъединения с сервером MySQL, и две метки, в которые при успешном соединении записываю случайную запись «Название компании» из таблицы «Покупатели», в одну Ansi формат, в другую UTF8. В качестве демонстрационной базы данных использую Northwind, поставляемую с RAD Studio. Как видно на рисунке, тестировалась работа компонентов dbExpress, MyDAC, UniDAC. Двойной щелчок на компоненте соединения, открываются свойства соединения, прописываем для компонентов необходимые параметры и запускаем. Я прилагаю пример приложения, который вы самостоятельно сможете запустить на своей RAD Studio. В результате, как и ожидалось, компоненты dbExpress не смогли соединиться с базой данных и вывалился с ошибкой “TDBXError: Unable to find procedure DBXLoader_GetDriver”. Которую было не просто отловить из-за отсутствия в компоненте обработчика Connection Timeout. Компоненты MyDAC и UniDAC мгновенно соединялись с MySQL и считывали записи. Моя задача решена, переписываю решение в рабочий проект. Надеюсь и вам будет полезен этот пример. MyDACvsDbExpressDemo.zip

Есть ли возможность проиграть видео на андроиде находящееся по определённой ссылке? Допустим: https://archive.org/download/ksnn_compilation_master_the_internet/ksnn_compilation_master_the_internet_512kb.mp4 Желательно запустить видео в самой программе, без интентов. После поисков в интернете наткнулся на ссылку http://code.tutsplus.com/tutorials/streaming-video-in-android-apps--cms-19888 Тут объясняется как сделать это в андроид студие (при помощи VideoView). К сожалению на fm не нашёл нигде рабочего примера.

Если кому-нибудь понадобится Listbox такой-же как и в списке сообщений в андроиде. ListboxInteractions.zip

Всем привет! Не подскажите как правильно заменять текст в Notification? Хочется выводить туда таймер, а оно все время всплывает. И еще вопрос как отключить вибрацию и сделать так чтоб нельзя было закрыть этот Notification (например как скайп, ты его тянешь, а он не тянется )

Есть ли способ защитить приложение от автозакрытия андроидом, если мало памяти на устройстве? Грубо говоря приложение - это просто таймер. Через некоторое время при выборе его(приложения) в трее, происходит начальный запуск. Данные таймера теряются и бида наступает Слышал что сервисы закрываются попозже (Так ли это?). А сервисы у которых есть интерфейс (например виджет от плеера) закрываться не будет. Но как такой создать на делфи я не понял.... Хотелось бы услышать мнение наших форумчан, по поводу решения данной проблемы.

Добрый день, друзья. Делаю приложение для одного местного форума, и столкнулся с задачей выборки текста между тэгами. Вроде бы все не плохо, но есть одно но. ТЭГ <br /> означает переход на новую строку (Enter), пытался реализовать это, но не получается. Если кто сталкивался, подскажите как лучше реализовать. Исходный текст: Добрый день.<br />Хочу предложить оригинальные и не оригинальные запасные части на автомобили корейского производства <br />KIA, Hyundai, Ssang Yong, с БЕСПЛАТНОЙ ДОСТАВКОЙ до нашего микрорайона. <br />Так же в продаже имеются оригинальные масла.<br />Так же возможен заказ сроком от 1 до 5 дней.<br /><br /><br />P.S. сам проживаю в 6 корп. так что могу доставить хоть один фильтр, так что спрашивайте буду рад помочь.<br /> b:=false; endpos:=1; repeat if pos ('<br />',subtext) <> 0 then begin startPos := PosEx('<br />', subtext,endPos)+6; endPos := PosEx('<br />', subtext, startPos)+6; context:=Copy(subtext, startPos, endPos - startPos); Delete (subtext,Pos ('<br />',subtext),6); strlist.Add(context); end else b:=true; until b; end; Должно в итоге получится в таком виде: Добрый день. Хочу предложить оригинальные и не оригинальные запасные части на автомобили корейского производства KIA, Hyundai, Ssang Yong, с БЕСПЛАТНОЙ ДОСТАВКОЙ до нашего микрорайона. Так же в продаже имеются оригинальные масла. Так же возможен заказ сроком от 1 до 5 дней. P.S. сам проживаю в 6 корп. так что могу доставить хоть один фильтр, так что спрашивайте буду рад помочь.

Добрый день интересует вопрос может кто сталкивался с подобной проблемой в FDMemTable1 есть большое количество записей примерно 2500-3000 как максимально быстро поместить все записи в ListView

Есть планшет HP SlateBook x2 на андроиде 4.3, который отчего то зовется на официальном сайте ПК 0_0 При подключении USB\USB кабеля ни ноутбук, ни этот чудо девайс никак не реагируют. Зато HP программки с радостью говорят, что все в порядке. В гугле ничего внятного не нашел :с Отладка включена, да и кабель должно быть исправен.

Кто-нибудь нашёл оптимальное решение для считывания QR кода через камеру. Android

Друзья, подскажите. Реализовано ли уже в Seattle установка цвета системного StatusBar с цветом ToolBar на форме? Как это реализовано на платформе iOS.

Добрый день, комрады. Сегодня столкнулся с такой вещью, как наследование своей компонентов. На форме располагается TImage, на нем TRectangle c параметром Opacity - 0,5. Проблема собственно в том, что приразмещении любого компонента на TRectangle (будь то TLabel, AniIndicator и т.д.) они автоматически наследуют свойство прозрачности от TRectangle. Как собственно сделать так, чтобы они не наследовали это свойство у компонента родителя?

Ребята, подскажите пожалуйста, мне нужно скопировать файл средствами delphi xe7 из директории android /data/data/com.blaaa/ на sd card. Использование TFile.copy приводит к сообщению Permission denied, хотя устройство рутировано и файловым браузером я до этого файла легко добираюсь. Подскажите как мне скопировать файл? И если не сложно с комментированным примером-кодом. Заранее благодарен за помощь.

Здравствуйте. Темы с данным компонентом ещё нету, а хотелось бы узнать как с ним работать. Хотел сделать что то вроде трекера, снимающего координаты в случае если есть определённое движение и заинтересовался этим компонентом, но не нашёл толковой инфы. Демка по нему под андроидом что то тоже не очень понятна. Не хотелось бы иметь постоянно включённый LocationSensor, ибо думаю аккумулятор спасибо не скажет. Никто с ним не сталкивался на практике?

Всем доброго вечера. На Delphi XE8 и выше имею проблему! В Projects - options / Provisioning Build Type выбираю Android-Application Store, создаю keystore, alias как обычно - нажимаю OK, Захожу опять в Projects - options / Provisioning Build Type стоит - Android development. ставлю опять Android-Application Store - появляются настройки мои keystore, нажимаю ОК и все по кругу. Вообщем на сохраняется в настройках Android-Application Store, постоянно слетает в Android development. На XE6 и XE7 все работает, в чем проблемы, помогите. Спасибо.

На ListBox-e несколько Item-ов, на них поставил Edit-ы. Когда я пытаюсь редактировать нижние Edit-ы, то клавиатура перекрывает их и не видно что набираешь (в моем примере это Номер дома). Как это исправить? И как сделать чтобы на клавиатуре вместо кнопки Enter была кнопка Готово, по нажатию на которую клава бы скрывалась?

Ссылка на статью. Автор: Александр Бирюков В статья я максимально подробно попытался описать работу с PHP скриптом для рассылки Push сообщений из любой программы вне зависимости от платформы. Затрагивается вопроса от экспорта скриптов до кода программы: отправка и получение Push, регистрация устройств. Надеюсь кому-нибудь пригодится. Буду рад комментариям, обоснованной критике и доработкам.

Если кому не трудно, объясните почему вместо значения переменной при дебаге я вижу такое сообщение: "Error reading address 0x0: No error". Дебажу на андроиде, делфи ХЕ 8. Нормально ли это?