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

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

Добрый день. Столкнулся с проблемой. Приложение изначально писал на 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; Буду рад любой помощи в исправлении ошибок или оптимизации кода.

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

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

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

Есть ли возможность проиграть видео на андроиде находящееся по определённой ссылке? Допустим: 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 не нашёл нигде рабочего примера.

Столкнулся с проблемой взаимодействия своего приложения 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

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

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

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

Добрый день, друзья. Делаю приложение для одного местного форума, и столкнулся с задачей выборки текста между тэгами. Вроде бы все не плохо, но есть одно но. ТЭГ <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 корп. так что могу доставить хоть один фильтр, так что спрашивайте буду рад помочь.

Доброго времени суток. Долгое время работал с ХЕ5 и не знал предела радости. Но, как полагается, не без косяков и глюков. И я решил перебраться на более новую платформу ХЕ8. Сразу возникла масса трудностей. Первая: Удаление элементов возможно только в режиме просмотра "Master", что КРАЙНЕ не удобно. Возможно это как-то исправить? Вторая: Если в ХЕ5 я выбирал один размер экрана и с помощью "якорей" расположив элементы на форме, они нормально раздвигались/сдвигались/расширялись в зависимости от размера экрана устройства. В ХЕ8 же для каждого экрана, как я понял, необходимо вручную располагать элементы на экране. Однако размеры экранов предложены не все, далеко не все... ну и потому при запуске приложения, кроме перемешанных элементов на форме, я ничего не увидел... Я создавал "Multi-divice application". Более подходящего я не нашел... Может я что-то не так делаю? Разъясните.

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

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

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

Здравствуйте! При создании кросплатформенного приложения в среде Delphi XE7 столкнулся с проблемой подключения к базе данных на устройстве с Android. Ситуация следующая: Подключение организовано через FireDAC и в Windows нормально происходит соединение с БД. При запуске приложения на Android-устройстве и попытке подключения к БД происходит ошибка: [FireDAC][Phys][sQlite] ERROR: unable to open database file. Анализ получившегося приложения показал, что сформированный apk не содержит базы данных, а FDConnection ищет базу по указанному при создании компонента пути (С:\database.db). Может быть что-то не правильно настроено, так как делаю подобное первый раз.

Delphi XE8, Android. Пишу слайдер картинок. Задачу себе поставил аналогичную слайдеру Ввконтакте. Т.е. Жестами листаем налево/направо, двойной клик увеличение, повторный двойной клик уменьшение, ну и пальцами можно растягивать изображения. Все работало замечательно до момента добавления анимации. Слайд (TImage) лежит в TScrollBox. Анимация увеличения (FloatAnimation) тоже отлично работает. Но позиционирование картинки сделать не могу с анимацией, анимацию не могу привязать к ViewportPosition. В итоге, при увеличении картинки, не область по которой ткнули, а по уродски - левый верхний угол остаётся зафиксированным, увеличивается вправо и вниз. Как можно связать FloatAnimation и ViewportPosition ?

Привет всем! Кто-нибудь сталкивался с проблемой запуска приложения с использованием 3D компонентов на Android эмуляторе? Приложение написано на Delphi. На iOS эмуляторе всё в порядке - запускается и работает без проблем, а вот Android эмуляторе не хочет. Точнее приложение только начинает запускаться и эмулятор падает. Подчёркиваю - не приложение а сам эмулятор падает! Если убрать 3D компоненты, то всё будет нормально работать, но стоит только добавить хотя бы один 3D компонент, то всё... Delphi 10 Seattle, Android API 22 для 5.1.1. Такое же было и на прежних версиях студии - XE7, XE8. Решение не находил и забивал, т.к. под Android приложение не требовалось - чисто для интереса пробовал запустить, а сейчас потребовалось. Буду очень благодарен за помощь!

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

Доброго времени суток прошу консультации так как ситуация не совсем стандартная есть приложение работает с заказами в онлайн магазинах но вся проблема в том что у каждого пользователя будет свой магазин или возможно несколько тоисть и скрипт отправки Push на каждом сайте свой как быть ? )) пока в голове только один вариант организовать свой сервер и перенаправлять Push по ключу я так думаю возможно будет регистрировать устройство с параметром домен например может есть другие идеи или есть возможность отправлять с сервера клиента без особых заморочек (на ведре в принципе приложение может работать в фоне и проверять заказы самостоятельно по таймеру но нет стабильности, IOS в обще так понимаю такой возможности нет правда в целях эксперимента делал работу с gps и таймер проверял заказы на сервере но кому такое приложение нужно которое без надобности отслеживает место положение и садит батарею)

Добрый день использую локальное хранилище настроек подключения к сайту ClientDataSet - XML заметил такую особенность при закрытии программы под Windows все изменения будут перезаписаны в XML но при выгрузке приложение на IOS/Android сохранения результатов не происходит нужно в ручном режиме делать сохранение файла ClientDataSet1.SaveToFile(ClientDataSet1.FileName); подскажите как можно решить проблему

Delphi xe8 upd1, Push notification Android - как удалить прочтенное сообщение? Отправляю по json. После нажатия на пуш сообщение в панели уведомлений, читаю сообщение в открытой программе, но не знаю как очистить его из панели... var LNotification: TPushServiceNotification; begin for LNotification in AServiceConnection.Service.StartupNotifications do begin if Assigned(LNotification) and (LNotification.Json.ToString<>'') then begin Memo1.Lines.Add('Enter by Notification Click: ' + LNotification.Json.ToString); end; end; end;

Разработчик: Александр Бирюков Ссылки на приложения: iOS и Android Описание: Алгоритм работы: Пользователь попавший в ДТП создает заявку или нажатием кнопки SOS в экстренной ситуации отправляет экстренное сообщение на сервер. Модераторы получают СМС уведомления о произошедшей аварии. После модерации пользователи системы получают СМС уведомления с адресом аварии и Push уведомления.

Недавно прочитал про уменьшение размера аудио файла, потока. Нашёл технологии Amr и Speex, хочу найти имплементацию одной из них. Общая идея в том, чтобы уменьшить размер "сырого" (raw) аудио на андроиде. Буду благодарен за любую полезную информацию

На HTC One M7 нет аппаратной кнопки Меню, вызов меню делается долгим нажатием на кнопку Home. Раньше в настройках телефона можно было выбрать показывать программную кнопку или нет. После обновления аппарата на Lollipop, эта настройка не работает, круглая кнопка с тремя точками болтается по экрану. Причем кнопка видна только в приложениях написанных на Delphi (перепробовал два десятка известных мне). Как кнопку можно отключить? Заранее благодарю за советы. Тупик какой то :-( Скачал стороннее приложение, сравнил манифесты (думал в нем собака порылась), ничего не нашел. Вот скриншот с этой кнопкой