Здравствуйте, Drago, Вы писали:
D>Во-первых смущает нотация записи. если я правильно понимаю, и pTStage=^TStage D>то почему ты на него ссылаешься не как s1^.property, а как s1.property? не есть гуд.
Это соглашение, введенное в дельфу для облегчения работы с объектами. В принципе — должно работать, хотя активно пользоваться этим я бы не стал.
D>а во-вторых... если эти TShape ты создаешь на своей форме, почему ты делаешь Create(Nil)?
А почему нет?
D>ну подумай, как будет назначен Owner новому компоненту?
Обычным образом.
Потому-то и не работает обработчик, ведь объект получается "висит в воздухе".