процедурные типы данных

[Granus]

TSomeClass1 = procedure(A:integer);
TSomeClass2 = procedure(A:integer) of object;

чем они различаются?
и как присвоить процедуру OnClick'у кнопки?

[Jean-Esther]

Отличаются почти ничем: второй только лишь обязан всегда быть методом какого-то объекта.
OnClick:TNotifyEvent ты их никак не присвоишь, так как TNotifyEvent=procedure(Sender:TObje ct) of object, что не совпадает с предыдущими двумя типами.

[Granus]

тоесть можно присвоить OnClick'у что то типа

Bla: TNotifyEvent;