平时经常用UltraEdit编写修改代码,但UltraEdit本身不支持Delphi的语法高亮,用起来很不爽,于是编写以下脚本使其支持Delphi,请将其添加到UltraEdit安装路径下的 WORDFILE.TXT 文件的结尾即可。
/L8"Dephi" Line Comment = // Block Comment On = { Block Comment Off = } Block Comment On Alt = (* Block Comment Off Alt = *) Escape Char = \ String Chars = ' Nocase File Extensions = PAS DPR DPK DFM COD INC /Delimiters = ~!@%^&*()-+=|\/{}[]:;"'<> , .? /Function String = "%[a-zA-Z_]* ^([a-zA-Z_]+^)(*)[~;]" /Function String 1 = "%[a-zA-Z_]*.^([a-zA-Z_]+^)(*)[~;]" /Indent Strings = "begin" /Unindent Strings = "end" /C1"Keywords"
absolute abstract and array as asm assembler automated begin break case cdecl class const constructor contains continue default delete destructor dispid dispinterface div do downto dynamic else end except explicit export exports external far file finalization finally for forward function goto if implementation implements in inherited initialization inline interface is label library message mod near nil nodefault not object of or out overload override package packed pascal private procedure program property protected public published raise read readonly record register reintroduce repeat requires resourcestring safecall set shl shr stdcall stored string then threadvar to try type unit until uses var virtual while with write writeonly xor /C4"Operators" + - * = // / \ : % & > < ^ ! | ; , . ' " ( ) $ [ ] @ // # // $ ~

|