ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как узнать на каком контроле кликнут элемент попапменю?
46 сообщений из 46, показаны все 2 страниц
  все  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852231
LiYing
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LiYing
Гость
На форме несколько ButtonedEdit, RightButton.DropDownMenu каждого эдита связан с одним и тем же PopupMenu с несколькими MenuItem.
Как узнать на кнопке какого эдита был кликнут пункт меню?
Пробовал так:
Код: pascal
1.
2.
3.
4.
procedure TForm1.mni1Click(Sender: TObject);
begin
  ShowMessage(PopupMenu1.PopupComponent.Name); // Здесь AV, т.к. PopupMenu1.PopupComponent = nil
end;
...
Рейтинг: 0 / 0
21.08.2019, 16:36
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852236
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dimitry Sibiryakov
Участник
LiYingКак узнать на кнопке какого эдита был кликнут пункт меню?

А как ты это меню открываешь?
F1Set PopupComponent to associate a control with the menu before calling the Popup
method programmatically to bring up the pop-up menu.

Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
21.08.2019, 16:40
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852242
LiYing
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LiYing
Гость
Dimitry Sibiryakov,

т.е. помимо связи RightButton.DropDownMenu эдита с PopupMenu, нужно еще и св-во PopupMenu самого эдита связать с этим же попапом?
...
Рейтинг: 0 / 0
21.08.2019, 16:45
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852249
LiYing
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LiYing
Гость
Так тоже не работает.
"А как ты это меню открываешь?" - клик по правой кнопке ButtonedEdit
...
Рейтинг: 0 / 0
21.08.2019, 16:51
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852250
kealon(Ruslan)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kealon(Ruslan)
Участник
LiYing,

у PopupMenu есть свойство PopupComponent

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
procedure TControl.WMContextMenu(var Message: TWMContextMenu);
...
  PopupMenu := GetPopupMenu;
  if (PopupMenu <> nil) and PopupMenu.AutoPopup then
  begin
    SendCancelMode(Self);
    PopupMenu.PopupComponent := Self;
    if InvalidPoint(Pt) then
      Pt := ClientToScreen(Point(0, 0));
    PopupMenu.Popup(Pt.X, Pt.Y);
    Message.Result := 1;
  end;

  if Message.Result = 0 then
    inherited;
end;
...
Рейтинг: 0 / 0
21.08.2019, 16:52
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852251
kealon(Ruslan)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kealon(Ruslan)
Участник
LiYing,

если у тебя какие-то кастомные компоненты, то весь вопрос к их создателям
...
Рейтинг: 0 / 0
21.08.2019, 16:53
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852253
LiYing
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LiYing
Гость
kealon(Ruslan)LiYing,

если у тебя какие-то кастомные компоненты, то весь вопрос к их создателям
Только родные делфовые.
...
Рейтинг: 0 / 0
21.08.2019, 16:56
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852260
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dimitry Sibiryakov
Участник
LiYingпомимо связи RightButton.DropDownMenu эдита с PopupMenu

У стандартного эдита нет ни свойства RightButton, ни свойства DropDownMenu. Что возвращает
нас к вопросу о левых компонентах.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
21.08.2019, 17:04
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852282
alekcvp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alekcvp
Участник
LiYing,

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
procedure TEditButton.TGlyph.WndProc(var Message: TMessage);
var
  LPoint: TPoint;
begin
...
    WM_LBUTTONDOWN:
      if FButton.FDropDownMenu <> nil then
      begin
        if not (csDesigning in Parent.ComponentState) then
        begin
          LPoint := ClientToScreen(Point(0, FButton.EditControl.Height));
          FButton.FDropDownMenu.Popup(LPoint.X, LPoint.Y);
        end;
      end
...
end;


Как видим TEditButton игнорирует PopupComponent, поэтому узнать кто вызывает меню не получится никак. Разве что если сделать полностью свой класс TEditButton, т.к. тип TGlyph амба зачем-то засунула в приватную секцию этого класса, т.е. даже в наследнике до неё не добраться...
...
Рейтинг: 0 / 0
21.08.2019, 17:28
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852286
alekcvp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alekcvp
Участник
LiYing,

Как вариант - убрать DropDownMenu, назначить OnClick() и там вручную вызывать PopupMenu с присвоением ей нужного PopupComponent.
...
Рейтинг: 0 / 0
21.08.2019, 17:31
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852354
LiYing
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LiYing
Гость
Dimitry SibiryakovLiYingпомимо связи RightButton.DropDownMenu эдита с PopupMenu

У стандартного эдита нет ни свойства RightButton, ни свойства DropDownMenu. Что возвращает
нас к вопросу о левых компонентах.

http://docwiki.embarcadero.com/Libraries/Rio/en/Vcl.ExtCtrls.TButtonedEdit
это левый компонент?
...
Рейтинг: 0 / 0
21.08.2019, 20:04
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852365
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DimaBr
Участник
...
Рейтинг: 0 / 0
21.08.2019, 20:25
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852372
alekcvp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alekcvp
Участник
DimaBr,

А если с клавиатуры откроют? Хотя не факт, что это возможно с этим контролом.
...
Рейтинг: 0 / 0
21.08.2019, 20:49
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852383
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dimitry Sibiryakov
Участник
LiYingэто левый компонент?

Да. Они его спёрли то ли у Rz то ли у джедаев.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
21.08.2019, 21:33
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852474
LiYing
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LiYing
Гость
Dimitry SibiryakovДа. Они его спёрли то ли у Rz то ли у джедаев.

Нууу... так можно договориться о черт знает чем...

Всем спасибо за обсуждение и предложенные решения!
...
Рейтинг: 0 / 0
22.08.2019, 08:06
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852516
Фотография Gator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gator
Участник
Вот не могу в моск взять, какие могут быть проблемы с определением подлежащего или порождающего контрола.

Есть курсор. Всегда можно узнать, над чем он находится.
Например, в treeview на какой-то ветке вызывается попап. Всегда можно заюзать NodeAT.
А тривиальные способы описаны в учебниках.
...
Рейтинг: 0 / 0
22.08.2019, 09:34
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852518
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DimaBr
Участник
Почему так ?
Код: pascal
1.
2.
P := PopupMenu1.PopupPoint;
Dec(P.Y,10)


Здесь в PopupPoint попадают координаты выпадения меню. Экспериментально (возможно из-за того, что у меня картинки больше ButtonEdit) меню появляется чуть ниже компонента и по координатам PopupMenu1.PopupPoint функция ControlAtPos ничего не находит. Поэтому я немного сдвинул координату вверх
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
procedure TEditButton.TGlyph.WndProc(var Message: TMessage);
var
  LPoint: TPoint;
begin
...
    WM_LBUTTONDOWN:
      if FButton.FDropDownMenu <> nil then
      begin
        if not (csDesigning in Parent.ComponentState) then
        begin
          LPoint := ClientToScreen(Point(0, FButton.EditControl.Height));  
          FButton.FDropDownMenu.Popup(LPoint.X, LPoint.Y);
        end;
      end
...
end;
...
Рейтинг: 0 / 0
22.08.2019, 09:38
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852522
alekcvp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alekcvp
Участник
GatorЕсть курсор. Всегда можно узнать, над чем он находится.
Например, в treeview на какой-то ветке вызывается попап. Всегда можно заюзать NodeAT.


А ещё есть комбинации клавиш на клавиатуре, которые или имитируют нажатие правой кнопки мыши на активном контроле (а не под курсором) или вообще вызывают всплывающее меню без нажатия кнопок мыши - например пробел для кнопок с DropDownMenu по-умолчанию. Но зачем нам учитывать такие случаи, они ведь не случатся никогда-никогда, а если и случатся то пользователь сам дурак, верно? :)
...
Рейтинг: 0 / 0
22.08.2019, 09:50
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852542
Василий 2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Василий 2
Участник
OnContextPopup?
...
Рейтинг: 0 / 0
22.08.2019, 10:15
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852608
Фотография Gator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gator
Участник
alekcvp> ... без нажатия кнопок мыши - например пробел ...

А какая разница? На форме всегда есть что-то активное. Допустим, на мемо вертикально расположен алфавит.
И ты ползаешь стрелками по нему, как на лифте, вверх/вниз.
И ты всегда знаешь, на какой строке ты находишься (по её индексу, например)
Жмакай хоть пробел, хоть [Alt]+?
Так что точка показа попапменю всегда под контролем.
...
Рейтинг: 0 / 0
22.08.2019, 12:06
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852647
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dimitry Sibiryakov
Участник
GatorЕсть курсор. Всегда можно узнать, над чем он находится.

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

Не надо так делать. А если и приспичило, координаты надо брать не текущие, а те, что
пришли в сообщении WM_LBUTTONDOWN.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
22.08.2019, 12:44
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852683
Фотография Gator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gator
Участник
Dimitry Sibiryakov, абсолютно согласен. Я к тому, что позицию попапа можно всегда вычислить.
...
Рейтинг: 0 / 0
22.08.2019, 13:20
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852684
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dimitry Sibiryakov
Участник
LiYingтак можно договориться о черт знает чем...

О том, что в VCL внезапно есть баги? Да, в ней туева прорва багов. Если этот - первый на
которого ты нарвался, то ты либо нуб, либо везунчик. Теперь придётся пересматривать своё
мировоззрение и архитектуру программы.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
22.08.2019, 13:21
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852703
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dimitry Sibiryakov
Участник
GatorЯ к тому, что позицию попапа можно всегда вычислить.

Но это не поможет аффтару с его задачей связать попап с конкретным компонентом.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
22.08.2019, 13:41
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852714
Фотография Gator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gator
Участник
Dimitry Sibiryakov,

Так компонента может не быть вовсе.
афтар, скорее всего имеет в виду "элемент графического интерфейса".
В конце концов. у компонентов есть их координаты на известна точка клика. Что ещё надо?
...
Рейтинг: 0 / 0
22.08.2019, 13:58
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852717
Василий 2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Василий 2
Участник
Код: pascal
1.
2.
3.
4.
5.
6.
7.
var PopupEdit: TObject;

procedure TMainForm.Edit1ContextPopup(Sender: TObject; MousePos: TPoint;
  var Handled: Boolean);
begin
  PopupEdit := Sender;
end;
...
Рейтинг: 0 / 0
22.08.2019, 14:00
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852718
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dimitry Sibiryakov
Участник
Gatorу компонентов есть их координаты на известна точка клика.

И вот тут мы начинаем второй раунд с того, что точка клика неизвестна. Ибо VCL вследствие
криворукости своих разработчиков плюёт на координаты, приходящие с сообщением о клике.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
22.08.2019, 14:04
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852745
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
Еще можно выяснить Screen.ActiveControl;
...
Рейтинг: 0 / 0
22.08.2019, 14:30
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852748
Фотография Gator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gator
Участник
Dimitry Sibiryakov,ну и не надо к ним привязываться, а придумать сто-нибудь своё.
На примере ТриВью, например, видно, что выделенных веток может быть много, с галками и без, может не быть совсем, но это не повод отказываться от попапа. (причем не только меню, но и текста, картинки, ещё чего-то)

Не координатами механизм жив однако и не контролами едиными.

Вот например, в DataSource жмакнуть невозможно, потому что он невизуальный.
Но работать и попапить можно его свойства и другую трехмудию.
...
Рейтинг: 0 / 0
22.08.2019, 14:31
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852752
Мимопроходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Мимопроходящий
Участник
22.08.2019 14:30, rgreat пишет:
> Еще можно выяснить Screen.ActiveControl;

нет
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
22.08.2019, 14:34
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852753
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dimitry Sibiryakov
Участник
rgreatможно выяснить Screen.ActiveControl;

"О, сколько нам открытий чудных..."
При правом клике контрол не получает фокус.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
22.08.2019, 14:34
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852761
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
Dimitry SibiryakovПри правом клике контрол не получает фокус.
Это смотря какой контрол.

Тут все решения не дают 100% результата. Да и не могу дать.
...
Рейтинг: 0 / 0
22.08.2019, 14:38
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852764
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
В общем топикстартеру ответ "это так не работает".

Надо вручную вызывающий контрол запоминать.
...
Рейтинг: 0 / 0
22.08.2019, 14:40
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852775
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dimitry Sibiryakov
Участник
rgreatТут все решения не дают 100% результата.

Есть решение, дающее 100% результат: пофиксить бага в VCL. Но оно недоступно для аффтара.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
22.08.2019, 14:47
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852915
alekcvp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alekcvp
Участник
Gatoralekcvp> ... без нажатия кнопок мыши - например пробел ...
А какая разница?
....
Жмакай хоть пробел, хоть [Alt]+?
Так что точка показа попапменю всегда под контролем.
Такая, что код выше анализирует положение указателя мыши чтобы определить кем было открыто меню.
...
Рейтинг: 0 / 0
22.08.2019, 17:35
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852919
alekcvp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alekcvp
Участник
alekcvpТакая, что код выше анализирует положение указателя мыши чтобы определить кем было открыто меню.
А, не, пиз туплю, точку всплытия...
...
Рейтинг: 0 / 0
22.08.2019, 17:36
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852929
Фотография Gator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gator
Участник
alekcvpalekcvpТакая, что код выше анализирует положение указателя мыши чтобы определить кем было открыто меню.
А, не, пиз туплю, точку всплытия...Да. А координаты можно всегда указать в терминах экрана.
...
Рейтинг: 0 / 0
22.08.2019, 17:55
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39852939
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
Dimitry SibiryakovЕсть решение, дающее 100% результат: пофиксить бага в VCL. Но оно недоступно для аффтара.
Для сторонних компонентов это не гарантирует результат.

Да и при вызове PopupMenu1.Popup(100,100); ручками - тоже никак не спасет.
...
Рейтинг: 0 / 0
22.08.2019, 18:24
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39853012
Фотография Gator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gator
Участник
rgreatДа и при вызове PopupMenu1.Popup(100,100); ручками - тоже никак не спасет.Это смотря как (100,100) считать, в каких единицах и т.п.
Я предлагал "от печки" (0, 0) видимой области.
...
Рейтинг: 0 / 0
22.08.2019, 21:28
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39853013
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
GatorЭто смотря как (100,100) считать, в каких единицах и т.п.
Я предлагал "от печки" (0, 0) видимой области.Какая разница как считать если в данном случае вообще нет связи ни с какими визуальными компонентами.

Попап просто вызывается сам по себе. В центре экрана по таймеру, например.
...
Рейтинг: 0 / 0
22.08.2019, 21:45
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39853016
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dimitry Sibiryakov
Участник
rgreatПопап просто вызывается сам по себе.

А теперь перечитываем вышеотквоченную справку: "тот, кто вызовет попап ручками, несёт
полную ответственность за установку или неустановку свойства PopupComponent".
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
22.08.2019, 21:55
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39853018
Фотография Gator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gator
Участник
rgreat, я и говорю. Вопрос из пальца высосан.
Афтрар ведь на экран смотрит, там и щёлкает мышой или кнопки жмакает. А куда он попапку высветит - его видение. И причём тут контролы и компоненты?. Достаточно мессаг и координат на форме.
А если формы нет, попапка повиснет в воздухе. ОС ещё никому отменить не удалось. Разве что программы-мониторы. Но там ни экранов не было, ни ОС.
...
Рейтинг: 0 / 0
22.08.2019, 21:57
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39853066
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
Dimitry Sibiryakov,

Другими словами в общем случае задача не решаема.
А частные случаи решений тут все уже небось поперечисляли.
...
Рейтинг: 0 / 0
23.08.2019, 06:04
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39853736
Фотография sasha27
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sasha27
Участник
LiYingНа форме несколько ButtonedEdit, RightButton.DropDownMenu каждого эдита связан с одним и тем же PopupMenu с несколькими MenuItem.
Как узнать на кнопке какого эдита был кликнут пункт меню?
Пробовал так: ...



День добрый.
Если все компоненты однотипные ("несколько ButtonedEdit"), то решается след. образом.
Заводится глобальная переменная, например:
Код: pascal
1.
var ActButton : TButtonedEdit;


Делаем процедуру (имя придумаешь сам...):
Код: pascal
1.
2.
3.
4.
procedure ButtonedEnter(Sender: TObject);
begin
  ActButton := (Sender as TButtonedEdit); 
end;


При создании формы (или при показе) - к каждому компоненту на событие onEnter цепляем эту процедуру:

Код: pascal
1.
2.
3.
4.
5.
...
ButtonedEdit1.OnEnter := ButtonedEnter; 
ButtonedEdit2.OnEnter := ButtonedEnter; 
ButtonedEdit3.OnEnter := ButtonedEnter; 
...



Как работает: При клацанье мышью, у компонента происходит событие onEnter, в нем в переменную заносится тот объект, на котором сработало это событие.
Т.е. после вызова твоего по-папа, можно узнать из переменной на чем оно сработало.
Вот и все...
...
Рейтинг: 0 / 0
26.08.2019, 14:26
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39853739
Фотография sasha27
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sasha27
Участник
LiYing
проект
...
Рейтинг: 0 / 0
26.08.2019, 14:34
| Ответить | Цитировать | Написать  
Как узнать на каком контроле кликнут элемент попапменю?
    #39854948
LiYing
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LiYing
Гость
sasha27,

Спасибо, возьму на заметку.
...
Рейтинг: 0 / 0
29.08.2019, 08:45
| Ответить | Цитировать | Написать  
46 сообщений из 46, показаны все 2 страниц
  все  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как узнать на каком контроле кликнут элемент попапменю?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?all=1&fid=58&tid=2039100]:
 0ms
get settings:
 8ms
get forum list:
 19ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 184ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 55ms
get tp. blocked users:
 1ms
others: 236ms
total:  525ms
созд. / загр.: 525ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]