Сортировка процедур в Structure Box в Delphi 11.1

Delphi , Базы данных , Сортировка и Фильтр

После перехода на Delphi 11.1 Enterprise Edition многие разработчики столкнулись с тем, что список процедур в панели Structure Box для формы больше не сортируется по умолчанию, как это было в Delphi XE3. В этой статье мы рассмотрим, как восстановить сортировку списка процедур для каждой формы в Delphi 11.1.

Почему сортировка списка процедур больше не работает?

Возможной причиной этой проблемы может быть изменение в настройках пользовательского интерфейса в последних версиях Delphi. Ранее сортировка списка процедур была включена по умолчанию, но в newer версиях это поведение было изменено.

Как восстановить сортировку списка процедур?

Чтобы восстановить сортировку списка процедур в панели Structure Box, вам нужно изменить настройки пользовательского интерфейса в Delphi. Следуйте приведенным ниже шагам:

1. Откройте меню "Сервис" и выберите пункт "Параметры".
2. В окне "Параметры" перейдите на вкладку "Интерфейс пользователя".
3. В левой панели выберите раздел "Обозреватель".
4. Найдите параметр "Сортировка в обозревателе" и установите флажок напротив него.
5. Закройте окно "Параметры", и сортировка списка процедур в панели Structure Box должна восстановиться.

Пример кода

Для тех, кто предпочитает работать с кодом, вот пример, как можно программно изменить настройки сортировки в панели Structure Box:

uses
  Vcl.Forms,
  Vcl.OleServer;

procedure SetStructureBoxSorting(ASortOrder: TOleEnum);
var
  UIOptions: TUIOptions;
begin
  UIOptions := TUIOptions.Create(nil);
  try
    UIOptions.LoadFromRegistry;
    UIOptions.ExplorerOptions.ExplorerSorting := ASortOrder;
    UIOptions.SaveToRegistry;
  finally
    UIOptions.Free;
  end;
end;

begin
  SetStructureBoxSorting(oesAscending); // Для сортировки по возрастанию
  // SetStructureBoxSorting(oesDescending); // Для сортировки по убыванию
end.

Этот код создает экземпляр класса TUIOptions и загружает текущие настройки пользовательского интерфейса из реестра. Затем он устанавливает значение параметра "Сортировка в обозревателе" и сохраняет новые настройки в реестре. Функция SetStructureBoxSorting принимает параметр ASortOrder, который может быть равен oesAscending (для сортировки по возрастанию) или oesDescending (для сортировки по убыванию).

Заключение

В этой статье мы рассмотрели проблему сортировки списка процедур в панели Structure Box в Delphi 11.1 и предложили два способа ее решения: через настройки пользовательского интерфейса и с помощью программного кода. Теперь вы можете восстановить сортировку списка процедур в панели Structure Box и работать с Delphi 11.1 так же эффективно, как и с предыдущими версиями.

Создано по материалам из источника по ссылке.

Статья посвящена решению проблемы сортировки процедур в панели Structure Box в Delphi 11.1, рассматривая как настройки пользовательского интерфейса, так и программный код для восстановления сортировки списка процедур.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Сортировка и Фильтр ::