Перейти к содержанию
Fire Monkey от А до Я
  • 0

ItemAppearance Button click


x11

Вопрос

Добавил TTextButtonObjectAppearance. А как выполнить click/tap?

Предполагается, что будет 2-3 кнопки с разными процедурами.

На форме лежит TActionList и нужно к кнопками привязать действия, но у кнопки нет Action. Даже событий нет :(

 

Вопрос в догонку. А в

Ссылка на комментарий

Рекомендуемые сообщения

  • 0

Чтобы не плодить похожие темы, задам ещё вопрос по кнопке типа TGlyphButtonObjectAppearance.

Как в неё вставить картинку, и опять же, как добраться до обработчика нажатия?

Цель: по нажатию на кнопку нужно вызвать некую форму редактирования данной записи, на которой тапнул пользователь.

Ссылка на комментарий
  • 0

Может быть Вы не поняли сути проблемы? Попытаюсь ещё раз.

Интересует не щелчок по Item, а именно по той или иной кнопке, которых может быть несколько у Item.

У DinamicAppearance есть 2 вида кнопок. Но ни в справке, ни на просторах интернета нет примеров и описания. Ни у самих кнопок, ни у Item, ни у ListView не нашёл возможности обработать клик/тап именно по кнопке, а не по Item`у.

Допустим, на Item лежит 2 кнопки:

1. Кнопка "Удалить" типа TGlyphButtonObjectAppearance

2. Кнопка "Редактировать" типа TTextButtonObjectAppearance.

Как обработать отдельно клики этих кнопок?

Ссылка на комментарий
  • 0
  • Модераторы
1 минуту назад, x11 сказал:

Может быть Вы не поняли сути проблемы? Попытаюсь ещё раз.

Интересует не щелчок по Item, а именно по той или иной кнопке, которых может быть несколько у Item.

У DinamicAppearance есть 2 вида кнопок. Но ни в справке, ни на просторах интернета нет примеров и описания. Ни у самих кнопок, ни у Item, ни у ListView не нашёл возможности обработать клик/тап именно по кнопке, а не по Item`у.

Допустим, на Item лежит 2 кнопки:

1. Кнопка "Удалить" типа TGlyphButtonObjectAppearance

2. Кнопка "Редактировать" типа TTextButtonObjectAppearance.

Как обработать отдельно клики этих кнопок?

я то как раз понял, а вы видимо нет

Клик был по Item'y, не задевая другие объекты

if ItemObject = nil then
begin
  ShowMessage('Click to Item');
  exit;
end;

Как можно различить объекты в Item'e?

ShowMessage('Name: ' + ItemObject.Name + sLineBreak + 'Text: ' + (ItemObject as TListItemText).Text);
Ссылка на комментарий
  • 0
  • Модераторы
1 минуту назад, x11 сказал:

аааа, ItemObject - это и есть тот или иной объект, лежащий внутри Item`а?

да

каждый объект имеет уникальное имя которое вы задаете в редакторе

и чтобы получить например текст, делаем преобразование как показано выше

Ссылка на комментарий
  • 0
  • Модераторы
4 минуты назад, x11 сказал:

1. А почему при загрузке ListView происходит clickEx 2 раза?

2. При клике по кнопке происходит clickEx 2 раза.

Как от этого избавиться?

Приложи проект

Ссылка на комментарий
  • 0
  • Модераторы
3 минуты назад, x11 сказал:

ссылка на проект

тынц

у меня нету компонентов которые там используются, сделайте пустой проект, где это воспроизводится

Ссылка на комментарий
  • 0

сделал с использованием прототипа TPrototypeBindSource.

тынц

 

Но проблема в том, что при открытии PrototypeBindSource1 ListView пустой почему-то. Поэтому не могу воспроизвести эту проблему

1 час назад, x11 сказал:

1. А почему при загрузке ListView происходит clickEx 2 раза?

 

а вторая проблема с повторным кликом воспроизводится

Изменено пользователем x11
Ссылка на комментарий

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

×
×
  • Создать...