Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Как узнать кто вызвал процедуру

Автор: XperT 23.9.2008, 20:31

Есть n-ное число динамически создаваемых обьектов. К им вешаюется процедура OnMouseMove. Как узнать в теле процедуры какой с этих обьектов ее вызвал?

Автор: Matematik 23.9.2008, 20:37

см. параметр Sender

Код


procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  ShowMessage((Sender as TForm).Name)
end;

Автор: XperT 23.9.2008, 20:39

Sender почему то не передается

Автор: Frees 24.9.2008, 06:25

Цитата(XperT @ 23.9.2008, 22:31

)

К им вешаюется процедура OnMouseMove

Цитата(XperT @ 23.9.2008, 22:39

)

Sender почему то не передается

Код покажи как вешаеш

Автор: XperT 24.9.2008, 09:48

Моей ошибкой было то что я делал вывод про Сендер по параметру нейм который не присваивал. Всем спасибо, вопрос решен.