synhighlighterdot.pas

一个mwEdit控件原码,比mwCuuEdit0.92a功能先进.

function TSynDOTSyn.Func14: TtkTokenKind;
begin
  if KeyComp('n') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func17: TtkTokenKind;
begin
  if KeyComp('back') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func19: TtkTokenKind;
begin
  if KeyComp('egg') then Result := tkShape else
    if KeyComp('s') then Result := tkValue else
      if KeyComp('ne') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func21: TtkTokenKind;
begin
  if KeyComp('edge') then Result := tkKey else Result := tkIdentifier;
end;

function TSynDOTSyn.Func23: TtkTokenKind;
begin
  if KeyComp('w') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func24: TtkTokenKind;
begin
  if KeyComp('se') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func25: TtkTokenKind;
begin
  if KeyComp('all') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func26: TtkTokenKind;
begin
  if KeyComp('z') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func29: TtkTokenKind;
begin
  if KeyComp('page') then Result := tkAttribute else
    if KeyComp('page') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func30: TtkTokenKind;
begin
  if KeyComp('lhead') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func31: TtkTokenKind;
begin
  if KeyComp('dir') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func32: TtkTokenKind;
begin
  if KeyComp('label') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func33: TtkTokenKind;
begin
  if KeyComp('bold') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func36: TtkTokenKind;
begin
  if KeyComp('min') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func37: TtkTokenKind;
begin
  if KeyComp('nw') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func38: TtkTokenKind;
begin
  if KeyComp('max') then Result := tkValue else
    if KeyComp('same') then Result := tkValue else
      if KeyComp('node') then Result := tkKey else Result := tkIdentifier;
end;

function TSynDOTSyn.Func39: TtkTokenKind;
begin
  if KeyComp('dot') then Result := tkArrowHead else
    if KeyComp('fill') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func41: TtkTokenKind;
begin
  if KeyComp('box') then Result := tkShape else Result := tkIdentifier;
end;

function TSynDOTSyn.Func42: TtkTokenKind;
begin
  if KeyComp('sw') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func43: TtkTokenKind;
begin
  if KeyComp('false') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func44: TtkTokenKind;
begin
  if KeyComp('rank') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func45: TtkTokenKind;
begin
  if KeyComp('both') then Result := tkValue else
    if KeyComp('inv') then Result := tkArrowHead else Result := tkIdentifier;
end;

function TSynDOTSyn.Func48: TtkTokenKind;
begin
  if KeyComp('none') then Result := tkValue else
    if KeyComp('filled') then Result := tkValue else
      if KeyComp('filled') then Result := tkAttribute else
        if KeyComp('none') then Result := tkArrowHead else Result := tkIdentifier;
end;

function TSynDOTSyn.Func49: TtkTokenKind;
begin
  if KeyComp('shape') then Result := tkAttribute else
    if KeyComp('global') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func50: TtkTokenKind;
begin
  if KeyComp('when') then Result := tkAttribute else
    if KeyComp('when') then Result := tkAttribute else
      if KeyComp('graph') then Result := tkKey else
        if KeyComp('headlabel') then Result := tkAttribute else
          if KeyComp('circle') then Result := tkShape else Result := tkIdentifier;
end;

function TSynDOTSyn.Func51: TtkTokenKind;
begin
  if KeyComp('url') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func52: TtkTokenKind;
begin
  if KeyComp('merged') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func53: TtkTokenKind;
begin
  if KeyComp('sink') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func54: TtkTokenKind;
begin
  if KeyComp('ltail') then Result := tkAttribute else
    if KeyComp('odot') then Result := tkArrowHead else Result := tkIdentifier;
end;

function TSynDOTSyn.Func56: TtkTokenKind;
begin
  if KeyComp('samehead') then Result := tkAttribute else
    if KeyComp('sides') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func57: TtkTokenKind;
begin
  if KeyComp('height') then Result := tkAttribute else
    if KeyComp('auto') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func58: TtkTokenKind;
begin
  if KeyComp('skew') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func59: TtkTokenKind;
begin
  if KeyComp('size') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func60: TtkTokenKind;
begin
  if KeyComp('pagedir') then Result := tkAttribute else
    if KeyComp('diamond') then Result := tkShape else Result := tkIdentifier;
end;

function TSynDOTSyn.Func61: TtkTokenKind;
begin
  if KeyComp('layer') then Result := tkAttribute else
    if KeyComp('layer') then Result := tkKey else Result := tkIdentifier;
end;

function TSynDOTSyn.Func62: TtkTokenKind;
begin
  if KeyComp('labelloc') then Result := tkAttribute else
    if KeyComp('margin') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func63: TtkTokenKind;
begin
  if KeyComp('color') then Result := tkAttribute else
    if KeyComp('ratio') then Result := tkAttribute else
      if KeyComp('record') then Result := tkShape else
        if KeyComp('mcircle') then Result := tkShape else
          if KeyComp('digraph') then Result := tkKey else Result := tkIdentifier;
end;

function TSynDOTSyn.Func64: TtkTokenKind;
begin
  if KeyComp('width') then Result := tkAttribute else
    if KeyComp('onto') then Result := tkAttribute else
      if KeyComp('true') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func65: TtkTokenKind;
begin
  if KeyComp('center') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func67: TtkTokenKind;
begin
  if KeyComp('minlen') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func68: TtkTokenKind;
begin
  if KeyComp('house') then Result := tkShape else
    if KeyComp('dotted') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func69: TtkTokenKind;
begin
  if KeyComp('headURL') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func71: TtkTokenKind;
begin
  if KeyComp('labelangle') then Result := tkAttribute else
    if KeyComp('decorate') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func72: TtkTokenKind;
begin
  if KeyComp('weight') then Result := tkAttribute else
    if KeyComp('bgcolor') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func73: TtkTokenKind;
begin
  if KeyComp('mdiamond') then Result := tkShape else
    if KeyComp('normal') then Result := tkArrowHead else Result := tkIdentifier;
end;

function TSynDOTSyn.Func74: TtkTokenKind;
begin
  if KeyComp('point') then Result := tkShape else
    if KeyComp('taillabel') then Result := tkAttribute else
      if KeyComp('hexagon') then Result := tkShape else Result := tkIdentifier;
end;

function TSynDOTSyn.Func75: TtkTokenKind;
begin
  if KeyComp('octagon') then Result := tkShape else
    if KeyComp('rankdir') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func76: TtkTokenKind;
begin
  if KeyComp('mrecord') then Result := tkShape else Result := tkIdentifier;
end;

function TSynDOTSyn.Func77: TtkTokenKind;
begin
  if KeyComp('group') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func78: TtkTokenKind;
begin
  if KeyComp('ellipse') then Result := tkShape else
    if KeyComp('nodesep') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func79: TtkTokenKind;
begin
  if KeyComp('mclimit') then Result := tkAttribute else
    if KeyComp('rotate') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func80: TtkTokenKind;
begin
  if KeyComp('layers') then Result := tkAttribute else
    if KeyComp('layers') then Result := tkKey else
      if KeyComp('sametail') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func81: TtkTokenKind;
begin
  if KeyComp('shapefile') then Result := tkAttribute else
    if KeyComp('style') then Result := tkAttribute else
      if KeyComp('source') then Result := tkValue else Result := tkIdentifier;
end;

function TSynDOTSyn.Func82: TtkTokenKind;
begin
  if KeyComp('regular') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func83: TtkTokenKind;
begin
  if KeyComp('comment') then Result := tkAttribute else
    if KeyComp('toplabel') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func84: TtkTokenKind;
begin
  if KeyComp('ranksep') then Result := tkAttribute else
    if KeyComp('invdot') then Result := tkArrowHead else Result := tkIdentifier;
end;

function TSynDOTSyn.Func85: TtkTokenKind;
begin
  if KeyComp('forward') then Result := tkValue else
    if KeyComp('section') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func86: TtkTokenKind;
begin
  if KeyComp('triangle') then Result := tkShape else
    if KeyComp('labelfloat') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func87: TtkTokenKind;
begin
  if KeyComp('headport') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func88: TtkTokenKind;
begin
  if KeyComp('fontname') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func89: TtkTokenKind;
begin
  if KeyComp('strict') then Result := tkKey else
    if KeyComp('appendix') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func90: TtkTokenKind;
begin
  if KeyComp('ordering') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func92: TtkTokenKind;
begin
  if KeyComp('minimum') then Result := tkAttribute else
    if KeyComp('subgraph') then Result := tkKey else Result := tkIdentifier;
end;

function TSynDOTSyn.Func93: TtkTokenKind;
begin
  if KeyComp('tailURL') then Result := tkAttribute else
    if KeyComp('arrowhead') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func94: TtkTokenKind;
begin
  if KeyComp('msquare') then Result := tkShape else Result := tkIdentifier;
end;

function TSynDOTSyn.Func96: TtkTokenKind;
begin
  if KeyComp('nslimit') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func99: TtkTokenKind;
begin
  if KeyComp('invodot') then Result := tkArrowHead else Result := tkIdentifier;
end;

function TSynDOTSyn.Func100: TtkTokenKind;
begin
  if KeyComp('fontpath') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func101: TtkTokenKind;
begin
  if KeyComp('compound') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func102: TtkTokenKind;
begin
  if KeyComp('fillcolor') then Result := tkAttribute else
    if KeyComp('labeljust') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func104: TtkTokenKind;
begin
  if KeyComp('polygon') then Result := tkShape else Result := tkIdentifier;
end;

function TSynDOTSyn.Func107: TtkTokenKind;
begin
  if KeyComp('quantum') then Result := tkAttribute else
    if KeyComp('fixedsize') then Result := tkAttribute else
      if KeyComp('labeldistance') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func109: TtkTokenKind;
begin
  if KeyComp('doublecircle') then Result := tkShape else Result := tkIdentifier;
end;

function TSynDOTSyn.Func111: TtkTokenKind;
begin
  if KeyComp('tailport') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func113: TtkTokenKind;
begin
  if KeyComp('searchsize') then Result := tkAttribute else
    if KeyComp('invhouse') then Result := tkShape else Result := tkIdentifier;
end;

function TSynDOTSyn.Func114: TtkTokenKind;
begin
  if KeyComp('fontsize') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func117: TtkTokenKind;
begin
  if KeyComp('arrowtail') then Result := tkAttribute else
    if KeyComp('bottomlabel') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func118: TtkTokenKind;
begin
  if KeyComp('concentrate') then Result := tkAttribute else
    if KeyComp('fontcolor') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func120: TtkTokenKind;
begin
  if KeyComp('labelfontname') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func121: TtkTokenKind;
begin
  if KeyComp('plaintext') then Result := tkShape else Result := tkIdentifier;
end;

function TSynDOTSyn.Func127: TtkTokenKind;
begin
  if KeyComp('multiples') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func128: TtkTokenKind;
begin
  if KeyComp('peripheries') then Result := tkAttribute else Result := tkIdentifier;
end;

function TSynDOTSyn.Func129: TtkTokenKind;
begin
  if KeyComp('trapezium') then Result := tkShape else Result := tkIdentifier;
end;

function TSynDOTSyn.Func131: TtkTokenKind;
begin
  if KeyComp('invtriangle') then Result := tkShape else