Dynamicznte tworzenie formy + tworzeneie przycisku + onClick do przycisku

Witam,

mam problem

Tworze dynamiczną formę w następujący sposób:

var
Form : TFrom
Bt : TButton;
begin
Form := TForm.Create(nil);

Form.Height := 430;
Form.Width := 715;

bt := TButton.Create(Form);

with bt do begin
  Caption := 'Przerwij';
  onClick := btTry;

  bt.parent := form;
end;

I chce przypisać do przycisku bt, procedure btTry, ale nie wiem jak to zrobić.
Zaznaczam że forma jest tworzona dynamicznie.

Może tak?

Procedure MyOnClickFunction(Sender: TObject);
Begin
 (* some spam here *)
End;
(* ... *)
with bt do begin
  Caption := 'Przerwij';
  onClick := MyOnClickFunction;
  parent := form;
end;

No właśnie ale dostaje taki error:
[DCC Error] functions.pas(302): E2009 Incompatible types: 'method pointer and regular procedure'

Ok, już wiem co jest grane,

sorry za zawracanie w d***

Tu jest rozwiązanie:
http://delphi.about.com/cs/adptips2003/a/bltip1003_5.htm