Delphi默认窗体随想
Delphi中新建一个Form或者Frame时,它的字体都是西文习惯,这样就有可能造成在其他机器上由于字体的原因,窗体十分不美观.怎样才能为Delphi设置一个默认窗体,让它的字体Font符合中国习惯呢,而不用新建时再手工去修改窗体的Font,下面就是解决这个问题的方法.并且随之引出了Delphi的一个非常好的功能:
1.新建窗体符合中国字体习惯
(1)一定要将窗体的Font属性修改为:
(字体) 宋体,
(大小) 9号(也就是小五),
(字符集) CHINESE_GB2312
以符合中国的字体习惯.(默认是西体)
(2)如果不想让程序自动创建该窗体,一定要在工程单元文件中删除与该窗体有关的CreateForm(...)语句;
(3)下面是改变默认窗体的步骤:
<1>. 自行设计窗体,其Font属性设置为以上说明的符合中国习惯的字体,如取名FormForChina
<2>. 把鼠标移到设计好的窗体上,按下右键选择[Add To Respository]功能选项,将窗体加到Forms页标签内,最后点击[OK]按钮
<3>. 接着选择[Tools]->[Respository]功能,点选Forms页标签上的FormForChina,然后再圈选下面的[New Form],[Main Form]选项,最后点击[OK]按钮,这样,再新建一个工程或者窗体时, 新窗体将和FormForChina保持一致.
<注>.这时新建一个Frame时,将不能正常创建,新建的也同样是窗体.所以你可以以同样的方式保存一个FrameForChina到Respository中,当想新建一个Frame时,可以选择[文件]->[新建]->
[other]->[Forms]->[FrameForChina],这样就可以满足自己创建的Form和Frame都是符合中国字体习惯的窗体对象.
2.对象库(Object Respository)
(1)Delphi提供了一种可以在工程之间共享对象的功能,对象库(ObjectRespository)就是负责这项功能的机制.你可以将开发完成的窗体
(Form), 对话框窗口(Dialog),数据模块(Data Module),工程(Project)保存到对象库内,然后让其他的工程或者开发者能够共享,复制,继承上述的对象,达到对象复用的目的,大幅度缩短 你开发及维护工程系统的时间.
(2)如何将对象加入对象库,请参看7.节说明.这里要说明的是在对象库中可以定义自己的页用来放置自己的对象,可通过[Tools]->[Repository]弹出的对象库编辑器来完成.
(3)在用户自定义页标签内,下面的三种对象去用方式,都可以使用.
<1>复制(Copy):
该方式是一种单纯的去用方式,对象库辉直接复制一份一摸一样的对象到工程内,文件所属路径和工程相同.
<2>继承(Inherit):
该方式对象库将会把对象库中对象和一个子对象都加入到工程内,父对象仍然是放在对象库的路径下的那个对象,子对象放在工程路径下.
<3>使用(Use):
不会使用任何复制对象的操作,加入工程内的对象就是对象库的那个对象,如果你在工程中直接修改该对象,那么对象库中的该对象也将改变.
(4)多人组合开发环境共享对象库网络设置
<1>首先找出DELPHI32.DRO文件放在哪(一般默认位置是/borland/delphi7/bin/delphi32.dro),这个文件就是对象库的设置文件.
<2>将该文件复制到网络路径下,这个目录最好是预备用来放置对象库内的对象.
<3>然后选择主菜单[Tools]->[Environment Options],在Preferences页标签下有一个名为Shared Repository的参数设置,请输入你刚才放置对象库文件的网络路径,再点击[OK]
注:请使用路径UNC标准,即使用相对路径.
http://blog.csdn.net/shuaihj/article/details/159487
Delphi默认窗体随想的更多相关文章
- delphi实现窗体闪烁功能
delphi实现窗体闪烁功能 以前做窗口闪动时都没有考虑到让任务栏上的按钮闪动的问题, 现在一个客户需要任务栏按钮闪动,发现以前使用的flashwindow不能达到要求了, 查找了一下,找到flash ...
- Delphi中窗体的事件
Delphi中窗体的事件 Form窗体可以响应各种各样的时间,在Object Inspector的Events页面中罗列了一大堆,如下图: 下面将要列出一些常用的事件. 1.OnActivate 当窗 ...
- delphi 不规则窗体与桌面宠物
二.支持区域操作的编程接口在Windows的API函数中有一组用于区域操作的函数,可以用来生成区域.合并区域.获取区域数据.根据数据生成区域.把区域和窗体联系等,其中常用的几个函数有:生成矩形区域的C ...
- Delphi打开窗体时报"Corrupt Portfolio Stream"
今天在打开一个Delphi窗体时报了这么一个错误: Corrupt Portfolio Stream 查了一下,主要是由于Delphi窗体的*.ddp文件损坏引起的. 解决方法: 删除.ddp 文 ...
- Delphi:窗体自适应屏幕分辨率的改进
在窗体依据屏幕分辨率自适应调整尺度方面,昨天的工作可以说是一个突破点.昨天的工作找到了长期以来我的原有方案的问题所在,这是非常关键的.但是昨天晚上的解决方案并不完美,今天的这个才是比较完美的解决版. ...
- delphi模态窗体最小化会隐藏的问题
在使用delphi创建模态窗体的时候最小化窗体会导致最小化的窗体不可见,再次点击主窗体才会显示. 在这个模态窗体中增加以下函数 procedure WmSysCommand(var msg: TMes ...
- Delphi 模式窗体返回值ModalResult的使用方法及注意事项(转)
1.基础知识简介: ModalResult是指一个模式窗体(form.showmodal)的返回值,一般用于相应窗体上按钮的ModalResult属性: 显示完窗体(关闭)后,会返回此属性预设的值做为 ...
- Delphi 模式窗体返回值ModalResult的使用方法及注意事项
1.基础知识简介: ModalResult是指一个模式窗体(form.showmodal)的返回值,一般用于相应窗体上按钮的ModalResult属性: 显示完窗体(关闭)后,会返回此属性预设的值做为 ...
- Delphi 使窗体Showmodal后可以操作其他窗体
对话框ShowModal之后不能操作其它窗口,实际上是因为Windows Disable了其它窗口.所以当你需要在模态对话框中访问其它已经可见的窗口时,需要用EnableWindow API来激活对应 ...
随机推荐
- [转]svn提交自动同步到web服务器
参考博文:http://my.oschina.net/wddqing/blog/201567 同步程序思路:用户提交程序到SVN,SVN触发hooks,按不同的hooks进行处理,这里用到的是post ...
- python中eval, exec, execfile,和compile [转载]
eval(str [,globals [,locals ]])函数将字符串str当成有效Python表达式来求值,并返回计算结果. 同样地, exec语句将字符串str当成有效Python代码来执行. ...
- Thread.sleep还是TimeUnit.SECONDS.sleep
转http://stevex.blog.51cto.com/4300375/1285767/ 刚看到TimeUnit.SECONDS.sleep()方法时觉得挺奇怪的,这里怎么也提供sleep方法? ...
- Multiple bindings were found on the class path(转)
Multiple bindings were found on the class path SLF4J API is designed to bind with one and only one u ...
- Login oracle for external authenticate
Generally, we can login the oracle by os authentication, if we login os in a remote machine and make ...
- 安卓开发06:布局-线性布局 LinearLayout
LinearLayout把视图组织成一行或一列.子视图能被安排成垂直的或水平的.线性布局是非常常用的一种布局方式. 请看一个布局例子: <LinearLayout xmlns:android=& ...
- Cocos2d-x 3.2 大富翁游戏项目开发-第七部分 获取角色路径_3
点击下载代码 http://download.csdn.net/detail/lideguo1979/8291803 新建一个类RouteNavigation,定义getPath()方法.用来获取 ...
- linux命令:find
先上例子: find ./*_src -type f | xargs grep -ils "date" 在指定的那些文件夹下面,递归寻找包含“date” 字符串的普通文件. fin ...
- html5 canvas 实现一个简单的叮当猫头部
原文:html5 canvas 实现一个简单的叮当猫头部 html5的canvas是很强大的,今天也是温习了一下之前的基础知识,然后学着做了一个简单的小案例.虽然在这一块几乎空白,但还是乐于尝试... ...
- perl post发送json数据
sub wx_init { #$login_url ="https://wx.qq.com/cgi-bin/mmwebwx-bin/webwxinit?r=- ...