Функция для Создаваемой программно кнопки

[Iscariot]

В общем, Пытаюсь в длл библиотеке создать функцию которая будет создавать форму с кнопкой и чтобы при нажатии на кнопку это окно закрывалось, но когда пытаюсь назначить процедуру на нажатие кнопки при компиляции выходит ошибка несовместимости типов

Incompatible types: 'Method pointer and regular procedure'

подскажите как исправить

код создания кнопки

Mbutton:=Tbutton.create(MForm);
with Mbutton do begin
Parent:=MForm;
caption:='ok';
onClick:=Mbuttonclick;
end;
Mbutton.Show;

заголовок процедуры нажатия имеет вид:
Procedure Mbuttonclick(Sender:Tobject);

[sinedSpb]

Procedure Mbuttonclick(Sender:Tobject);
должна быть методом класса расположите эту процедуру в интерфейсе класса например
TMyForm = class(TForm)
private
Procedure Mbuttonclick(Sender:Tobject);
end;

затем гдето

MForm = TMyForm.create(nil);

и дальше ваш код будет работать