Проблема с классами

← →
Nick-123 (2006-12-31 16:34) [0]

Есть тип TOnClick = procedure(). У класса кнопки TGameButton свойство OnClick: TOnClick. Присваиваем ему процедуру, и при нажатии на кнопку она вызывается.

Есть класс TGamePanel, и переменная CloseBtn: TGameButton. (объявлена не в классе, а в секции интерфейса) У этого класса -- procedure TGamePanel.CloseButtonClick. В TGamePanel.Create присваиваем CloseBtn.OnClick := CloseButtonClick, и получаем [Pascal Error] cGUIPanel.pas(71): E2009 Incompatible types: "regular procedure and method pointer".

Что делать?

Надеюсь, вы в вышенаписанном хоть что-то поняли. :)))))

← →
DrPass © (2006-12-31 16:59) [1]

> TOnClick = procedure().

А ты сделай TOnClick = procedure(...) of object

Проблема с классами Найти похожие ветки