CnPack Forum


 
Subject: 如何写脚本增大D2010编辑器tabs的字体?
edwinyeah
灌水司司长
Rank: 6Rank: 6



UID 40580
Digest Posts 0
Credits 343
Posts 129
点点分 343
Reading Access 10
Registered 2008-6-18
Status Offline
Post at 2011-11-16 15:48  Profile | Blog | P.M. 
如何写脚本增大D2010编辑器tabs的字体?

object inspector字体太小的问题解决,但是还有一个地方字体太小,眼睛真痛。。。

就是编辑器的tabs的字体,该控件的class name是 TIDEGradientTabSet.

我根据 EditorTab.pas 修改,在后面直接设置
TabControl.Font,编译脚本报 'font未定义’ 错误。

有没有办法?能否直接给TControl加一个 Font属性,我试过了修改PSDecl\controls.pas里面的 TControl定义,但是不行。。。。

后悔买22‘显示器。。。
Top
Passion (LiuXiao)
管理员
Rank: 9Rank: 9Rank: 9


UID 359
Digest Posts 19
Credits 6750
Posts 3551
点点分 6750
Reading Access 102
Registered 2004-3-28
Status Offline
Post at 2011-11-16 17:47  Profile | Blog | P.M. 
试一试定义一个:
TControlHack = class(TControl);

然后TControlHack(TabControl).Font看看行不?
Top
edwinyeah
灌水司司长
Rank: 6Rank: 6



UID 40580
Digest Posts 0
Credits 343
Posts 129
点点分 343
Reading Access 10
Registered 2008-6-18
Status Offline
Post at 2011-11-16 21:12  Profile | Blog | P.M. 
我没弄成功。。。我的代码:

program EditorTab;

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs
  ,ComCtrls, ExtCtrls;

type
  TControlHack = class(TControl); //这里报 identifier expected...

var
略。。。。。
Top
Passion (LiuXiao)
管理员
Rank: 9Rank: 9Rank: 9


UID 359
Digest Posts 19
Credits 6750
Posts 3551
点点分 6750
Reading Access 102
Registered 2004-3-28
Status Offline
Post at 2011-11-17 20:41  Profile | Blog | P.M. 
麻烦,看来脚本语法还比较不兼容。
Top
edwinyeah
灌水司司长
Rank: 6Rank: 6



UID 40580
Digest Posts 0
Credits 343
Posts 129
点点分 343
Reading Access 10
Registered 2008-6-18
Status Offline
Post at 2011-11-23 13:52  Profile | Blog | P.M. 
如果自己写一个 IDE EXPERT解决,应该如何做?主要用到哪个接口?谢谢。
Top
edwinyeah
灌水司司长
Rank: 6Rank: 6



UID 40580
Digest Posts 0
Credits 343
Posts 129
点点分 343
Reading Access 10
Registered 2008-6-18
Status Offline
Post at 2011-11-24 10:51  Profile | Blog | P.M. 
问题解决了,基于这个开源的 IDE EXPERT改的:http://code.google.com/p/delphi-ide-colorizer/

具体在 uColorizerUtils单元里面的ProcessComponent函数,在源码里面搜索TIDEGradientTabSet.
Top
 




All times are GMT++8, the time now is 2024-2-23 15:13

    本论坛支付平台由支付宝提供
携手打造安全诚信的交易社区 Powered by Discuz! 5.0.0  © 2001-2006 Comsenz Inc.
Processed in 0.007547 second(s), 9 queries , Gzip enabled

Clear Cookies - Contact Us - CnPack Website - Archiver - WAP