Размер выпадающего меню UniTreeMenu в режиме Micro

[x11]

Проблема, когда меню в свернутом виде, т.е. когда включено свойство Micro.

При создании окна, если включить свойство Micro, то проблема есть (картинка 1).

procedure TfmMain.UniFormCreate(Sender: TObject);
begin

   UniTreeMainMenu.Micro  := True;

 

А если уже во время работы приложения менять свойство Micro, то проблемы нет (картинка 2).

[Sherzod]

1 hour ago, x11 said:

При создании окна, если включить свойство Micro, то проблема есть (картинка 1).

Здравствуйте,

Я не смог воспроизвести проблему.

Можете создать простой тестовый случай?

[x11]

15 hours ago, Sherzod said:

Можете создать простой тестовый случай?

Вот

UniTreeMenu.zip

[Sherzod]

OK, я вижу.

Я проанализирую.

[Sherzod]

1 hour ago, x11 said:

UniTreeMenu.zip 36.78 kB · 0 downloads

Попробуйте такое решение на данный момент:

procedure TMainForm.UniFormCreate(Sender: TObject);
begin
  mmUsersAdd.SetParentComponent(mmUsers);
  mmUsersSearch.SetParentComponent(mmUsers);
  UniTreeMenu1.Micro := true;
  UniTreeMenu1.JSInterface.JSConfig('expandedWidth', [UniTreeMenu1.Width]); //<-------
end;

 

[x11]

Спасибо за оперативность.