Как узнать имя события/функции, которое было выполенно в Run Time?

[artemavd]

Добрый вечер! Поясню вопрос. Есть кнопка и у нее имеется обработчика события, например, OnClick и OnChange. Каждый из них содержит какой-то заранее написанный код. Как можно, программно, во время работы программы, узнать имя того обработчика, который был выполнен последним? Что-то типа если нажали на кнопку, то показалось бы сообщение с именем обработчика. Возможно ли такое сделать?

[HellMercenariess]

Возможностей компонента TAppEvents недостаточно?

[Аватар]

Например каждый обработчик пишет в лог некоторую инфу. Типа своё имя, время вызова, имя, тип компонента который его вызвал. Читать лог и показывать то что нужно

[artemavd]

Возможностей компонента TAppEvents недостаточно?

Честно? Я ни разу не использовал за 5 лет этот компонент. Посмотрю и почитаю про него. Есть примеры как он работает?

Например каждый обработчик пишет в лог некоторую инфу. Типа своё имя, время вызова, имя, тип компонента который его вызвал. Читать лог и показывать то что нужно

А если компонент создается динамически и ему также назначается событие?

[Аватар]

А если компонент создается динамически и ему также назначается событие?

Обычно обработчики через Sender или аналог знают кто к ним обратился

[artemavd]

Можешь пример кода как через, например, Sender, показать?

[Аватар]

Так например

  if Sender<>nil then begin
    s:=Format('ClassName=%s',[Sender.ClassName]);
    if Sender is TComponent then s:=s+Format(', Name=%s',[TComponent(Sender).Name]);
  end
  else s:='nil';

[GunSmoker]

Возможно ли такое сделать?

Возможно.

Как именно - зависит от того, зачем это надо и в какой мере нужно покрыть код.

[Человек_Борща]

Всякие перехватчики исключений, типа MadExcept, EurekaLog, FastMM при ошибке выводят стэк данных с указанием имен, смещений, строк и места ошибки во всем этом.

[artemavd]

Аватар, твой код тоже мне интересен кстати. Однако, он выдает имя класса компонента и его имя. Мне нужно, чтобы он показал имя события, которое выполнилось. Например: "Выполнено событие = OnClick". Это возможно сделать?