Delphi向けの設定
wz:color.cfgに以下の行を追加する
<mh> :M AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA Message-Id: <.2003847715.665289729.12065649.11969936> Subject: Delphi areaw(use=1;rgb="0x008040";atr=0): { } areaw(use=1;rgb="0x008040";atr=0): (* *) rear(use=1;rgb="0x008040";atr=0): // area(use=1;rgb="0xFF0080";atr=0): ' ' '' words(use=1;rgb="0x800040";atr=1;flag=1): and array as asm begin case class const constructor destructor dispinterface div do downto else end except exports file finalization finally for function goto if implementation in inherited initialization inline interface is label library mod nil not object of or out packed procedure program property raise record repeat resourcestring set shl shr string then threadvar to try type unit until uses var while with xor private protected public published automated at on areaw(use=1;rgb="0x8080FF";atr=0): asm end reword(use=1;rgb="0x0000A0";atr=0;re=1): <[\+\-]?\d+> reword(use=1;rgb="0x0000A0";atr=0;re=1): <\$[a-fA-F0-9]+> reword(use=1;rgb="0x0000A0";atr=0;re=1): <[\+\-]?\d+\.\d+>
設定が複雑なせいかたまに落ちる・・・
見出し1
^program|^unit|^interf|^implem|^initialization|^finalization|^end\.
見出し2
^\{\s
見出し3
^(\{\s+[^\s^\$+]*\s*\})
見出し4
^\s*(\w+\s*=\s*class.*)
見出し5
^procedure|^function|^class
見出し6
^\s+(procedure.*)|\s+(function.*)|\s+(class.*)
コメント