Адрес объекта в памяти

[Artempokrowski]

Необходимо узнать адрес объекта в памяти при нажатии на него. При этом объект создаётся динамически и хранится в Tobjectlist.
То есть кликаем по объекту а у нас куда нибудь например в лейбл выводится адрес объекта в памяти.

[Artempokrowski]

разобрался сам. Есть self у каждого объекта. Поэтому переопределяем родительский метод клика мышкой по объекту и выводи куда надо...

[Пепел Феникса]

Self применяется только внутри методов, и означает объект с которым этот метод вызван.
в вашем же случае надо помнить, что всегда объекты(ключевое слово class) хранятся по указателю.

[Artempokrowski]

Сообщение от Пепел Феникса

Self применяется только внутри методов, и означает объект с которым этот метод вызван.
в вашем же случае надо помнить, что всегда объекты(ключевое слово class) хранятся по указателю.

Ок тогда как узнать для каждого объекта именно этот указатель.

[RinatV]

Можно при создании объекта прописать ему уникальное имя Name и по нему уже определять как реагировать, конечно если объект наследник класса TComponent, если нужен только тип объекта то есть у наследников TObject имеется свойство ClassName. Также можно хранить ссылки в дополнительных списках TObjectList созданный без автоуничтожения содержащихся объектов т.е. TobjectList.Create(false). При наступлении события искать объект там и реагировать соответсвенно.

[Artempokrowski]

по моему проще всё таки будет через Self. К тому же щелкать нужно будет по объекту а он как раз у будет в дальнейшем указывать свой адрес.

[RinatV]

Заранее не узнаешь какое значение будет у self, для этого и приходится думать о его идентификации, конечно если это нужно.

[Artempokrowski]

Конечно не узнать, но мы же будем его вызывать уже из созданного объекта.

[Пепел Феникса]

кого его?
раскрывайте карты.

ибо у метода селф это одно, а вот в ссылках на процедуру-метод другое.

[Аватар]

Чем не нравится такой способ

procedure TForm1.Button2Click(Sender: TObject);
begin
  Label2.Caption:=IntToStr(DWORD(Sender));
end;