Board logo

Subject: 如何写脚本增大D2010编辑器tabs的字体? [Print This Page]

Author: edwinyeah    Time: 2011-11-16 15:48     Subject: 如何写脚本增大D2010编辑器tabs的字体?

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

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

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

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

后悔买22‘显示器。。。
Author: Passion    Time: 2011-11-16 17:47

试一试定义一个:
TControlHack = class(TControl);

然后TControlHack(TabControl).Font看看行不?
Author: edwinyeah    Time: 2011-11-16 21:12

我没弄成功。。。我的代码:

program EditorTab;

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

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

var
略。。。。。
Author: Passion    Time: 2011-11-17 20:41

麻烦,看来脚本语法还比较不兼容。
Author: edwinyeah    Time: 2011-11-23 13:52

如果自己写一个 IDE EXPERT解决,应该如何做?主要用到哪个接口?谢谢。
Author: edwinyeah    Time: 2011-11-24 10:51

问题解决了,基于这个开源的 IDE EXPERT改的:http://code.google.com/p/delphi-ide-colorizer/

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




Welcome to CnPack Forum (http://bbs.cnpack.org/) Powered by Discuz! 5.0.0