说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB如何在VB和Delphi中快速实现立体化窗口显示

HTML文档下载 WORD文档下载 PDF文档下载
VB如何在VB和Delphi中快速实现立体化窗口显示
在VB和Delphi中,我们可以很方便地创建具有立体化观感的窗口,这也是近两年来,Win3.X中较为流行的显示方式。许多专业化的软件都采用了这种立体化的窗口和相应的控件,达到了赏心悦目的效果。下面我们来谈谈如何在目前最流行的两种Win编程语言中实现这样的效果。

其实,无论是VB还是Delphi,要实现这种效果都较为容易,在编程中,并不需要调用外部的DLL,在程序运行时,会自动调用CTL3dV2.dll。

我们先来看看如何在VB中实现:

1.新建一个窗口。

2.在窗口form的属性列表中有一项Auto3D属性,缺省值为false,将其设置为true。它是控制VB中是否显示立体窗口的重要属性。

3.在form的属性列表中还有一项BorderStyle属性,这是控制窗口的边框显示类型,将其设置为3-Fixed Double。

4.现在可以运行这个程序了,你将会看到立体窗口出现。

将Auto3D属性设置为true,还有一个很好的副作用,那就是在这个窗口上的Text、Frame、CheckBox、OptionButton和ListBox都自动具有了立体效果。

在Delphi中实现似乎显得更加容易和直观:

1.新建一个窗口。

2.在窗口form的属性列表中有一项BorderStyle属性,它的缺省值为bsSizeable,表示边界可以任意调整,将其重新设置为bsDialog。

3.运行程序,你会发现立体窗口出现了。(看来,Delphi中将这种立体化窗口称为“对话窗口”,确实如此,比如在Word中,对话窗口都是这种立体化的显示,而主窗口仍然是一般的风格。)

与VB中的Auto3D类似,在Delphi中有一个属性为Ctl3D,将其设置为true,将使所有在这个窗口上的控件具有立体观感,并且这种变化是立刻反映的,而不象VB中在运行时才能看到。

在Delphi的窗口form中,你还可以通过设置FormStyle属性为fsStayOntop来轻而易举的实现“永远浮在其他窗口”上的效果。著名的“译林”Win版本就是用Delphi写的,它其中就有一个“永远在最上面”的功能,就是这样实现的。
创业失败的七个原因及解决之道 集结号:最受开发者欢迎的跨平台游戏引擎 Cocos2d-x v3.0正式版本发布!优化C++、Lua、JavaScript接口 定价99元首发1万台 360安全路由器启动预约 AMD新产品线曝光 首次实现X86与ARM针脚融合 IT界最难以替代的9个角色 《近匠》英特尔® XDK:从开发、测试到部署,一站式HTML5开发工具 手游云测工具TestBird:测试走入垂直细分领域 阿里巴巴赴美IPO的种种及马云内部邮件全文 盘点EMC World 2014三大看点 2014年Q1:智能手机总销量下滑,WP同比反增119% 着眼无人驾驶技术 英特尔投资日本ZMP公司 移动云服务UCloud快速扩张 成立北京分公司 精准推送 个推推出2.0产品“Smart Push” 从张小龙的七大价值观说开去 2014高德LBS应用大赛正式启动 助力打造生态圈 专访永洪科技CEO何春涛:管理者的炼成及国内大数据公司的挑战 R语言如何发展?商业支持或许可行 专访InMobi CEO Naveen Tewari:Banner广告已经OUT 效力苹果18年的资深高管Katie Cotton将退休 主打“全、新、独、准”,华为推出游戏中心平台 阿里云计算出海挑战亚马逊 首站香港及东南亚 TIOBE 2014年5月编程语言排行榜:Adobe ActionScript挤进Top20 秒杀iPad Mini?微软或将下月发布Surface Mini 大道手游:详解应用内购买的定价趋势与技巧 与英特尔软硬合作,Cloudera将在中国建立业务机构 准备迎接第一个量子计算软件公司吧! 搜狗搜索发布新LOGO和移动App 正全面入驻腾讯各条产品线 做好扁平化设计-视觉篇 关于敏捷研发的跨界反思 《近匠》雨血,一个“独立游戏人”的反思 ●●∑∑●●∑∑测量窗体‰‰▲▲∑∑●●谢谢 VC的编译器到底怎么回事,老是说我少了分号。我都快气死了 棘手的问题! com高手请进!!!!急 硬盘分区 我的VB烦死了 请教一个关于数据库表格备份和bcp命令的问题,急!!! 请问学习JAVA语言用什么工具最小又最好?比如说学习C语言就用TC就OK了! 关于汉诺塔升级版。 急!为什么临时表空间总是不够? 如何判断一个线程已经处于死循环或不响应(即系统CPU占用率高达98%以上)?求助!!! 用CPictureEx类加载gif动画的疑难问题,给分50 请问各位高手,java项目经验主要包含什么东西? 如何判断一个线程已经处于死循环或不响应(即系统CPU占用率高达98%以上)?求助!!! 救我啊!想在局域网的网关机上监控其他机器发出的http请求 怎样快速选取checkbox 请问怎么把几个txt文件合并成一个文件,急!!!!在线等待 关于在广州建立《江西老乡在广州的备忘录》倡议书! 关于程序编译的问题!!!! cast问题 一个简单问题? 怎样删除多条记录,象邮件系统中的删除邮件的操作? Bof或Eof有一个为真,或者当前记录已被删除,请问MDAC2.5哪有下载? 请教:oracle 7.4.3 触发器的错误处理 .htm传递参数! 一个比较菜的问题,我的VB6中窗体的name属性没有,请问怎么加入. 简单sql语句求助!!! 如何在vc++中获得当前用户的用户名? 為什麼在我機器上建立與其他機器的oracle連接的bde出錯???連sql server都沒問題,破oracle真亂!!!!! 真气人 急,用TADOTable控件怎么对字段进行查询?请举例说明!谢谢! 用fireworks 4.0制作动画,请问怎么样用一张图片做背景? 在用VC调DLL时报错,error C2171: '*' : illegal on operands of type 'int (__stdcall *)(char *,char [])'怎么办? 一个打包的问题 在表格式的数据窗口中显示image的问题??欢迎讨论,拒绝灌水! 128MB内存跑BCB6好像有点那个? 请问有人知道哪儿有打印条码的源程序吗? 有关INSERT 插入数据到ACCESS 数据库,为什么出错,急,急,急,菜鸟请教,马上给分 vb.Net的较大的Project编译时,经常出现某些.resources文件找不到,为什么?气死人了! 我很菜,望高手帮忙! 小毛头毕业分在工程部,望个为师兄指点应该注意些什么? Java Applet 中变量的问题请教. 这儿看看! 请帮忙看看这是怎么回事? TRIGGER 请问热心人帮帮我这个热心的学生. 如何安装acm控件 到底应该先看VC++技术内姆还是先看MFC深入浅出? 请问如何使打开的窗口在屏幕正中间? 怎样产生一个全局唯一标识ID? 双套超级查询器!!!上传完毕!!! 【小石潭记】全文翻译与个别注释 “法布尔老人让我了解了昆虫世界,而昆虫则令我永远记住了法布尔老人”怎样理解这 有一个圆柱形的桶(有盖),它的底面积与侧面积正好相等,如果这个圆柱的底面积不变,高增加3厘米,它的表面积就增加113.04cm²,求原来圆柱体的表面积. 英语翻译小石潭记整篇翻译和字词翻译 一个圆柱铁桶高6.28分米,它的侧面展开后是一个正方形,这个圆柱的表面积是多少 有一个圆柱形的桶,它的底面积与侧面积相等,底面不变,高增加3厘米,表面积增加1130.4求它的面积. 曲线ρ=a^2cosθ所围成的图形的面积为 一堆西瓜一半的一半一半的一半,一半是几个西瓜? 教室前面的墙壁长6米宽3米,墙上有一块黑板面积是3平方米现在要粉刷这面墙壁要粉刷的面积是多少不用方程 印刷厂装订一批新书,计划每天装订25000册,3天可装订完..实际每天比计划多装订20%,这样多少天可以装订完 学校礼堂有8个圆柱形柱子,柱子的底面周长2.512米,柱子高5米,油漆这些柱子的表面,每立方米需油漆0.1千克,共需油漆多少千克?(得数保留一位小数) 一堆西瓜一半的一半一半比一半的一半少半个是多少个?提示(四个4) 红心印刷厂装订一批新书,原计划每天装订3500本,30天完成,结果提前5天完成,每天的工作效率提高了百分之几 求曲线r=1,r=2cosθ围城的公共部分图形的面积不化成直角坐标 直接用极坐标的定积分求怎么求? 进口红外夜视望远镜哪个品牌好,夜视清晰度高 有哪些英语的用法? 某大礼堂有6根圆柱形柱子,每根柱子高10米,周长2.512米,要全部涂上油漆,如果按每平方米的油漆费为70元 英语翻译小石潭记 注释 翻译 段意 总结 练习记承天寺夜游和治水必躬亲 建造一个容积为16立方米,深为4米得长方体无盖水池,如果池底的造价为每平方米110元建造一个容积为16立方米,深为4米得长方体无盖水池,如果池底的造价为每平方米110元,池壁的造价为每平方 一种饮料是由果汁与水按1:7的质量比调制而成的.5.6kg的饮料中,含果汁和水各多少千克?急急急!快点啊急用! 一个圆柱形铁桶的侧面积是50.24平方厘米,高和底面半径相等,这个铁桶的表面积是多少? “果汁的质量是牛奶质量的4分之3,牛奶重240克.”在前面的描述中,()是单位“1”,求果汁的质量也就是求()克的()分之()是多少,算式是().只说算式就OK了 学校大礼堂有四根长方形的水泥柱,已知底面边长是0.5米的正方形,水泥柱高6米若在柱子的四周贴上边长为0.25米的正方形瓷砖,贴这四根柱子至少要多少块瓷砖?3点钟之前一定要有答案哦! 一个空瓶的质量为0.5千克,装满水后总质量为1.3千克,装满某种油后总质量为1.14千克求这种油的密度 果汁的质量是牛奶质量的4分之3,牛奶重240克.在前面的描述中,()是单位“1”,求果汁的质量也就是求()“果汁的质量是牛奶质量的4分之3,牛奶重240克.”在前面的描述中,()是单位“1”, 一个展览厅中间有4根柱子,底边长5dm,高6米的正方体,要给这些柱子漆油漆,漆油漆的表面积是多少平方米 什么是判别钢材塑性变形能力和钢材质量的综合指标 某工厂建造一无盖长方体贮水池,其容器为4800m3深度为3米,池底每1m3造价150元,池壁每1m3造价120元,问怎问怎样才能设计水池使造价最低,最低总造价为? 好听的诗额..做了5个玩意..我想每个用一句诗贴上..最好来首正好是5句话的古诗..或者5句好听的古诗... 一个空瓶,质量是0.5千克,装满水后的总质量为1.30签个,装满某种液体后的总质量是1.14千克,则这种液体密 建筑一个容积为8000立方米,深为6米的长方体贮水池,池壁每平方米的造价为a元,池底每平方米的造价为2a元,把总价y元表示为底的一边长x米的函数,求函数解析式,指出定义域 小石潭记原文+注释+翻译 求比较好听的词语,比如无极,苍穹…并注上意思, 建造一个长方体无盖贮水池,其容积为4800m∧3,深为3m,如果池底与池壁每1m∧2的造价分别为150元与120元,问水池底面的边长分别为多少时,建水池的造价最低,最低价是多少 小石潭记原文译文注释 有什么好听的词语 r=acosθ 和r=asinθ(a>0) 所围图形的公共部分的面积.标答是a^2(π-2)/8.怎么算?此为高等数学定积分应用的题目.我对极坐标很糊涂的~ 有一个圆柱形油桶(有盖),它的底面积与侧面积正好相等,如果底面积不变高增加3厘米他的表面积就增加1130.4平方厘米,求这个圆柱的表面积. 好听的句子!要女生的、、、不要太伤感、、、带些符号更好、、、、 求椭圆x=acosθ,y=asinθ所围成图形的面积A 有没有好听优美的诗歌要新 求一句好听的句子求 求由x=acos^2t,y=asin^2t所围成的图形的面积 学校连接教学楼之间的走廊中有16根混譺土,高6米,底面直径6分米.给这些柱子刷上油漆,油漆面的面积是()平方米.如果每千克油漆可以粉刷4平方米,一共需要油漆()千克 一篇电脑的自述的作文,最好要有拟人手法,急. 脑筋急转弯一堆西瓜一半的一半的一半,比一半的一半少半个西瓜,这堆西瓜多少个?提示4个4 给一个底面直径为2米,高为15分米的圆柱形柱子上油漆,油漆面积是多少平方米 抽捡两箱饮料 每箱24瓶 其中有2瓶不合格 这些饮料的合格率是多少 一堆西瓜,一半的一半一半的比一半的一半少半个,这堆西瓜有多少个?(脑筋急转弯及生肖)生肖后面或前面是加什么字比较合适?如(呗、了、是、啦、哦) 小石潭记(原文+译文) 工商部门抽查酱油的产品质量,共抽查了120箱,合格率为百分之95.有多少箱不合格? 一堆西瓜,一半的一半的一半的一半少半个,请问这堆西瓜有多少个?脑筋急转弯 大厅内有5根底面直径是0.8米,高是12米得圆柱形柱子,要给它们涂油漆,涂油漆的面积是多少平方米?最晚13:00之前给我啊!小妹在此谢过各位英雄好汉了啊! 廷可以加那些部首呢?并组词 一个西瓜切三刀,最少分几块?不是脑筋急转弯RT练习册答案是写3块,我没想出来为什么 是最少!大家注意阿…… 英语翻译如鸣佩环怎么翻译?作者是谁?哪代的? 英语作文,一位外国朋友到你家做客,请你选择一周内的任意一天介绍你的学校生活.可适当发挥 60字左右如文中须提到姓名,可自拟一个英文名字 小石潭记翻译和讲解 {小石潭记}中的为翻译成啥?急 怎么写关于朋友一天生活的英语作文100字
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘