Rik33

Откотил дату на один день назад - при публикации пишет - "Целевой уровень API для вашего приложения – 29. Чтобы обеспечить необходимую производительность и безопасность, целевой уровень API должен быть не ниже 30. Измените целевой уровень API для приложения так, чтобы он стал не ниже 30."

Здравствуйте. Помогите ктонить с точным новым мануалом публикации aab.(Delphi 10.4). Создал keystore,скомпилировал - получил пакет aab. На сайте разработчиков взнос оплатил - пытаюсь загрузить - пишет - "Сертификат, использованный для подписи APK-файла или набора Android App Bundle, ещё не действителен. Укажите действительный сертификат."

Первый раз публикую, не сочтите за тупицу

Уже писал пост, тогда никто не ответил.

FDMemTable + wwLayoutGrid , база небольшая. Запускаю на Андроиде. При прокрутке записей в wwLayoutGrid - приложение вылетает. А может и не вылетать. Закономерность не нашёл. Может кто подскажет? В событиях ничего не обрабатываю - простая форма с полями. Если прокручиваю таблицу вниз - ещё нормально, как только вверх к первой записи - приложение вылетает.

Помогите разобраться с post запросом. Не разу не писал web-сервис. Накидал 2 простецких проекта - один отправляет post запрос, второй соответственно его обрабатывает и возвращает результат - текст из Memo поля. Результат - текст возвращается в непонятной кодировке.
вот куски кода ....
1. (клиент)

1
2
3
4
5
6
7
8
9
10
11
12
13

var
  PostData: TStringStream;
  ResponseBody: string;
  Json: String;
begin
    Json := '{"report": "X"}';
    PostData := TStringStream.Create(Utf8Encode(Json));
    IdHTTP1.Request.ContentType := 'application/json';
    IdHTTP1.Request.Accept := 'application/json';
    IdHTTP1.Request.CharSet := 'utf-8';
    ResponseBody:=IdHTTP1.Post('http://localhost:8080/goods',PostData);
    Memo1.Text:=ResponseBody;
end;

2.(Сервер)

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

var
  Stream : TStream;
  S : string;
  X, Obj: ISuperObject;
  J,ch: Integer;
  JsonToSend: TStringStream;
begin
 
 If ARequestInfo.CommandType = hcPOST then
  begin
      if ARequestInfo.URI=('/goods') then
      begin
         Stream := ARequestInfo.PostStream;
         if Assigned(Stream) then
          begin
             JsonToSend:=TstringStream.Create;
             JsonToSend.WriteString(Memo3.Text);
             JsonToSend.Encoding.Unicode;
             AResponseInfo.ContentStream:=JsonToSend;
          end else
          begin
              Memo1.Lines.Add('result_Error');
              AResponseInfo.ContentText := 'result_Error';
          end;
      end;

Столкнулся с другой проблемой. Unidac + wwLayoutGrid , база небольшая. Запускаю на Андроиде. При прокрутке записей в wwLayoutGrid - приложение вылетает. А может и не вылетать. Закономерность не нашёл. Может кто подскажет?

Так как решили вопрос? Я с таким же столкнулся