在D7下模拟出D2007 IDE的行号显示

修改了cnwizards\Source\SrcEditorEnhance\CnSrcEditorGutter.pas 346行
自娱自乐:lol:
        
        if ((Idx = 1) or (Idx mod 10 = 0) or (Idx = FPosInfo.LineCount)) then
          DrawText(Canvas.Handle, PChar(StrNum), Length(StrNum), R, DT_VCENTER or DT_RIGHT)
        else if (Idx mod 5 = 0) then
          DrawText(Canvas.Handle, PChar('--' + #0 ), 2, R, DT_VCENTER or DT_RIGHT)
        else
          DrawText(Canvas.Handle, PChar('-' + #0 ), 1, R, DT_VCENTER or DT_RIGHT)

[[i] 本帖最后由 chengyu.wang 于 2010-10-10 14:34 编辑 [/i]]

:handshake ，有点意思。

:P 可以考虑增加成选项。

:Q :Q 折叠呀，折叠呀，好想要折叠呀，最好能把任意的begin～end折叠呀