IntraWeb例子练习
特征演示
这个演示是一个不严谨的程序，但是展示了使用IntraWeb开发能做的事情。演示实现下面的功能：
- 如何使用IntraWeb Frames模仿HTML Frames，基础了delphi的TFrame组件。
- 在IntraWeb应用程序中使用TIWApplication.ShowMessage方法显示不同类型的信息对话框。
- 不同类型控件的事件处理： TIWRadioButton 控件、TIWCheckBox 控件等等。
- 在运行中显示/隐藏控件。
- 使用TIWApplication.SendFile 方法从服务器下载文件。
- 使用 TIWFile 控件上传文件到服务器。
- 打开一个新的浏览器窗口显示一个URL地址。
- 在一个新的浏览器窗口打开一个PDF文件。
- TIWCalendar组件演示改变日期事件处理。
- 在运行时通过TIWForm的StyleSheet属性载入外部类型并且改变当前类型。
- 用TIWImage组件的MouseDown事件创建一个交互的图片。
- 嵌入不同类型的物件到程序中：使用TIWApplet嵌入Java applet, 使用TIWActiveX嵌入ActiveX, Flash Movie (TIWFlash), MPEG movie (TIWMPEG) and QuichTime movie (TIWQuickTime)。
- 使用TIWForm的Resize事件在服务器处理浏览器改变大小。
- 在线程中执行后台任务。
- 在IntraWeb应用程序中使用定时器。
- 使用只读、编辑、动态grids。
- 使用TIWTemplateProcessorHTML控件通过HTML模板/子模板控制窗体的版式。
- 使用TIWLayoutMgrHTML控件控制版式。
- 使用IntraWeb 控件的Anchors 属性控制版式。
- 使用TIWRegion控件控制版式。
- 使用客户端数据。
- 显示控制树型控件(TIWTreeView)
- 如何使用IntraWeb Frames模仿HTML Frames，基础了delphi的TFrame组件。
首先建立Frame，new对话框－IntraWeb页－New Frame－New Frame Wizard中选择Html4.0建立Frame页，放置IWMenu和MainMenu，设置IWMenu的attachedMenu属性为MainMenu，同时必须设置IWFrameRegion的ClipRegion为false，否则下拉的菜单会显示不出来。
使用Frame，在使用窗体放置控件Frames，在Select frame to insert对话框中选择刚才建立的Frame。
运行调试ok......
[技巧]：页面跳转过程move
procedure TframMenu.Move(AFormClass: TIWAppFormClass);
begin
// Release the current form
TIWAppForm(WebApplication.ActiveForm).Release;
// Create the next form
AFormClass.Create(WebApplication).Show;
end;
退出并跳转到页面：WebApplication.TerminateAndRedirect('http://www.atozed.com');
访问端浏览器类型：WebApplication.Browser = brIE
- 在IntraWeb应用程序中使用TIWApplication.ShowMessage方法显示不同类型的信息对话框。
WebApplication.ShowMessage(AMsg:string);
WebApplication.ShowMessage(AMsg:string;const Atype:TIWShowMessageType;ATemplate:string);
WebApplication.ShowMessage(AMsg:string;const Atype:TIWShowMessageType);
TIWShowMessageType={smAlert,smNewWindow,smSameWindow,smSameWindowFrame}
- 不同类型控件的事件处理： TIWRadioButton 控件、TIWCheckBox 控件等等。
这里的控件演示和正常开发没有什么大的区别，IWRegion控件好像类似于Panel这样的容器控件。
- 在运行中显示/隐藏控件。
控制控件的Visible属性来实现！
- 使用TIWApplication.SendFile 方法从服务器下载文件。
使用WebApplication.SendFile(在服务器上的路径,附件？, 类型, 文件名);
WebApplication.SendFile(WebApplication.ApplicationPath+ 'downfile.rar',True , '', '');
- 使用 TIWFile 控件上传文件到服务器。
- 打开一个新的浏览器窗口显示一个URL地址。
AddToInitProc（）；
AddToInitProc('NewWindow(''' + Trim(editURL.Text) + ''', ''MyWindow'', '''');');
- 在一个新的浏览器窗口打开一个PDF文件。
- TIWCalendar组件演示改变日期事件处理。
- 在运行时通过TIWForm的StyleSheet属性载入外部类型并且改变当前类型。
- 用TIWImage组件的MouseDown事件创建一个交互的图片。
- 嵌入不同类型的物件到程序中：使用TIWApplet嵌入Java applet, 使用TIWActiveX嵌入ActiveX, Flash Movie (TIWFlash), MPEG movie (TIWMPEG) and QuichTime movie (TIWQuickTime)。
- 使用TIWForm的Resize事件在服务器处理浏览器改变大小。
- 在线程中执行后台任务。
- 在IntraWeb应用程序中使用定时器。
- 使用只读、编辑、动态grids。
- 使用TIWTemplateProcessorHTML控件通过HTML模板/子模板控制窗体的版式。
- 使用TIWLayoutMgrHTML控件控制版式。
- 使用IntraWeb 控件的Anchors 属性控制版式。
- 使用TIWRegion控件控制版式。
- 使用客户端数据。
- 显示控制树型控件(TIWTreeView)
