intraweb中iwlink连接另一个网页的问题。(100分)

  • 主题发起人 主题发起人 zhui520
  • 开始时间 开始时间
Z

zhui520

Unregistered / Unconfirmed
GUEST, unregistred user!
小弟近来刚学INTRAWEB,不精,看了一些资料可是不大详细,
现在在写一个程序,可是用iwtraweb时,在一个网页中加入一个IWLINK来联接另一个网页,可是没办法联接成功,能不能给个procedure
 
新建一个application form 把下一页的内容放再这个form中,在IWLINK的事件中写:
TIWAppForm(RWebApplication.ActiveForm).Release;//释放当前的FORM
Twebfmclass.Create(RWebApplication).Show; //Twebfmclass为新FORM的名称




 
你可以像例子里的做法写一个move函数
建一个common模块 定义
procedure Move(AFormClass: TIWAppFormClass);
begin
// 释放当前窗体
TIWAppForm(RWebApplication.ActiveForm).Release;
// 创建下一个窗体
AFormClass.Create(RWebApplication).Show;
end;
全局变量一起定义到这里,以后用也方便
以后move就可以随便用了
procedure TTopFrame.GerenLinkClick(Sender: TObject);
begin
Move(TGerenForm);
end;
//GerenForm是一个form的名
 
对,创建新的窗体时要先release,所以把这写成oocool的通用的过程会方便很多 [:)]
 
多人接受答案了。
 
后退
顶部