Как получить список компонентов с 24x24 иконками на форме в Delphi?

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

При разработке приложений на Delphi может возникнуть необходимость получить список компонентов, которые отображаются на форме с помощью 24x24 иконок. Это может быть полезно, например, для выполнения операций, связанных с управлением этими компонентами, или для их визуализации в определенных инструментах разработки, таких как GExperts.

Описание проблемы

Для решения этой задачи необходимо написать код, который будет перебирать все компоненты формы в режиме дизайнера и отбирать только те, которые имеют визуальное представление в виде 24x24 пикселей. Такие компоненты должны быть видимы на форме и иметь соответствующие иконки, которые отображаются в среде разработки.

Решение проблемы

Использование простого цикла по всем компонентам формы не даст желаемого результата, так как в этот список также будут входить невидимые компоненты, например, поля данных (TField), которые не отображаются на форме в виде 24x24 иконок.

Для решения задачи можно использовать свойство HasParent компонента TComponent. Компоненты, которые не являются дочерними по отношению к другим компонентам, будут иметь HasParent со значением False. Это означает, что они были размещены на форме напрямую и имеют визуальное представление.

Пример кода на Object Pascal, который выполняет задачу:

procedure TForm2.GetVisibleComponentsList(Memo1: TMemo)
var
  i: Integer;
begin
  for i := 0 to ComponentCount - 1 do
    if not (Components[i] is TControl) and not Components[i].HasParent then
      Memo1.Lines.Add(Components[i].Name);
end;

Этот код перебирает все компоненты формы, проверяет, что компонент не является контролом (TControl) и не имеет родителя (HasParent). Таким образом, в список Memo1 добавятся только имена компонентов, которые имеют визуальное представление на форме в виде 24x24 иконок.

Альтернативный ответ

Использование Open Tools API для решения этой задачи может быть избыточным, так как проверка свойства HasParent позволяет достичь нужного результата проще и быстрее.

Заключение

Таким образом, чтобы получить список компонентов с 24x24 иконками на форме в Delphi, необходимо модифицировать стандартный подход к перебору компонентов, исключив из списка те, которые не имеют визуального представления. Использование свойства HasParent позволяет легко идентифицировать такие компоненты.

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

Задача состоит в том, чтобы выявить компоненты на форме в Delphi, которые имеют визуальное отображение в виде 24x24 иконок, что важно для их дальнейшего управления или визуализации в среде разработки.

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

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

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