Как создавать компоненты с одинаковыми именами для VCL и FMX в Delphi

Delphi , Компоненты и Классы , Компоненты

Delphi позволяет использовать одни и те же имена для компонентов в разных библиотеках, таких как VCL и FMX. Вопрос, который часто возникает у разработчиков, заключается в том, как создать компоненты с идентичными названиями, но предназначенными для разных библиотек. В данном случае, мы рассмотрим, как создать компонент TLabel для VCL и отдельно для FMX, не прибегая к излишне громоздким решениям с использованием условной компиляции.

Проблема

Delphi позволяет компоненту TLabel существовать в обеих библиотеках — VCL и FMX. Это может вызвать затруднения при попытке создать аналогичные компоненты с одинаковыми именами для каждой из библиотек. Хотя известный способ — использование условной компиляции (ifdef) и перекомпиляция библиотеки, это не является оптимальным решением с точки зрения чистоты кода.

Решение

Для решения этой задачи можно воспользоваться функционалом Unit Scopes, который был создан именно для таких целей. Unit Scopes позволяют определить различные пространства имен для компонентов, что делает возможным использование одного и того же названия компонента в разных библиотеках.

Шаг 1: Определение компонентов в разных Unit Scopes

Создайте компонент TMyComponent для VCL в файле Vcl.MyUnit.pas и аналогичный компонент для FMX в файле FMX.MyUnit.pas. Это позволит каждому компоненту иметь свое уникальное пространство имен.

Шаг 2: Использование компонентов

Для использования TMyComponent в других единицах кода, вы можете либо:

• Использовать условную компиляцию ({$IFDEF}) для указания, какую единицу кода следует использовать в разделе uses. Например:

{$IFDEF VCL}
uses
  Vcl.MyUnit;
{$ELSE}
uses
  FMX.MyUnit;
{$ENDIF}

• Создать отдельные проекты для VCL и FMX, в которых проекты VCL будут использовать пространство имен Vcl, а проекты FMX — FMX. Затем в разделе uses можно будет просто указывать единицу MyUnit.

Шаг 3: Дополнительные материалы

Для получения дополнительной информации о Unit Scopes и их использовании, обратитесь к официальной документации Embarcadero: Adding Unit Scope Names for Your Own Components.

Комментарии

Пользователи также могут быть заинтересованы в использовании пространств имен, но стоит отметить, что, хотя они похожи на Unit Scopes, они служат немного разным целям. В случае с TLabel, VCL использует пространство имен Vcl.StdCtrls, а FMX — FMX.StdCtrls.

Использование Unit Scopes позволяет разработать чистый и эффективный код, который легко поддерживать и расширять, сохраняя при этом возможность использования компонентов с одинаковыми именами в различных пространствах VCL и FMX.

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

Delphi позволяет создать компоненты с одинаковыми именами для VCL и FMX, используя Unit Scopes для определения различных пространств имен для каждого компонента.

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

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

:: Главная :: Компоненты ::