picpas.dfm

PIC 单片机 PAS SOURCE CODE SAMPLES

    ItemHeight = 13
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    Sorted = True
    TabOrder = 2
    OnDblClick = ListBox2DblClick
  end
  object ListBox3: TListBox
    Left = 8
    Top = 104
    Width = 145
    Height = 273
    Hint = 'Double click'
    AutoComplete = False
    Color = clSilver
    Ctl3D = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 16
    ParentCtl3D = False
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    OnDblClick = ListBox3DblClick
  end
  object StaticText1: TStaticText
    Left = 688
    Top = 32
    Width = 42
    Height = 17
    Caption = 'Pas2pic'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
  end
  object StaticText2: TStaticText
    Left = 8
    Top = 384
    Width = 61
    Height = 17
    Caption = 'Variable List'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
  end
  object ComboBox1: TComboBox
    Left = 8
    Top = 56
    Width = 113
    Height = 22
    Style = csDropDownList
    Enabled = False
    ItemHeight = 14
    Sorted = True
    TabOrder = 7
    TabStop = False
  end
  object StaticText3: TStaticText
    Left = 8
    Top = 32
    Width = 33
    Height = 17
    Caption = 'JUMP'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 8
  end
  object StaticText4: TStaticText
    Left = 8
    Top = 80
    Width = 129
    Height = 17
    Caption = 'Procedures+Functions List'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 9
  end
  object ListBox4: TListBox
    Left = 160
    Top = 528
    Width = 521
    Height = 25
    TabStop = False
    AutoComplete = False
    Color = clSilver
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ItemHeight = 16
    ParentFont = False
    TabOrder = 10
  end
  object StaticText6: TStaticText
    Left = 688
    Top = 528
    Width = 44
    Height = 17
    Caption = 'Change:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 11
  end
  object RichEdit1: TRichEditSyntax
    Left = 160
    Top = 56
    Width = 525
    Height = 465
    AsmColor = clGreen
    CommentColor = clNavy
    IdentifierColor = clBlack
    KeyColor = clNavy
    NullColor = clBlack
    NumberColor = clBlue
    SpaceColor = clNavy
    StringColor = clRed
    SymbolColor = clNavy
    UnknownColor = clBlack
    DirectiveColor = clNavy
    CharColor = clRed
    HexColor = clBlue
    OctalColor = clBlue
    FloatColor = clBlue
    InvalidSymbolColor = clRed
    VariableColor = clBlack
    ElementColor = clGreen
    AttributeColor = clMaroon
    TextColor = clBlack
    CDATAColor = clBlue
    EntityRefColor = clBlack
    ProcessingInstructionColor = clYellow
    QuoteAttrValueColor = clBlue
    AposAttrValueColor = clBlack
    QuoteEntityRefColor = clRed
    AposEntityRefColor = clBlack
    EqualColor = clBlack
    nsAttributeColor = clGreen
    nsQuoteAttrValueColor = clMaroon
    nsAposAttrValueColor = clBlack
    nsQuoteEntityRefColor = clBlack
    nsAposEntityRefColor = clGreen
    nsEqualColor = clGreen
    UseDefaultColors = False
    Color = clWhite
    PopupMenu = PopupMenu1
    ScrollBars = ssBoth
    TabOrder = 0
    WantTabs = True
    OnChange = RichEdit1Change
    OnKeyDown = RichEdit1KeyDown
    OnKeyUp = RichEdit1KeyUp
    OnMouseDown = RichEdit1MouseDown
    OnMouseUp = RichEdit1MouseDown
  end
  object OpenDialog1: TOpenDialog
    FileName = 'C:\picpas1\int.pas'
    Filter = '*.pas'
    Left = 80
    Top = 26
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '*.pas'
    FileName = '*.pas'
    Filter = '*.pas'
    Left = 504
    Top = 2
  end
  object FontDialog1: TFontDialog
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 536
    Top = 2
  end
  object ColorDialog1: TColorDialog
    Ctl3D = True
    Color = clTeal
    CustomColors.Strings = (
      'ColorA=FFFFFFFF'
      'ColorB=FFFFFFFF'
      'ColorC=FFFFFFFF'
      'ColorD=FFFFFFFF'
      'ColorE=FFFFFFFF'
      'ColorF=FFFFFFFF'
      'ColorG=FFFFFFFF'
      'ColorH=FFFFFFFF'
      'ColorI=FFFFFFFF'
      'ColorJ=FFFFFFFF'
      'ColorK=FFFFFFFF'
      'ColorL=FFFFFFFF'
      'ColorM=FFFFFFFF'
      'ColorN=FFFFFFFF'
      'ColorO=FFFFFFFF'
      'ColorP=FFFFFFFF')
    Left = 112
    Top = 26
  end
  object ReplaceDialog1: TReplaceDialog
    Left = 632
    Top = 2
  end
  object ToolbarImages: TImageList
    Left = 256
    Top = 24
    Bitmap = {
      494C010112001300040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000005000000001002000000000000050
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C0C0C000C0C0C000C0C0C000C0C0
      C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
      C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
      C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
      C000C0C0C000C0C0C000C0C0C000C0C0C0000000000000000000000000000000
      00000000000000000000000000000000000000000000000080000000FF000000
      FF000000FF000000800000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C0C0C000C0C0C000C0C0C000C0C0
      C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
      C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
      C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
      C000C0C0C000C0C0C000C0C0C000C0C0C0000000000000000000000000000000
      0000000000000000000000000000000080000000FF000000FF00000000000000
      FF000000FF000000FF0000000000000000000000000000800000008000000080
      0000008000000080000000800000008000000080000000800000008000000080
      000000800000008000000080000000800000C0C0C000C0C0C000C0C0C000C0C0
      C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
      C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0