Лидеры

Мобильное приложение для курьера службы доставки. Приложение не самостоятельное, работает с системой автоматизации Tillypad XL. Возможности: получение и отображение информации о назначенных (выполненных) заказах курьера уведомления о новых заказах и изменениях в текущих просмотр информации о заказе (клиент, адрес, дата доставки, сумма и состав заказа) изменение статусов заказа, а так же времени, требуемого для доставки отображение заказа (всех заказов) на карте прокладка маршрута до клиента в навигаторе (Google, Yandex, 2GIS) связь с клиентом (оператором) - передача номера телефона или заказ обратного вызова через АТС отправка на сервер информации по фактическому маршруту курьера до клиента, а так же его местонахождения Активно разрабатывается взаимодействие с ККТ, для выдачи фискального чека клиенту в момент расчета. Приложение написано в RAD Studio Berlin 10.1 (Delphi). Огромное СПАСИБО: Ярослав Бровин - компоненты FGX (fgActivityDialog, fgToast, fgActionSheet), Равиль Зарипов - ModernListView, Андрей Ефимов - CustomActivityEvent

Может и банально, но соответствует критериям... Официальное название: whatsapp Официальный сайт: https://www.whatsapp.com/ Платформы: Android, iPhone, Компьютеры Mac или Windows, Windows Phone

Официальное название: 2ГИС Официальный сайт: https://2gis.ru/ Платформы: Android, iOS

Официальное название: Банк Астана Официальный сайт: https://www.bankastana.kz/ Платформы: Android, iOS

Попробовал реализовать стилем - никаких проблем не возникло: object TEllipse StyleName = 'ButtonEllipseStyle' Align = Center Size.Width = 256.000000000000000000 Size.Height = 191.000000000000000000 Size.PlatformDefault = False object TColorAnimation Duration = 0.500000000000000000 Inverse = True PropertyName = 'Fill.Color' StartValue = x00808080 StopValue = xAF808080 Trigger = 'IsMouseOver=true' TriggerInverse = 'IsMouseOver=false' end end UPD! Мммда... Насчет проблем я поторопился... Для того чтобы отследить клик по кнопке надо переопределить клик для TEllipse в стиле: procedure TForm1.btnTestApplyStyleLookup(Sender: TObject); var el: TEllipse; begin if TStyledControl(btnTest).FindStyleResource<TEllipse>('ButtonEllipseStyle', el) then el.OnClick := btnTestClick; end;

Вот набросал на скорую руку примерчик (может конечно не идеальный пример, но сегодня что-то голова совсем деревянная) 111.zip