asp调用dll输出一个乘法(怎样才能让fnuction 获得 procedure 内的变量结果~~)

我用delphi 建立一个ASP调用的组件 内容很简单
------------------------------------------------
Set D = Server.CreateObject("MM.MyLoad")
D.MyMax 10,5
response.Write (D.result)
我希望同过这三行代码能获得 10*5的结果。------------------------------------------------还有一个问题就是 我的ASP页面一旦执行一次 delphi中就提示组件被占用 要重新启动IIS才能重新编译组件 ``` 是我哪里做错了吗------------------------------------------------procedure TMyLoad.MyMax(i, k: Integer);
var result2:integer;
begin
     result2 := i * k + 101;
end;function TMyLoad.Get_result: Integer;
begin
      Get_result:=result2;//怎么做这里的结果才能为 procedure 中的result2 的结果??
      //Get_result:=100;//asp页面可以输出 100的结果...
end;