| efwef_ererg
34440
|
2008/6/4 12:41:59 |
| 怎么装啊~~~我用的是 Delphi 2007 |
| jacksonhe702
34354
|
2008/5/30 17:40:17 |
修正TMS的TAdvOfficePager, TAdvOfficeTabSet, TAdvOfficeMDITabSet不兼容汉字问题
今天，偶然在使用TMS的TAdvOfficePager时发现在设置TAdvOfficePager的Page时，如果Page的Caption存在汉字，那么TAdvOfficePager在绘制Page的Caption时就会出现很多乱码。刚刚察看代码，发现是String和WideString的问题，String类型默认是单字节，而WideString是双字节的，那么在调用Length(Page.Caption)时就会产生字符串长度的问题。因此在AdvOfficePager,AdvOfficeTabSet单元中找到DrawVistaText函数，修正如下：
function DrawVistaText(Canvas: TCanvas; Alignment: TAlignment; r: TRect; FCaption:string; AFont: TFont; Enabled: Boolean; RealDraw: Boolean; AntiAlias: TAntiAlias; Direction: TTabPosition; Ellipsis: Boolean): TRect;
将Caption:String改为FCaption:String，然后在函数中新建一个变量“Caption:WideString”，最后在代码段的第一行加入：Caption:=FCaption；即可。
修正代码完全保证了源代码的兼容性，仅仅是在开始改变了Caption的类型。 |
| jhlz1968
33667
|
2008/4/12 6:49:11 |
| 我在D6 sp2装上了,但advStringGrid不能用,总提示有个属性不存在 |
| 2945ayun
33581
|
2008/4/7 9:59:56 |
| 怎么下载不了 |
| derec2004
33530
|
2008/4/1 17:38:56 |
| 这个是怎么安装的啊，怎么我安装上以后，用AdvToolBar控件，在其上添加不了按钮，你们有谁能添加的吗？右键菜单上根本就没有相关的菜单。郁闷死了。 |
| mbnet
33335
|
2008/3/17 19:55:38 |
| 请问在BDS2007下怎么安装？我安装时总是不成功，提示：[Pascal 致命错误] tmsd2007.dpk(161): E2202 Required package 'vcl' not found |
| lrok
33195
|
2008/3/6 10:19:44 |
| 相当不错啊，顶 |
| ffx132
33171
|
2008/3/3 14:24:46 |
| 请问，Help文件去哪里找呀？之前下载其他版本的都没有Help文件。 |
| 51sh
33165
|
2008/3/3 9:53:17 |
先下一个保留一下, 有源码.
没有用过,因此不知道是否全! |
| zhlmxh
33163
|
2008/3/3 0:59:08 |
| 好，谢谢！ |
