Процедуры

[PacMan]

Здравствуйте!
Есть у меня такой тип:

TButton=record
//---
OnClick:procedure;
//---
end;

Присвоить указатель не обычную процедуру получается, а например на вот такую Game.Start - нет.
Может я что-то неправильно делаю?
Подскажите пожалуста.

Сейчас приходиться делать вот так:

procedure Game_Start;
begin
Game.Start;
end;
//---
Button01.OnClick:=@Game_Start;

Но это очень неудобно...

XAMMEP
и не получится

[PacMan]

Ясно, спасибо.

[firstvirus]

хм. я может и ошибаюсь но может быть лучше так сделать?

TButton = class(TObject)
  переменные
  public
  procedure OnClick();
  end;

тогда вызов будет Button1.OnClick();