将javascript改成delphi要怎么写？

Question

function aa()
{
  this.model=bb;
}
function bb(a,v)
{}function cc(x,y)
{
return this.model(x.y)
}像这样的delphi下要怎么写啊

Answer 1

类似的 
Function Foo:integer;
begin
  Result := 1;
end;
Result 即返回值

Answer 2

我是想知道delphi下如果我要用bb
我怎么才能用下面的这种方式实现
this.model(x.y)

Answer 3

type
  Tfun=function (a,b:integer):integer;... class ...
  model:Tfun;self.model:=fun1;xxx:=self.model(x,y);

Answer 4

改成delphi如下:
先假定 aa,bb,cc是在 xClass中再假定
function bb(a,v)这里的a ,v类型为integer;
function cc(x,y)这里的x ,y类型为integer;
好，那我们开始改成delphi
procedure xClass.aa()
{
self.model=bb;
}
procedure xClass.bb(a:integer;v:integer)
{}
function xClass.cc(x:integer;y:integer)
{
result:=self.model(x.y)
}

Answer 5

改为：
self.model:=@fun1;
呢？
感觉函数指针的赋值的确有二义性，应该有一个取函数地址的操作符

Answer 6

方法指针最后要加 of object;