您好,欢迎来到站长目录(28sn.com)!


使用 IntraWeb (26) - 基本控件之 TIWMenu

来源:网络整理 浏览:253次 时间:2021-09-15
使用 IntraWeb (26) - 基本控件之 TIWMenu    


TIWMenu 的任务是让原来的 TMainMenu 呈现在网页上, 通过其 AttachedMenu 属性关联一个 TMainMenu 是必需的.



TIWMenu 所在单元及继承链:
IWCompMenu.TIWMenu < TIWCustomControl < TIWBaseHTMLControl < TIWBaseControl < TIWVCLBaseControl < TControl < TComponent < TPersistent < TObject

主要成员:


property TextOffset: Integer         //菜单文本偏移(只读)property AttachedMenu: TMainMenu     //指定要包装的 TMainMenuproperty ItemSpacing: TIWSpaceItems  //设置顶层菜单项间距: itsNone(默认)、itsEvenlySpaced(均匀分布)property AutoSize: TIWMenuAutoSize   //自动大小; 有三个枚举值可选property MainMenuStyle: TIWMenuStyle //主菜单样式, 包含十几个子选项包括 Cssproperty SubMenuStyle: TIWMenuStyle  //子菜单样式, 包含十几个子选项包括 Cssproperty Css: string                 //Css 比 MainMenuStyle.Css 高一个层级property SubMenuCss: string          //SubMenuCss 比 SubMenuStyle.Css 高一个层级property TimeOut: Integer //子菜单延迟时间


示例 1 - 任何避免被其他控件遮挡:


{设计时, 在空白窗体上放: 两个 IWRegion、一个 IWMenu、一个 MainMenu, 并给 MainMenu 随便添加些菜单}procedure TIWForm1.IWAppFormCreate(Sender: TObject);begin  IWMenu1.AttachedMenu := MainMenu1; //!  {把 IWmenu 放到一个容器中, 并设置容器的 ClipRegion := False 即可解决}  IWRegion1.Align := alTop;  IWRegion1.Height := IWMenu1.Height;  IWRegion1.ClipRegion := False; //!  IWMenu1.Parent := IWRegion1;  IWMenu1.Align := alClient;  IWRegion2.Color := $eeffff;  IWRegion2.Align := alClient;end;


效果图:



示例 2 - 纵向菜单:


{在上例的基础上, 改成纵向菜单, 并尝试(设计时)通过 TIWImageList 添加图标}procedure TIWForm1.IWAppFormCreate(Sender: TObject);begin  IWMenu1.AttachedMenu := MainMenu1;  IWMenu1.MainMenuStyle.Orientation := iwOVertical; //!  {把 IWmenu 放 IWRegion1 中, 并设置好 IWRegion1 的大小}  IWRegion1.SetBounds(4, 4, 60, 80);  IWRegion1.ClipRegion := False;  IWRegion1.BorderOptions.Style := cbsNone;  IWMenu1.Parent := IWRegion1;  IWMenu1.Align := alClient;  IWRegion2.Color := $eeffff;  IWRegion2.Align := alClient;end;


效果图:




推荐站点

  • 我爱发烧音乐我爱发烧音乐

    我爱发烧音乐囊括了从流行音乐到古典音乐多个类型的音乐作品,专栏推荐最新的音乐,提供音乐排名榜单!可供免费线上收听音乐,歌曲流畅,音效极佳! 网站提供的钢琴以及二胡专栏,可供收听者,陶冶情操,改善心情,是难得的轻音乐典藏!

    www.520fs.com
  • 世纪音乐网世纪音乐网

    世纪音乐网是专业的在线音乐试听MP3下载网站。歌曲总计30余万首,收录了网上最新歌曲和流行音乐,DJ舞曲,非主流音乐,经典老歌,劲舞团歌曲,搞笑歌曲,儿童歌曲,英文歌曲等。是您上网听歌的最佳网站。

    www.ssjj.com
  • 杭州网杭州网

      杭州网是杭州地区唯一的新闻门户网站,由中共杭州市委宣传部、杭州日报报业集团和杭州广播电视集团共同组建的杭州网络传媒有限公司运营。

    www.hangzhou.com.cn
  • 深圳在线深圳在线

      深圳在线 www.szol.net是深圳本地最大、最早的地方生活资讯网站之一,网站名“深圳在线www.szol.net”由南方报业传媒集团编辑委员会总编辑、南方日报社总编辑、南方都市报总编辑、南方书画院名誉院长王春芙亲笔题名,深圳在线www.szol.net团队与深圳热线www.szonline.net、奥一网www.oeeee.com都源于全国最早成立于1996年的知名网络公司——深圳万用网。

    www.szol.net
  • 今题网今题网

     今题网- 中国领先的社区服务网,提供社区服务, 在线交友和商家推广服务,于2004年创建上线,公司现有员工超过百名。今题网自成立以来,凭借其独特的定位和丰富的社区交友功能, 凭借其团队超强的搜索引擎优化技术吸引超过千万的用户成为今题网的注册会员。

    www.jinti.com

鄂公网安备 42062502000001号