Pascal Syntax Highlighter

SysFunctions.pas VarParser.pas

Background Colour: White Black Blue Royal Blue Medium Blue Slate Blue Navy Blue Midnight Blue Dark Blue Forest Green Olive Drab Green Yellow Red Dark Red Cyan White Dark Gray Light Gray Gray 61 Gray 51 Gray 41   Text Colour: Black Black Blue Royal Blue Medium Blue Slate Blue Navy Blue Midnight Blue Dark Blue Forest Green Olive Drab Green Yellow Red Dark Red Cyan White Dark Gray Light Gray Gray 61 Gray 51 Gray 41   Comment Colour: Dark Gray Black Blue Royal Blue Medium Blue Slate Blue Navy Blue Midnight Blue Dark Blue Forest Green Olive Drab Green Yellow Red Dark Red Cyan White Dark Gray Light Gray Gray 61 Gray 51 Gray 41   String Colour: Olive Drab Black Blue Royal Blue Medium Blue Slate Blue Navy Blue Midnight Blue Dark Blue Forest Green Olive Drab Green Yellow Red Dark Red Cyan White Dark Gray Light Gray Gray 61 Gray 51 Gray 41   Number Colour: Red Black Blue Royal Blue Medium Blue Slate Blue Navy Blue Midnight Blue Dark Blue Forest Green Olive Drab Green Yellow Red Dark Red Cyan White Dark Gray Light Gray Gray 61 Gray 51 Gray 41   Line Number Colour: Dark Gray Black Blue Royal Blue Medium Blue Slate Blue Navy Blue Midnight Blue Dark Blue Forest Green Olive Drab Green Yellow Red Dark Red Cyan White Dark Gray Light Gray Gray 61 Gray 51 Gray 41   Reserved Colour: Black Black Blue Royal Blue Medium Blue Slate Blue Navy Blue Midnight Blue Dark Blue Forest Green Olive Drab Green Yellow Red Dark Red Cyan White Dark Gray Light Gray Gray 61 Gray 51 Gray 41   Bold Reserved Words? Comments Italicized? Include Line Numbers? Enter Code to Highlight: program Sample; uses SysUtils; var res: boolean; s: string; n: integer; {-- Simple bogus program to illustrate the --} (*- ursyntax highlighter cgi program... -*) begin function ProcessNow(s: string; n: integer): boolean; begin Writeln(Format('S is %s and N is %d',[s,n])); end; s := 'Here is a string literal.'; n := 100; //-- a number res := ProcessNow(s,n); end.

---

Home | E-Mail | Request Info

© 1996-2002 Urban Research. All rights reserved.