krapotkin

все они имеют бесплатный лимит вот написано. один админ, одно приложение, 1 GB. Но почти уверен, есть и ограничение на количество всяких пушей и обращений в день или в сек...

ems - тоже вещь в себе. эту штуку теперь развили до RAD server и продают за деньги и его и еще и клиентские лицензии. за эти деньги какбе не очень нужен он. так что делать реализацию под EMS или RAD server имхо бессмысленно

хитрость именно в том, что kinvey - это готовый сервер. как Google Firebase или amazon_не_помню_как_его по какому принципу его выбрала emro - загадка если вы собираетесь полностью ВСЕ данные хранить на нём - тогда все норм. а если вам нужен свой сервер со своими юзерами и другими вещами? тогда нужно где-то соединять ваш логин-пароль и ID вашего телефона(токен) чтобы при регистрации ваш сервер мог послать пуш на ваш девайс

стили конечно можно но я сторонник простых решений если надо чего мигать, я просто кладу в кнопку Rectangle и он весело мигает...

все нынешние стили оформлены через png векторы весело, молодежно, но медленно... png делает почти любой редактор

png с дыркой вне конкуренции...

перезалил )

position.X , Y

пару раз бывала такая ошибка просто при битом файле APK

вот вам код. бессмысленный ессно но прямо с мобилы type TMyClass=class s:string; end; procedure TForm1.b1Click(Sender: TObject); var l:TObjectList<TMyClass>; begin l:=TObjectList<TMyClass>.Create; l.add(TMyClass.Create); l.add(TMyClass.Create); end;

для http есть THttpClient для остальных протоколов только indy

на мобилах не будет работать

на берлине инди работают, только не используйте SSL

в форм криэйт нет еще размеров, т.к. нет самой формы размеры есть в онресайз

а вот это интересно

ваш сервер хранит всего лишь одно новое поле у пользователя - токен если вы отберете пользователей любым способом, то их токены - это то же что их емейлы для рассылки почты получили токены и отправили на сервер FCM запрос таким-то токенам переслать такое-то сообщение

мы про какую ОС говорим?

от души рекомендую заменить 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 любым способом

так нужно саму строку смотреть

Вики: Все передаваемые данные — простые объекты, сериализованные в JSON Запрос — вызов определённого метода, предоставляемого удалённой системой. Он должен содержать три обязательных свойства: method — Строка с именем вызываемого метода. params — Массив объектов, которые должны быть переданы методу, как параметры. id — Значение любого типа, которое используется для установки соответствия между запросом и ответом. вроде все понятно. в чем конкретно вопрос?

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

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

нет в данном случае ОРД это отец русской демократии ))) я же написал код, что еще? if (keychar = ' ') then

блин, для цифробуквенных символов, тех, что отображаются в Edit, ответ в ord(keychar) = 32 для всех остальных - в Key а чтобы узнать нажат ли ctrl, есть shift таким образом if (keychar = ' ') and (ssCtrl in shift) then спасет ОРД.

информация для размышления asdf<пробел>fgt<F1><F2><F3>