home *** CD-ROM | disk | FTP | other *** search
/ PC World 2001 March / PCWorld_2001-03_cd.bin / Software / Topware / Scriptworx / _SETUP.1 / vbasic.sch < prev    next >
Text File  |  2000-06-05  |  4KB  |  134 lines
  1. object TPersHolder
  2.   P.Name = 'Visual Basic'
  3.   P.SyntaxBlocks = <
  4.     item
  5.       Name = 'Default'
  6.       ID = 0
  7.       FIText = 0
  8.       FIIntNum = 1
  9.       FIFloatNum = 2
  10.       FIHexNum = 3
  11.       FIDirective = 4
  12.       UseLineDirectives = True
  13.       UseComments = True
  14.       UseSingleLineComments = True
  15.       UseStrings = True
  16.       UseSingleLineStrings = True
  17.       UseNumbers = True
  18.       UseSuffixedIdentifiers = True
  19.       UseKeywords = True
  20.       BlockDelimiters = <>
  21.       LineDirectivePrefix = '#'
  22.       SingleLineCommentDelimiters = <
  23.         item
  24.           FontID = 5
  25.           LeftDelimiter = #39
  26.         end
  27.         item
  28.           FontID = 6
  29.           LeftDelimiter = 'rem'
  30.         end>
  31.       SingleLineStringDelimiters = <
  32.         item
  33.           FontID = 7
  34.           LeftDelimiter = '"'
  35.           RightDelimiter = '"'
  36.         end>
  37.       IdentSuffixes = <
  38.         item
  39.           LeftDelimiter = '$'
  40.         end>
  41.       KeywordSets = <
  42.         item
  43.           FontID = 8
  44.           Name = 'reserved'
  45.           Keywords = 
  46.             'addressof,and,appactivate,as,base,beep,binary,byref,byval,call,c' +
  47.             'ase,chdir,chdrive,close,compare,const,date,declare,deftype,delet' +
  48.             'esetting,dim,do,each,else,empty,end,enum,eqv,erase,error,event,e' +
  49.             'xit,explicit,false,filecopy,for,friend,function,get,gosub,goto,i' +
  50.             'f,imp,implements,input,is,kill,len,let,like,line,load,lock,loop,' +
  51.             'lset,me,mid,mkdir,mod,name,new,next,not,nothing,null,on,open,opt' +
  52.             'ion,optional,or,paramarray,print,private,property,public,put,rai' +
  53.             'seevent,randomize,redim,rem,reset,resume,return,rmdir,rset,savep' +
  54.             'icture,savesetting,seek,select,sendkeys,set,setattr,static,step,' +
  55.             'stop,string,sub,then,time,to,true,type,unload,unlock,wend,while,' +
  56.             'width,with,withevents,write,xor'
  57.         end>
  58.     end>
  59.   P.FontTable = <
  60.     item
  61.       FontID = 0
  62.       Font.Charset = DEFAULT_CHARSET
  63.       Font.Color = clBlack
  64.       Font.Height = -13
  65.       Font.Name = 'Courier New'
  66.       Font.Style = []
  67.     end
  68.     item
  69.       FontID = 1
  70.       Font.Charset = DEFAULT_CHARSET
  71.       Font.Color = clGreen
  72.       Font.Height = -13
  73.       Font.Name = 'Courier New'
  74.       Font.Style = []
  75.     end
  76.     item
  77.       FontID = 2
  78.       Font.Charset = DEFAULT_CHARSET
  79.       Font.Color = clGreen
  80.       Font.Height = -13
  81.       Font.Name = 'Courier New'
  82.       Font.Style = []
  83.     end
  84.     item
  85.       FontID = 3
  86.       Font.Charset = DEFAULT_CHARSET
  87.       Font.Color = clGreen
  88.       Font.Height = -13
  89.       Font.Name = 'Courier New'
  90.       Font.Style = []
  91.     end
  92.     item
  93.       FontID = 4
  94.       Font.Charset = DEFAULT_CHARSET
  95.       Font.Color = clGreen
  96.       Font.Height = -13
  97.       Font.Name = 'Courier New'
  98.       Font.Style = [fsBold]
  99.     end
  100.     item
  101.       FontID = 5
  102.       Font.Charset = DEFAULT_CHARSET
  103.       Font.Color = clGray
  104.       Font.Height = -13
  105.       Font.Name = 'Courier New'
  106.       Font.Style = [fsItalic]
  107.     end
  108.     item
  109.       FontID = 6
  110.       Font.Charset = DEFAULT_CHARSET
  111.       Font.Color = clGray
  112.       Font.Height = -13
  113.       Font.Name = 'Courier New'
  114.       Font.Style = [fsItalic]
  115.     end
  116.     item
  117.       FontID = 7
  118.       Font.Charset = DEFAULT_CHARSET
  119.       Font.Color = clMaroon
  120.       Font.Height = -13
  121.       Font.Name = 'Courier New'
  122.       Font.Style = []
  123.     end
  124.     item
  125.       FontID = 8
  126.       Font.Charset = DEFAULT_CHARSET
  127.       Font.Color = clBlue
  128.       Font.Height = -13
  129.       Font.Name = 'Courier New'
  130.       Font.Style = [fsBold]
  131.     end>
  132.   P.SyntaxVersion = 2
  133. end
  134.