INTRAWEB的问题?!在线等待(50分)

  • 主题发起人 主题发起人 TIANXU
  • 开始时间 开始时间
T

TIANXU

Unregistered / Unconfirmed
GUEST, unregistred user!
我仿照例子构造 MOVE 函数
procedure TframMenu.Move(AFormClass: TIWAppFormClass);
begin
TIWAppForm(RWebApplication.ActiveForm).Release;
AFormClass.Create(RWebApplication).Show;
end;
可是编译时却报错
[Error] IWUnit1.pas(22): Undeclared identifier: 'RwebApplication'
[Error] IWUnit1.pas(22): ')' expected but identifier 'activeform' found
[Fatal Error] HR.dpr(7): Could not compile used unit 'IWUnit1.pas'
为什么????我用的是D7
 
估计你的版本和例子所用的版本不配。
改用WebApplication应该可以吧
 
可我用的是是程序员大本营合定本的例子啊?再者我用的D7自带的列子(构造 MOVE 函数)
COPY到我自己的上面也不行啊
 
估计你是新手,
还要加一些unit进去。

uses
Classes, SysUtils, IWAppForm, IWApplication, IWTypes, Menus, Controls,
IWBaseControl, IWControl, IWCompMenu, IWExtCtrls;


procedure Tbasefrm.Open(AFormClass: TIWAppFormClass);
begin
// Release the current form
TIWAppForm(WebApplication.ActiveForm).Release;
// Create the next form
AFormClass.Create(WebApplication).Show;
end;
 
不行啊,没有OPEN事件啊
 
接受答案了.
 
后退
顶部