Jump to content

AScreenInsets - в версии 1.6.0 - не определяется


Recommended Posts

В форме fmCatalog по событию OnSafeAreaChanged опускаю панель навигации (TfgLayout) под системную панель:

procedure TfmCatalog.fgFormSafeAreaChanged(Sender: TObject;
  const AScreenInsets: TRectF);
begin
  loNav.Size.Height := AScreenInsets.Top + 56;
  loNav.Padding.Top := AScreenInsets.Top;
  loNav.Realign;
end;

21.png.b6058dfd5edb9bd92efc97faff13f769.png

В версии 1.5.3 - панель опускалась:

Screenshot_2020-11-09-14-05-50-613_faberlic24_by.thumb.png.e47151fde46dc877abadf95f16ac57e6.png

В версии 1.6.0 - панель не опускается. Возможно AScreenInsets - не может получить значение.

Код не менял, скомпилировал под 1.6.0, как исправить? : 

Screenshot_2020-11-09-14-24-42-557_faberlic24_by.thumb.png.afb879163629115c1d5deef9b9e2e228.png

  • Like 1
Link to post
Share on other sites
  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...