请问有哪位高手知道在intraweb中调用ms agent

Question

我不知道在create的参数填什么由例子么？

Answer 1

procedure zhang;
 var
 from1:Tfrom1;
 begin
   from1:=tform1.create(application);
   form1.show;
    end;
end.

Answer 2

呵呵我是指在intraweb中使用阿这样通不过编译的

Answer 3

procedure jsjxdet(id:string);
begin
with Tformjsjxdetail.Create(RWebApplication) do begin
show();
end;
end;

Answer 4

begin
 form.create(webappliation).show;
end;
这样就可以了前面一定要加上该单元呀
有什么问题再说

Answer 5

偶比较笨拉欧只想要intraweb中使用maagent的例子比如procedure newagent;
var
myagent:TAgent;
Peedy: IagentCtlCharacter; 
begin
myagent := TAgent.create('????');  //这里的???填什么呢？
MyAgent.Characters.Load('Peedy','d:\windows\msagent\chars\Peedy.acs');
Peedy := MyAgent.Characters.Character('Peedy');
Peedy.Play('acknowledge');
end;
end;