使用 IntraWeb (10)
来源:互联网 发布:loop在c语言 编辑:程序博客网 时间:2024/06/10 03:59
转自http://www.cnblogs.com/del/p/3778833.html
IW 会把大多数的视觉属性转换为 CSS; 我们主动使用 CSS 要分两步:
第一步:
{通过窗体的 StyleSheet 属性指定要链接的 CSS 文件}procedure TIWForm1.IWAppFormCreate(Sender: TObject);begin StyleSheet.Filename := 'MyCss1.css'; //CSS 文件须放在 wwwroot 下// StyleSheet.URL := 'http://...'; //外链end;{假如站点级的 CSS ... TIWServerController.OnCreate}procedure TIWServerController.IWServerControllerBaseCreate(Sender: TObject);begin StyleSheet.Filename := 'MyCss1.css'; //CSS 文件须放在 wwwroot 下// StyleSheet.URL := 'http://...'; //外链end;
第二步:
{为要使用样式的控件指定 Css 属性}procedure TIWForm1.IWAppFormCreate(Sender: TObject);begin StyleSheet.Filename := 'MyCss1.css'; IWMemo1.Css := 'Class1'; //假如 MyCss1.css 中有个 Class1 的类, 如: .Class {font-size: 32px; } IWMemo1.StyleRenderOptions.RenderFont := False; //一般情况下, 还需要同时调整下 StyleRenderOptions 属性end;{------------------------------------------------------------------关于 StyleRenderOptions 属性: 如果我们给控件使用了 CSS, 就有可能和控件本身的属性发生冲突, 用哪一个呢? 这需要控件的 StyleRenderOptions 属性来决定!它也是个类(IWTypes.TIWStyleRenderOptions < TPersistent < TObject), 该类只有几个布尔属性:property RenderSize: Boolean //property RenderPosition: Boolean //property RenderFont: Boolean //property RenderZIndex: Boolean //property RenderVisibility: Boolean //property RenderStatus: Boolean //Enabledproperty RenderPadding: Boolean //property RenderBorder: Boolean //property RenderAbsolute: Boolean //property UseDisplay: Boolean //当对应值为 False 时才可以使用相应的 CSS.-------------------------------------------------------------------}
CSS 的诸多操作类似与 JavaScript, 譬如:
procedure TIWForm1.IWAppFormCreate(Sender: TObject);begin IWServerController.HTMLHeaders('<link type="text/css" rel="stylesheet" href="MyCss1.css"/>'); Self.PreHeader.Add('<link type="text/css" rel="stylesheet" href="MyCss2.css"/>'); Self.ExtraHeader.Add('<link type="text/css" rel="stylesheet" href="MyCss3.css"/>'); IWServerController.ContentFiles.Add('MyCss4.css'); Self.ContentFiles.Add('MyCss5.css');end;
有没有可能直接在代码中写入 CSS 呢?
{使用 ExtraTagParams 属性}IWLabel1.ExtraTagParams.Add('style = color: #f00; font-size:22px;');{使用 OnHTMLTag 事件, 需要 uses IWHTMLTag}procedure TIWForm1.IWLabel1HTMLTag(ASender: TObject; ATag: TIWHTMLTag);begin ATag.AddStringParam('style', 'color: #f00; font-size:22px;');end;
阅读全文
0 0
- 使用 IntraWeb (10)
- 使用 IntraWeb (45) - 活用 IntraWeb
- IntraWeb使用技巧集
- IntraWeb
- 使用IntraWeb进行Web编程
- 使用IntraWeb进行Web编程
- 使用IntraWeb进行Web编程
- 在IntraWeb中使用模板
- 使用IntraWeb进行Web编程(二)
- 使用IntraWeb进行Web编程(二)
- 学习intraweb
- intraweb 破解
- 使用delphi+intraweb进行微信开发2—intraweb以.net方式发布(以asp.net mvc4模式部署)在IIS(.net虚拟主机)上
- 使用delphi+intraweb进行微信开发1--微信平台接入
- 使用delphi+intraweb进行微信开发3—微信消息处理
- 使用delphi+intraweb进行微信开发4—微信消息加解密
- 使用delphi+intraweb进行微信开发1~4代码示例
- .NET、C#和ASP.NET三者之间的区别 使用 IntraWeb (9) - JavaScript
- C++ 模板模板参数
- innerHTML和innerText区别
- C语言中字符串处理函数
- Hibernate——clear()方法清除缓存
- Java实现-主元素1
- 使用 IntraWeb (10)
- 整理java7中几种常见同步辅助类-信号量
- PAT乙级 1010. 一元多项式求导 (25)
- one-hot representation与distributed representation学习笔记
- Java实现-主元素2
- Electron给index.html添加桌面APP外壳
- 第五天java学习笔记md
- ehcache与spring,mybatis整合
- 关于new和delete