Лидеры

Добрый день, Есть четыре типа настроек текста: DefaultTextSettings. Это настройки текста по умолчанию. TextSettings - Это настройки текста, которые задает пользователь. StyledSettings - какие настройки текста брать из стиля, а какие из TextSettings. ResultTextSettings - это результирующие настройки текста с учетом значения StyledSettings. Поэтому, если вы хотите получить итоговые настройки, то используйте ResultTextSettings. Они вычисляются автоматически на основании DefaultTextSettings, TextSettings и StyledSettings. P.S. Название шрифта по умолчанию присваивается в DefaultTextSettings.

Добрый день! Приложения, собираемые под мобильную платформу содержат отличие в работе со строками - нумерация символов идет с 0. Возможно дело в этом. for i:=Low(exc) to High(exc) do begin delete(cl,Pos(exc[i],cl),1); end; Такой код должен работать одинаково на всех платформах. Подробнее можно почитать здесь: http://docwiki.embarcadero.com/RADStudio/XE6/en/Migrating_Delphi_Code_to_Mobile_from_Desktop

Решение следующее. Все эффекты по умолчанию кэшируются. Так как они дорогостоящие. Поэтому в вашем случае не происходит обновления эффекта. Решение простое, нужно выполнить ручное обновление эффекта в те моменты времени, когда вам это нужно. В вашем случае я сделал это на OnPaint у вашего фрейма: procedure TfremAdres.FramePaint(Sender: TObject; Canvas: TCanvas; const ARect: TRectF); begin NormalBlendEffect1.UpdateParentEffects; // Это в случае обновления конкретного эффекта // IEffectContainer(vrtScrolBox).NeedUpdateEffects; // Этот код в случае обновлении всех эффектов у родительского контрола end; Но имейте в виду, что эффекты тяжеловесны и могут давать низкую скорость работы на мобильных платформах.

Добрый день! Честно сказать, не смог понять алгоритма, посему набросал простой пример, как проверять пересечение контролов стандартными средствами. function TForm1.OpponentVSHero: TAttacMode; var RcOpponent, RcHero : TRectF; Pt : TPointF; begin Result := TAttacMode.None; // Получим абсолютные размеры оппонента RcOpponent := Opponent.AbsoluteRect; // Получим абсолютные размеры героя RcHero := Hero.AbsoluteRect; // Получим центр героя Pt.X := Hero.Width / 2; Pt.Y := Hero.Height / 2; // Переведем его в абсолютные координаты PT := Hero.LocalToAbsolute(PT); // Проверим, не пересекаются ли габариты героя и оппонента if RcOpponent.IntersectsWith(RcHero) then begin Result := TAttacMode.Next; end; // Проверим, попадает ли центр героя в область оппонента if RcOpponent.Contains(Pt) then Result := TAttacMode.Attacked; end; Hero.zip

Рад, что ответил на ваш вопрос. Как получить имя: Например воспользоваться гуглом или посмотреть на своём устройстве... Вот так выглядит у меня: com.android.gallery3d

Прикрепил архив, сделайте всё также как написано тут http://fire-monkey.ru/topic/601-instruktciia-po-ustanovke-nabora-komponentov-fgx/, во втором шаге сначала открываете файл FMX.Extensions.UX.dpk, а дальше всё как в инструкции, буилд под платформу и инсталл. АП. Перезалил архив (теперь должно быть без варнингов) component.zip

Это отдельный компонент на основе TTabControl. Качаете два файла из папки "Lib/UX" или просто всю папку и папку "Packages", конкретно вот эти файлы: FMX.Extensions.UX.dpk FMX.Extensions.UX.dproj FMX.Extensions.UX.dsk и устанавливаете как обычный компонент.

http://community.embarcadero.com/index.php/blogs/entry/rad-studio-2015-roadmap

В связи со всем вышесказанным, я бы попросил администраторов слегка поправить эту тему. В ней ТС явно просил указать цвет Rectangle. Ярослав привел пример с TColor, который будет работать некорректно. А название этой темы поменять, т.к. это не баг, а мое банальное незнание.

Если необходимо убить процесс, то попробуйте воспользоваться кодом (как пример реализации) из темы "TMediaPlayer не запускает видео в некоторых версиях Андроида", конкретно, вот эта строчка activityManager->killBackgroundProcesses(PackageName); Только есть одно но, я не уверен, что на всех устройствах "PackageName" будет одинаковым. В общем попробуйте.

Добрый день! TColor и TAlphaColor - несовместимые типы, они по разному хранят цветовые составляющие. TColor = $00BBGGRR TAlphaColor = $AARRGGBB И как следствие, если Свойство объявлено как TAlphaColor, то при присвоении ему обычного TColor будет цветовая ошибка.

Вопросы для уточнения: 1) Пропадает коннект или падает само приложение? 2) Клиенты коннектятся с Андроид устройств? Если, ответы: 1) коннект 2) Андроид То: 1) Для начала проверьте галочку, при которой устройство закрывает все коннекты во время режима ожидания Если, ответы: 1) приложение 2) Андроид То: 1) Возможно ваше клиентское приложение потребляет много оперативной памяти устройства, Андроид автоматически находит и вырубает такие приложения. Технология Tethering вам не подходит?

причин может быть много, поэтому в клиентском приложении должна быть возможность при потери связи переконектиться.

Простите, но очень сумбурное описание, как уравнение с несколькими неизвестными))). Хотело бы сначала узнать платформу и что значит фраза: "На "сервере" создаю точку доступа и клиенты подключаются сначала по wi-fi, затем к приложению".

Подойдет?

Поддержка MultiTouch + Gestures в XE4, прочтите 6-ой раздел (а лучше всю статью целиком), должно помочь.

type TpopupBox_helper = class helper for TPopupBox procedure ShowPopup; end; procedure TForm1.Button1Click(Sender: TObject); begin PopupBox1.Items.Add('Item1'); PopupBox1.Items.Add('Item2'); PopupBox1.Items.Add('Item3'); PopupBox1.Items.Add('Item4'); PopupBox1.ShowPopup; end; { TpopupBox_helper } procedure TpopupBox_helper.ShowPopup; begin self.click; end;

uses IdCustomTransparentProxy, IdSocks, IdIPWatch, IdStack, IdTCPConnection, IdTCPClient, IdHTTP; function TForm1.localip : string; var AAddresses: TStrings; begin AAddresses := TStringList.Create; try TIdStack.IncUsage; try GStack.AddLocalAddressesToList(AAddresses); finally TIdStack.DecUsage; end; if AAddresses.Count > 0 then begin if TOSVersion.Platform = pfiOS then Result := AAddresses.Strings[AAddresses.Count-1]; //AAddresses if TOSVersion.Platform = pfWindows then Result := AAddresses.Strings[0]; end; finally AAddresses.Free; end; end; ​В "AAddresses" вы получите все локальные IP. Это будет и IP от wifi и ip от LTE\GPRS и т.д.

Посмотрите последний пример анимации для XE7 - там анимируются не контролы, а скрин контролов. На телефоне не проверял - но по логике проблема когда много компонентов должна быть решена

Так же столкнулся с подобной проблемой. На Win все летает, IOS тормоза, Android нет анимации. День убил на тесты. Результат - анимация пользуется ресурсами телефона, коих меньше чем у ПК. Мне помогло: Сжатие фона (на заднем фоне есть картинка), Остальные эффекты добавлять после окончания анимации (есть gloweffect), Игра с родителями - тут не совсем ясно, но путем тестов выяснилось, что чем меньше родительских контролов между объектом анимации и формой, тем меньше шансов на тормоза. Для мобильных платформ анимацией надо пользоваться осторожно.