Лидеры

Автор: Артем Ходаев (Aptem) Ссылка на приложение: AppStore Выпустил свое первое приложения для iPhone - Страны мира. Смысл приложения не затейлив - справочник стран мира и их столиц. Уникальность его в том, что он содержит полный список всех признанных Россией стран мира. За основу взят Общероссийский классификатор стран мира. На текущий момент найти в AppStore подобное приложение (с полным списком) мне не удалось. Может плохо искал Также в приложении есть небольшой тест для проверки знаний столиц. Самый простой вариант - 10 вопросов по 5 вариантов ответа, в конце итог с правильными ответами. Планы на приложение огромные, от новых списков столиц уже не только мира, но и регионов отдельных стран. Например, столица Тосканы? Или столица штата Техас? И до интеллектуального алгоритма проверки знаний. Ну и версия под Android.

Я не знаю, но постараюсь узнать. Одно могу сказать, что скорее всего возобновим серию вебинаров, посвященных мобильной разработке с FireMonkey.

Набросал компонент для работы с значком в системном трее. Компонент только для FM и только для платформы Windows ! Среда: Delphi XE6 Основные моменты Свойства: Hint : string - отображает текст при наведении на значок в системном трее BalloonTitle : string - текст заголовка всплывающей подсказки BalloonText : string - текст содержания всплывающей подсказки IconBalloonType : TBalloonIconType - иконка всплывающей подсказки. Принимает значения: ​​​​BigError, BigWarning, Error, Info, None, User, Warning Indent : Cardinal - "косметический костыль" для нормального отображения меню при клике по значку в системном трее. Подбирается экспериментально, так как при различных стилях область отображения меню изменяется (меню уезжает вверх) PopUpMenu : TPopUpMenu - всплывающее меню, при OnClick правой кнопкой мыши по значку ​Методы: Show - отображать значок в системном трее Hide - скрыть значок из системного трея ShowBalloonHint - показать всплывающую подсказку События: OnClick - нажатие левой кнопки мыши OnDblClick - двойное нажатие левой кнопки мыши Важное замечание: необходимо обязательное наличие TForm и только один экземпляр TnTrayIcon в приложении ! Установка: Распаковать содержимое архива Открыть файл nTrayIcon.dpk В Project Manager окне правой кнопкой мыши по nTrayIcon.bpl -> Compile В Project Manager окне правой кнопкой мыши по nTrayIcon.bpl -> Install Добавляем путь в Library: Tools -> Options -> Delphi Options -> Library -> Library Patch -> Add... В архиве компонент и пример для работы. P.S. Писал для себя, так как частенько использую... Всегда хочется простоты. P.S.S. Писал быстро и ночью. Возможны недочеты и ошибки. Постепенно исправлю. TnTrayIcon.zip

Не знаю, как вы создаете итемы (в следующий раз нужно прикреплять тестовый проект, согласно правилам форума). Но у меня работает: Создаю итемы для TListView с дополнительным текстовым полем так: procedure TForm1.Button1Click(Sender: TObject); var Item: TListViewItem; TextObject: TListItemText; I: Integer; begin for I := 0 to 10 do begin Item := ListView1.Items.Add; Item.Text := 'Item ' + I.ToString; TextObject := TListItemText.Create(Item); TextObject.Name := 'SubCaption'; TextObject.PlaceOffset.Point := TPointF.Create(100, 0); TextObject.Font.Size := Random(20) + 5; TextObject.Height := Item.Height; TextObject.Text := 'Sub caption'; end; end; Обновляю размеры под текста и цвет так: procedure TForm1.ListView1UpdateObjects(const Sender: TObject; const AItem: TListViewItem); var TextObject: TListItemText; begin TextObject := AItem.Objects.FindObject('SubCaption') as TListItemText; if TextObject <> nil then begin TextObject.Font.Size := 20; TextObject.TextColor := TAlphaColorRec.Red; end; end; Результат ниже: Без обновления размера и с кодом коррекции размера и цвета:

Delphi атрибуты не поддерживаются в С++ Builder. Поэтому не получится на уровне одного компонента указать, на каких платформах он будет работать. Однако, есть другой способ указания этого (правда для всех компонентов пакета). При добавлении новой платформы в список целевых платформ пакета, все компоненты пакета считаются полностью рабочими на этих платформах. (после сборки пакета на каждую платформу). Что проиллюстрировано на рисунках ниже: Если у вас пакет содержит компоненты, как рассчитанные на одну платформу, так и на несколько, то я вижу пока только единственных выход - создание отдельных пакетов для таких компонентов.

Декомпилировали Java приложения или нативные?

Для RAD Studio XE7 Начиная с RAD Studio XE7 Доступ к хендлу приложения можно получить так FMX.Platform.Win.ApplicationHWND Для версий < XE7 Для всех, у кого среда <= XE6 делаем следующее: Открываем исходный файл FMX.Platform.Win.pas (Предполагаемое место расположения файла "/Program Files(x86)/Embarcadero/Studio/14.0/Source/fmx/") В секцию interface модуля объявляем функцию: function ApplicationHWND: HWND; В секцию implementation модуля добавляем ее реализацию (лучше в конец модуля либо после объявления глобальной переменной PlatformWin): function ApplicationHWND: HWND; begin if PlatformWin <> nil then Result := PlatformWin.GetApplicationHWND else Result := 0; end; Добавляем модифицированный файл FMX.Platform.Win.pas в ваш проект. P.S. Исходники коммерческих продуктов выкладывать запрещено. Поэтому выше приведено руководство.

Справка и ещё раз справка: FireMonkey Platform Prerequisites

Чем не устраивает TGrid и TStringGrid, входящий в состав FireMonkey? Начиная с версии XE6 скорости работы TGrid и TStringGrid была значительно увеличена и на текущий момент не зависит от количества отображаемых данных. Так же эти гриды имеют поддержку LiveBinding, что позволяет в дизайнере выводить данные из TDataSet подобных компонентов.