borland form.xml

SynEditStudio delphi 代码编辑器

<?xml version="1.0" encoding="windows-1251"?>
<SynUniHighlighter Version="2.0">
	<SyntaxColoring>
		<Info>
			<General Name="Borland Form" Extensions="dfm" Version="1" Revision="0" Sample="object AFMain: TAFMain
  HelpContext = 1
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Font.Name = 'System'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 16
  object MainPanel: TPanel
    Left = 0
    Top = 0
    Width = 333
    Height = 45
    Align = alTop
    BevelOuter = bvLowered
    TabOrder = 0
    Glyph.Data = {
        36060000424D3606000000000000360400002800000010000000200000000100
        0800000000000002000000000000000000000001000000000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000C0DCC000F0C8
        0303030303030303030303030303030303030303030303030303}
    ParentShowHint = False
    ShowHint = True
    OnClick = AutoBtnClick
  end
  object Gauge: TStatusGauge
    Left = 0
    Top = 218
    Width = 333
    Height = 19
    Panels = &lt;
      item
        Width = 0
      end
      item
        Width = -2
      end&gt;
    SimplePanel = False
    SizeGrip = False
    separator = 150
    gaugecolor = clNavy
  end
  object q: TADOQuery
    CursorType = ctStatic
    Parameters = &lt;&gt;
    SQL.Strings = (
      'Select * from mytable where work=''Mine''')
    Left = 220
    Top = 138
  end
end

" History=""/>
			<Author Name="Vitaly Nevzorov" Mail="[e-mail]" Web="www.delphist.com" Copyright="Copyright (c) Vitaly Nevzorov, 2002" Company="N/A" Remark=""/>
		</Info>
		<Schemes/>
		<Editor/>
		<MainRules Name="SyntaxColoring" Style="Root">
			<Attributes Foreground="clBlack" Background="clWhite"/>
			<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
			<SubRules>
				<Range Name="Enumerate" CaseSensitive="True" Style="Enumerate">
					<Attributes Foreground="$00800040" Background="clWhite"/>
					<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
					<OpenToken StartLine=""/>
					<CloseToken StartLine=""/>
					<Properties/>
					<MultiTokens>
						<Tokens Open="[" Close="]"/>
					</MultiTokens>
					<SubRules/>
				</Range>
				<Range Name="Strings" CaseSensitive="True" Style="Strings">
					<Attributes Foreground="clRed" Background="clWhite"/>
					<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
					<OpenToken StartLine=""/>
					<CloseToken StartLine=""/>
					<Properties/>
					<MultiTokens>
						<Tokens Open="'" Close="'"/>
					</MultiTokens>
					<SubRules/>
				</Range>
				<Range Name="Binary" CaseSensitive="True" Style="Binary">
					<Attributes Foreground="clGreen" Background="clWhite"/>
					<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
					<OpenToken StartLine=""/>
					<CloseToken StartLine=""/>
					<Properties/>
					<MultiTokens>
						<Tokens Open="{" Close="}"/>
					</MultiTokens>
					<SubRules/>
				</Range>
				<Range Name="List" CaseSensitive="True" Style="List">
					<Attributes Foreground="$000080FF" Background="clWhite"/>
					<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
					<OpenToken StartLine=""/>
					<CloseToken StartLine=""/>
					<Properties/>
					<MultiTokens>
						<Tokens Open="&lt;" Close="&gt;"/>
					</MultiTokens>
					<SubRules/>
				</Range>
				<KeyList Name="Statements" Enabled="True" Style="" Words="object
end
">
					<Attributes Foreground="clBlue" Background="clWhite"/>
				</KeyList>
				<KeyList Name="Logical" Enabled="True" Style="" Words="True
False
">
					<Attributes Foreground="$006A6A35" Background="clWhite"/>
				</KeyList>
			</SubRules>
		</MainRules>
	</SyntaxColoring>
	<CodeFolding>
		<SkipRegion>
			<Open Symbol="'"/>
			<Close Symbol="'"/>
			<RegionType Type="0"/>
		</SkipRegion>
		<SkipRegion>
			<Open Symbol="&lt;"/>
			<Close Symbol="&gt;"/>
			<RegionType Type="1"/>
		</SkipRegion>
		<FoldRegion Name="object..end" Type="1">
			<OpenToken Symbol="OBJECT"/>
			<CloseToken Symbol="END"/>
			<Properties/>
			<SubRegions/>
		</FoldRegion>
	</CodeFolding>
	<CustomData/>
</SynUniHighlighter>