Узнать какой объект создал событие

← →
Алексей (2004-10-09 23:49) [0]

Подскажите, пожалуйста, как узнать по Sender-у имя объекта, который создал событие и получить доступ к его полям, например содержимое поля text.

← →
Юрий Зотов © (2004-10-10 01:03) [1]

type
TFriendControl = class(TControl);
...

if Sender is TControl then
with TFriendControl(Sender) do
begin
Text := "Привет";
...
end
else
if Sender is TComponent then
with TComponent(Sender) do
begin
ShowMessage(Name);
...
end;

Узнать какой объект создал событие Найти похожие ветки