x11 Posted September 14, 2020 Share Posted September 14, 2020 Проблема возникла в рабочем проекте. Нажимаешь кнопку и меню отображается (всплывает снизу). В меню выбираешь какой-нибудь пункт, где вызывается код создания и отображения другой мобильной формы, а потом код скрытия меню текущего меню. Пока проблемы нет, но... закрываешь эту форму и возвращаешься на основную форму. Снова нажимаешь кнопку и меню уже не всплывает. Отладчик показывает, что строка UnimMenu1.Show выполняется. Проект, воспроизводящий проблему, приложил. Но здесь проблема воспроизводится сразу, т.е. не нужно открывать и закрывать форму. Меню просто не отображается. После зарпуска приложения нажмите кнопку Войти. Потом последнюю кнопку на панели (см картинку). В появившемся окне нажмите Action1 и вы должны наблюдать проблему. Обратите внимание, что форма fmMenu является унаследованной от TUnimFormParent. Возможно, что проблема из-за наследования. Может я неправильно создаю дочернюю форму? procedure TMainmForm.UnimToolButton5Click(Sender: TObject); begin fmMenu := TfmMenu.Create(UniApplication); fmMenu.Show; end; UniGUI_Touch_menu.zip Quote Link to comment Share on other sites More sharing options...
x11 Posted September 14, 2020 Author Share Posted September 14, 2020 Проблема на картинке. Отображается затемняющая маска и внизу видно кусок меню. И всё, меню не всплывает. Quote Link to comment Share on other sites More sharing options...
Sherzod Posted September 14, 2020 Share Posted September 14, 2020 2 hours ago, x11 said: Проблема на картинке. Отображается затемняющая маска и внизу видно кусок меню. И всё, меню не всплывает. Добрый вечер, Спасибо за тестовый случай. Мы проверим... Quote Link to comment Share on other sites More sharing options...
Sherzod Posted September 14, 2020 Share Posted September 14, 2020 2 hours ago, x11 said: Проблема на картинке. Отображается затемняющая маска и внизу видно кусок меню. И всё, меню не всплывает. Кажется, у меню Items, пустой список!? Quote Link to comment Share on other sites More sharing options...
x11 Posted September 14, 2020 Author Share Posted September 14, 2020 странно, я же добавлял три пункта ок, завтра перепроверю но в рабочем проекте точно есть три пунка Quote Link to comment Share on other sites More sharing options...
Sherzod Posted September 14, 2020 Share Posted September 14, 2020 OK Quote Link to comment Share on other sites More sharing options...
x11 Posted September 15, 2020 Author Share Posted September 15, 2020 Перепроверил. В тестовом примере проблему пока что не могу воспроизвести. Буду пытаться искать причину в основном проекте Quote Link to comment Share on other sites More sharing options...
Sherzod Posted September 15, 2020 Share Posted September 15, 2020 56 minutes ago, x11 said: Буду пытаться искать причину в основном проекте Добрый день, В основном проекте, сколько меню (tunimmenu)? Quote Link to comment Share on other sites More sharing options...
x11 Posted September 15, 2020 Author Share Posted September 15, 2020 На этой форме листинга объектов есть одно меню. Ещё есть одно меню на другой форме - на форме редактирования объектов. Эта форма редактирования объектов вызывается из формы листинга объектов. Неужели это как-то связано? Quote Link to comment Share on other sites More sharing options...
x11 Posted September 15, 2020 Author Share Posted September 15, 2020 добавил перед popupMenu.Show строку: ShowMessage(popupMenu.Items.Count.ToString) всегда, даже во время проблемы вижу 3. экран не затемняется, просто ничего не происходит. Quote Link to comment Share on other sites More sharing options...
Sherzod Posted September 15, 2020 Share Posted September 15, 2020 Just now, x11 said: всегда, даже во время проблемы вижу 3. экран не затемняется, просто ничего не происходит. А если попробовать оставить только одно меню? Quote Link to comment Share on other sites More sharing options...
x11 Posted September 15, 2020 Author Share Posted September 15, 2020 ух ты... если на форме редактирования объекта убрать меню, то проблема исчезает, теперь после закрытия формы редактирования, на форме листинга снова появляется меню. и что дальше? если хотите, могу дать удаленный доступ к ПК Quote Link to comment Share on other sites More sharing options...
x11 Posted September 15, 2020 Author Share Posted September 15, 2020 Добавлю. Форма листинга и форма редактирования являются унаследованными, но от разных форм. Не взаимосвязанны. Quote Link to comment Share on other sites More sharing options...
Sherzod Posted September 15, 2020 Share Posted September 15, 2020 Здесь, возможно проблема именно в UnimMenu.. Quote Link to comment Share on other sites More sharing options...
Sherzod Posted September 15, 2020 Share Posted September 15, 2020 Было бы здорово, если бы Вы смогли создать тестовый случай для воспроизведения. Quote Link to comment Share on other sites More sharing options...
x11 Posted September 15, 2020 Author Share Posted September 15, 2020 Мне кажется, я воспроизвел проблему. 1. Нужно привязать все меню и ActionList`ы на всех формах к TUniImageListAdapter и к TUniNativeImageList. 2. Нужно создавать форму не с помощью функции, с помощью конструктора create fmSelect2 := TfmSelect2.Create(UniApplication); fmSelect2.ShowModalN; я склоняюсь ко второму варианту fmmSelect1 создается с помощью функции, а вот fmSelect2 с помощью конструктора и в этом разница function fmmSelect1: TfmmSelect1; begin Result := TfmmSelect1(UniMainModule.GetFormInstance(TfmmSelect1)); end; проект приложил: чтобы воспроизвести проблему, нажмите Войти, а на главной форме нажмите самую последнюю кнопку без иконки и откроется проблемная форма с двумя кнопками: Action1 и Action2. Нажмите любую кнопку (либо Action1, либо Action2), откроется нижнее меню, в нижнем меню есть три пункта, именно второй (средний) пункт воспроизводит проблему : procedure TfmMenu.Action2Execute(Sender: TObject); begin inherited; UnimMenu1.Visible := False; fmSelect2 := TfmSelect2.Create(UniApplication); fmSelect2.ShowModalN; end; откроется fmSelect2 и потом на форме fmSelect2 внизу нажмите любой пункт меню и fmSelect2 закроется, вы снова увидите форму с двумя кнопками, а теперь ещё раз нажмите Action1 или Action2 и меню уже не появится. я думаю, что вот эта проблема тоже связана с текущей - т.е. нужно знать как правильно выполнять наследование и создавать унаследованные формы UniGUI_Touch_Menu2.zip Quote Link to comment Share on other sites More sharing options...
x11 Posted September 15, 2020 Author Share Posted September 15, 2020 В рабочем проекте я переделал создание формы на использование функции function fmmSearchResults: TfmmSearchResults; begin Result := TfmmSearchResults(UniMainModule.GetFormInstance(TfmmSearchResults)); end; но проблема всё равно не ушла т.е. пока что точно не могу выявить и воспроизвести проблему Quote Link to comment Share on other sites More sharing options...
x11 Posted September 16, 2020 Author Share Posted September 16, 2020 18 hours ago, x11 said: Мне кажется, я воспроизвел проблему. @Sherzod вы не смотрели пример с проблемой в меню? Quote Link to comment Share on other sites More sharing options...
Sherzod Posted September 16, 2020 Share Posted September 16, 2020 20 minutes ago, x11 said: вы не смотрели пример с проблемой в меню? Простите, нет еще. Я буду смотреть. Quote Link to comment Share on other sites More sharing options...
Sherzod Posted September 16, 2020 Share Posted September 16, 2020 19 hours ago, x11 said: UniGUI_Touch_Menu2.zip Вы удалили вложение? Quote Link to comment Share on other sites More sharing options...
x11 Posted September 16, 2020 Author Share Posted September 16, 2020 нет, не удалял, вижу, что оно прикреплено, но скачать не получается вот прикрепил повторно UniGUI_Touch_Menu2.zip Quote Link to comment Share on other sites More sharing options...
x11 Posted September 27, 2020 Author Share Posted September 27, 2020 в версии 1536 проблема не исправлена Quote Link to comment Share on other sites More sharing options...
x11 Posted October 1, 2020 Author Share Posted October 1, 2020 up Quote Link to comment Share on other sites More sharing options...
x11 Posted October 24, 2020 Author Share Posted October 24, 2020 up Quote Link to comment Share on other sites More sharing options...
x11 Posted October 31, 2020 Author Share Posted October 31, 2020 Так как быть с меню в мобильных приложениях? Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.