Улучшение Управления Параметрами Проекта в Delphi XE2

Delphi , Программа и Интерфейс , IDE и Компилятор

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

Однако, существует обходной путь, который позволяет упростить работу с параметрами. Можно добавить в начало списка параметров дополнительный тег, который не будет использоваться приложением, но позволит визуально разделить наборы параметров. Например, можно использовать строку "[identifier]" в качестве первого параметра, что позволит легко идентифицировать текущую конфигурацию.

Кроме того, был разработан небольшой утилитный инструмент, который позволяет очистить список параметров, хранящихся в реестре по пути HKEY_CURRENT_USER\Software\Embarcadero\BDS\9.0\History Lists\hlRunParameters. Этот инструмент написан на Delphi XE2 и позволяет удалять и сортировать записи реестра.

Вот пример кода утилиты на Object Pascal:

unit uCleanIDEParams;
...
interface
...
type
  TFrmCleanIDEParams = class(TForm)
    ...
    procedure BtnLoadClick(Sender: TObject);
    procedure BtnSelectAllClick(Sender: TObject);
    procedure BtnSelectNoneClick(Sender: TObject);
    procedure BtnInvertClick(Sender: TObject);
    procedure BtnStartWithClick(Sender: TObject);
    procedure BtnWriteClick(Sender: TObject);
  end;
...
implementation
...
procedure TFrmCleanIDEParams.BtnLoadClick(Sender: TObject);
var
  lReg : TRegistry;
  lValue,
  lItem,
  lKey : String;
  i,
  lNrRegVals: Integer;
begin
  // Код загрузки параметров из реестра
  ...
end;
...
procedure TFrmCleanIDEParams.BtnWriteClick(Sender: TObject);
var
  lReg : TRegistry;
  lValue,
  lKey : String;
  i,
  lNrToWrite,
  lNrRegVals: Integer;
begin
  // Код записи параметров в реестр
  ...
end;
...
end.

И соответствующий DFM файл:

object FrmCleanIDEParams: TFrmCleanIDEParams
  ...
  object PnlTop: TPanel
    ...
  end
  object PnlBottom: TPanel
    ...
  end
  object PnlCenter: TPanel
    ...
    object CLBParams: TCheckListBox
      ...
    end
  end
end
Notes:
  ...

Важно отметить, что перед использованием утилиты необходимо убедиться, что версия Delphi соответствует версии в ключе реестра. Для старых версий Delphi может потребоваться изменить значение "Embarcadero" на "Borland".

Также стоит помнить, что запускать утилиту нельзя из среды разработки, так как Delphi может перезаписать изменения в реестре при закрытии.

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

Контекст описания связан с проблемами управления параметрами проекта в среде разработки Delphi XE2 и предложенным решением в виде утилиты для очистки и управления этими параметрами.

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

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

:: Главная :: IDE и Компилятор ::