文档章节

使用 IntraWeb (4) - 页面布局之 TIWRegion

涂孟超
 涂孟超
发布于 2014/09/26 15:38
字数 201
阅读 4
收藏 0

TIWRegion 是容器, 首先布局好它(们).

在空白窗体上添加 4 个 TIWRegion, 然后:
uses System.UITypes; //为使用 Anchors 属性

{下面代码中的设置大都可以在设计时完成}
procedure TIWForm1.IWAppFormCreate(Sender: TObject);
begin
  {把其它 3 个 IWRegion 都放在 IWRegion1 内}
  IWRegion2.Parent := IWRegion1;
  IWRegion3.Parent := IWRegion1;
  IWRegion4.Parent := IWRegion1;

  {设置 IWRegion1 的大小与位置}
  IWRegion1.Width := 600;
  IWRegion1.Height := Self.Height;
  IWRegion1.Top := 0;
  IWRegion1.Left := (ClientWidth - IWRegion1.Width) div 2;
  IWRegion1.Anchors := [akTop, akBottom]; //这是关键设置, 其实是 VCL 的老东西, 但对网页更重要一些

  {设置其它 3 个 IWRegion 的位置、大小与颜色}
  IWRegion2.Align := alTop;
  IWRegion3.Align := alLeft;
  IWRegion4.Align := alClient;

  IWRegion2.Height := 80;
  IWRegion3.Width := 120;

  IWRegion2.Color := clWebRED;
  IWRegion3.Color := clWebGOLD;
  IWRegion4.Color := clWebYELLOW;

  {让 IWRegion2 与 IWRegion3 之间有可以动态调整的分割线}
  IWRegion3.Splitter := True;
end;


效果图:


本文转载自:http://www.cnblogs.com/del/p/3766505.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
界面控件包TMS IntraWeb Component Pack Pro Script Edition发布v5.8.8.1

TMS IntraWeb Component Pack Pro Script Edition允许从Delphi IDE直接在IntraWeb表格上编辑设计期间的网页。IntraWeb的TMS控件允许以RAD方法用Delphi进行网页应用程序的开发。这使得网页开发...

Harriet666
2017/10/20
0
0
使用delphi 开发 web(一) webbroke 简介

从delphi 3 开始,就可以支持使用webbroke 技术开发基于web 服务器。当时主要是支持CGI和ISAPI. CGI 其实就是一个类似控制台的可执行程序,将其放入web 服务器的可执行目录,每次web 服务器调...

xalion
2012/01/04
0
0
V - Layout:淘宝、天猫都在用的Android UI框架 完全解析

前言 是阿里出品的基础 UI 框架,用于快速实现页面的复杂布局,在手机天猫 版 内广泛使用 电商图 让人激动的是,在上个月终于在Github上开源! Github - alibaba - vlayout Github 在五一假期...

Carson_Ho
2017/11/07
0
0
Bootstrap 3 How-To #3 布局

对于 Web 开发来说,一个永远的话题是如何创建一个跨浏览器兼容的布局。许多年来,各种框架使用各种技术来解决这个问题。Bootstrap 使用了一个不同的方式来解决这个问题。基于 960 像素的布局...

麦克风
2015/07/09
0
0
OpenCart布局(Layout)系统是如何工作的?

原文地址:http://www.opencartchina.com/bbs/topic706.html Q: 布局Layout系统在1.5.x版本中是如何工作的?能否如之前的1.4.x版本在所有页面显示相关模块,或者为特定的分类页面设定横幅广...

OpenCart中国
2013/10/22
1K
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

JS:异步 - 面试惨案

为什么会写这篇文章,很明显不符合我的性格的东西,原因是前段时间参与了一个面试,对于很多程序员来说,面试时候多么的鸦雀无声,事后心里就有多么的千军万马。去掉最开始毕业干了一年的Jav...

xmqywx
今天
0
0
Win10 64位系统,PHP 扩展 curl插件

执行:1. 拷贝php安装目录下,libeay32.dll、ssleay32.dll 、 libssh2.dll 到 C:\windows\system32 目录。2. 拷贝php/ext目录下, php_curl.dll 到 C:\windows\system32 目录; 3. p...

放飞E梦想O
今天
0
0
谈谈神秘的ES6——(五)解构赋值【对象篇】

上一节课我们了解了有关数组的解构赋值相关内容,这节课,我们接着,来讲讲对象的解构赋值。 解构不仅可以用于数组,还可以用于对象。 let { foo, bar } = { foo: "aaa", bar: "bbb" };fo...

JandenMa
今天
1
0
OSChina 周一乱弹 —— 有人要给本汪介绍妹子啦

Osc乱弹歌单(2018)请戳(这里) 【今日歌曲】 @莱布妮子 :分享水木年华的单曲《中学时代》@小小编辑 手机党少年们想听歌,请使劲儿戳(这里) @须臾时光:夏天还在做最后的挣扎,但是晚上...

小小编辑
今天
18
4
centos7安装redis及开机启动

配置编译环境: sudo yum install gcc-c++ 下载源码: wget http://download.redis.io/releases/redis-3.2.8.tar.gz 解压源码: tar -zxvf redis-3.2.8.tar.gz 进入到解压目录: cd redis-3......

hotsmile
今天
2
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部