forum.boolean.name - Процедуры

forum.boolean.name (http://forum.boolean.name/index.php)

- Delphi (http://forum.boolean.name/forumdisplay.php?f=66)

- - Процедуры (http://forum.boolean.name/showthread.php?t=11530)

Процедуры

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

Код:

TButton=record

//---

OnClick:procedure;

//---

end;

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

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

Код:

procedure Game_Start;

begin

Game.Start;

end;

//---

Button01.OnClick:=@Game_Start;

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

Ответ: Процедуры

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

Ответ: Процедуры

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

Ответ: Процедуры

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

Код:

TButton = class(TObject)

  переменные

  public

  procedure OnClick();

  end;

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