Равиль Зарипов (ZuBy)

Ссылка: http://blog.rzaripov.kz/2017/02/firebase-android-ios.html
Автор: Зарипов Равиль @ZuBy
Описание: Настройка пуш уведомлении через сервис Firebase для ANDROID и IOS

Ссылка: http://blog.rzaripov.kz/2017/02/firebase-android-ios.html
Автор: Зарипов Равиль @ZuBy
Описание: Настройка пуш уведомлении через сервис Firebase для ANDROID и IOS

от души рекомендую заменить TJSONObject на XSuperObject https://github.com/onryldz/x-superobject
код будет таким примерно
uses   XSuperObject; ... procedure TForm1.b1Click(Sender: TObject); var   x:ISuperObject;   arr:ISuperArray; str:string; begin   X:=TSuperObject.Create();   X.S['jsonrpc'] := '2.0';   X.S['method'] := 'get_accounts';   X.I['id'] := 1;   arr:=TSuperArray.Create();   arr.Add('captain');   X.A['params']:=arr; ... str:=X.AsJSON(); ... но для начала вам нужно убедиться, что для правильного запроса правильный ответ. ваша строка с образцом не совпадает только в id
у вас это строка, а в приведенных примерах - число. может, в этом проблема 
h:=THTTPClient.Create(); //  h.Accept := 'application/json' //  h.AcceptCharSet := 'UTF-8';   src:=TStringStream.Create('{"jsonrpc":"2.0","method":"get_accounts","id":1,"params":["captain"]}');   res:=TStringStream.Create();   resp:=h.Post(URL,src,res);   if resp.StatusCode=200 then   begin     ShowMessage('Ответ'+sLineBreak+res.DataString);   end;   FreeAndNil(h);   FreeAndNil(res);   FreeAndNil(src); так же может быть, нужно правильно указывать кодировку запроса-ответа и другие заголовки HTTP
проверьте этот код. а потом уже делайте JSON любым способом

Ссылка: http://blog.rzaripov.kz/2017/02/firebase-android-ios.html
Автор: Зарипов Равиль @ZuBy
Описание: Настройка пуш уведомлении через сервис Firebase для ANDROID и IOS

Ссылка: http://blog.rzaripov.kz/2017/02/firebase-android-ios.html
Автор: Зарипов Равиль @ZuBy
Описание: Настройка пуш уведомлении через сервис Firebase для ANDROID и IOS

Ссылка: http://blog.rzaripov.kz/2017/02/firebase-android-ios.html
Автор: Зарипов Равиль @ZuBy
Описание: Настройка пуш уведомлении через сервис Firebase для ANDROID и IOS

из деплоймента вытаскивает файлы в нужные папки, не трогайте этот модуль

[Статья][Android] AlarmManager - Автозапуск приложения в назначенное время

по поводу алгоритма закрытия формы через N секунд
нужно вызвать из таймера диалог с сообщением. (лучше взять у ZuBy уже предложенную библиотеку MyDialogs. я начинал ее делать именно из-за того, что стандартные диалоги не вывозят)
а на закрытие диалога повесить form.Release
тогда все будет как вы хотите
сначала выйдет сообщение. Потом закроется форма

Даже не знаю или в правильный раздел форума пишу. Я, например, хочу поблагодарить в своей теме - krapotkin и Равиль Зарипов за очень полезные ответы. Реально помогают решить вопросы. Спасибо.
Хотя все они паскалисты, все же удается иногда получить код на С++ со стороны. Очень в этом помогает автор Indy rlebeau, например эту статью: Статья 
он переводит в С++ тут: C++  и никто бы другой не помог. В этом плане тяжело, без него и никак вопрос не решить.
А этот форум это симбиоз ума и решений! Спасибо Ярославу за реализацию и хоты бы одного спеца по С++ как по Дельфи и - вот оно счастье.
Спасибо!
 
 

Для мобильных есть (не)визуальные нативные компоненты
TCustomPopover - http://docwiki.embarcadero.com/Libraries/Berlin/en/FMX.MultiView.Types.TCustomPopover TCustomListPicker - http://docwiki.embarcadero.com/Libraries/Berlin/en/FMX.Pickers.TCustomListPicker TMultiView с режимом Popover TfgActionSheet - http://fire-monkey.ru/topic/3173-rx-fgx-описание-версии-071118/

в том, что на билдере выполнение процедуры останавливается в ShowMessage
код
void __fastcall TForm1::Button1Click(TObject *Sender) { Label1->Text = L"До"; ShowMessage(L"Привет"); Label1->Text = L"После"; }

ну, ясно же что от языка программирования операционная система на зависит

а сейчас тут в точности написано следующее
My_Procedure; Button1.Enabled := True;

Предыстория была такая:
Изначально такие плитки были сделаны на Button'ах (стиль) и TPresentedScrollBox. Но как только пошло дело в тест основательный идею тут же выбросил. 120+ элементов выключили телефон (samsung ace2 duos) при отрисовке, точней при динамической загрузке картинок. да и в целом вся эта беда работает медленней чем реализация на TListView
Я не художник, но смысл вроде передал
Пример: У нас есть 12 элементов,и 4 колонки
Можно в LV отрисовывать дополнительные "контролы" и поместить в один реальный айтем, 4 виртуальные панельки (в нашем случае)
Для того чтобы такое получилось:
1) ListView должна при ресайзе рассчитать сколько колонок она может иметь (ширина LV / на ширину одной панельки)
2) дальше Вам нужно будет разбить отрисовку Itema на 4 панельки
    2.1) тоже самое проделать и при выделении
3) При таком подходе не будет стандартных элементов отображения (Text, Detail, Image и прочее нужно выключить)
Добавление Itema будет проходить в два цикла: первый добавляет реальный Item (0-2), а второй заполняет данными наши поля в панельках (title1, price1, bitmap1, title2, price2, bitmap2 и тд...)
4) Ну и самое важное в OnUpdateObjects все это отрисовать
Надеюсь вам это поможет!

HitTest := true стоит?

HitTest := true стоит?

В качестве послесловия.
Деструктор объекта не может быть вызван внутри метода этого объекта (самоубийства запрещены). Всегда можно поставить точку останова на вызов метода Free/FreeAndNil. И внимательно посмотреть стек вызова, если где-то в стеке вызова присутствует разрушаемый объект, то это не правильно. Сложности добавляет то, что это не обязательно приводит возникновению AV, вполне может быть, что у вас всё будет работать без ошибок, а на другом компьютере, или на другой платформе с ошибками.
Release на самом деле приводит к отложенному удалению не внутри вызывающего метода, т.е. объект просто помечается как готовый к удалению.

конечно от стиля
в других стилях вовсе не серый
в FMX панели не используются так же как в VCL. можно вместо панели использовать Rectangle если красить или Layout если прозрачный

для это в FMX есть стили
найти стиль с темным фоном (например из премиум пака) заменить в текущем стиле фон на темный

ты можешь это легко исправить, uses FMX.Dialogs.Default, на что фантазии хватит
это под Windows

нужно использовать PNG картинку, тогда не будет проблем

Применение LiveBindings в Delphi-проектах
 
Технология LiveBindings стала неотъемлемой частью большинства средств разработки программ крупнейших производителей решений для разработчиков ПО. На вебинаре пройдет практическое знакомство по применению LiveBindings в программах на RAD Studio, Delphi и C++Builder с применением VCL или FMX в Design-time и Run-time.
 
16 марта 2017 12:00 МСК.
 

AddObject  используйте если нужно добавить несколько объектов в другой объект. Например несколько  MyLabel_N  в  MyRect/
 
И считайте что  FParent.AddObject(FChild)  и  FChild.Parent := FParent это просто синонимы

стиль должен заведовать оформлением а не функционалом 
если в стиль запихать TButton и TEdit то как потом с этим добром работать-то?
только в OnApplyStyle ?
Это нужно реализовывать стандартным образом, вставляя компоненты друг в друга. Тогда и свойства все доступны...
Если нужно повторяющийся комплект использовать, то кинуть это все в TFrame