怎样用属性来调用过程

TMyObject= class(TObject)
private
  FProcedure;TFNWndProc;
public
  property myproperty:TFNWndProc read FProcedure write FProcedure;
  procedure myprocedure;
end;procedure TMyObject.myprocedure;
begin
  调用FProcedure;//怎样调用这个私有成员？
end;
怎样把外界的一个过程（procedure)来对myproperty赋值，然后让该类的其它方法来通过调用
FProcedure来调用这个过程？
    请各位多多帮忙！！