invioid.~dfm

文件包含程序源原文件

object frmIOID: TfrmIOID
  Left = 242
  Top = 137
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'I/O Define'
  ClientHeight = 365
  ClientWidth = 665
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object tabIOID: TTabControl
    Left = 0
    Top = 0
    Width = 665
    Height = 365
    Align = alClient
    TabOrder = 0
    Tabs.Strings = (
      'In Type'
      'Out Type'
      'Return Type'
      'Tune Type')
    TabIndex = 0
    OnChange = tabIOIDChange
    object Panel1: TPanel
      Left = 4
      Top = 24
      Width = 657
      Height = 4
      Align = alTop
      BevelOuter = bvLowered
      TabOrder = 0
    end
    object Panel2: TPanel
      Left = 4
      Top = 263
      Width = 657
      Height = 51
      Align = alBottom
      Color = clSkyBlue
      TabOrder = 1
      object edtCode: TLabeledEdit
        Left = 8
        Top = 23
        Width = 73
        Height = 21
        AutoSize = False
        EditLabel.Width = 28
        EditLabel.Height = 13
        EditLabel.Caption = 'Code '
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        LabelPosition = lpAbove
        LabelSpacing = 3
        TabOrder = 0
      end
      object edtName: TLabeledEdit
        Left = 82
        Top = 23
        Width = 193
        Height = 21
        EditLabel.Width = 31
        EditLabel.Height = 13
        EditLabel.Caption = 'Name '
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        LabelPosition = lpAbove
        LabelSpacing = 3
        TabOrder = 1
      end
      object edtNote: TLabeledEdit
        Left = 278
        Top = 23
        Width = 145
        Height = 21
        EditLabel.Width = 45
        EditLabel.Height = 13
        EditLabel.Caption = 'Remarks '
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        LabelPosition = lpAbove
        LabelSpacing = 3
        TabOrder = 2
      end
      object Panel4: TPanel
        Left = 432
        Top = 1
        Width = 224
        Height = 49
        Align = alRight
        BevelOuter = bvNone
        TabOrder = 3
        object btnNew: TSpeedButton
          Left = 6
          Top = 17
          Width = 69
          Height = 25
          Caption = 'New'
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
            333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
            0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
            07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
            07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
            0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
            33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
            B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
            3BB33773333773333773B333333B3333333B7333333733333337}
          NumGlyphs = 2
          OnClick = btnNewClick
        end
        object btnDel: TSpeedButton
          Left = 78
          Top = 16
          Width = 69
          Height = 26
          Caption = 'Delete'
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
            7700333333337777777733333333008088003333333377F73377333333330088
            88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
            000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
            FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
            99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
            99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
            99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
            93337FFFF7737777733300000033333333337777773333333333}
          NumGlyphs = 2
          OnClick = btnDelClick
        end
        object btnUpdate: TSpeedButton
          Left = 150
          Top = 16
          Width = 69
          Height = 26
          Caption = 'Update'
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
            000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
            00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
            F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
            0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
            FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
            FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
            0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
            00333377737FFFFF773333303300000003333337337777777333}
          NumGlyphs = 2
          OnClick = btnUpdateClick
        end
      end
    end
    object Panel3: TPanel
      Left = 4
      Top = 318
      Width = 657
      Height = 20
      Align = alBottom
      BevelOuter = bvLowered
      TabOrder = 2
      object Memo1: TMemo
        Left = 1
        Top = 1
        Width = 655
        Height = 18
        Align = alClient
        BevelOuter = bvNone
        Color = clTeal
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        Lines.Strings = (
          'Memo: Code Field is Charactor')
        ReadOnly = True
        TabOrder = 0
      end
    end
    object ListViewIO: TListView
      Left = 4
      Top = 28
      Width = 657
      Height = 231
      Align = alClient
      Columns = <
        item
          Caption = 'Code'
        end
        item
          Caption = 'Name'
          Width = 240
        end
        item
          Caption = 'Remarks'
          Width = 120
        end>
      ColumnClick = False
      ReadOnly = True
      RowSelect = True
      TabOrder = 3
      ViewStyle = vsReport
      OnChange = ListViewIOChange
      OnClick = ListViewIOClick
    end
    object stsBarCnt: TStatusBar
      Left = 4
      Top = 342
      Width = 657
      Height = 19
      Panels = <
        item
          Width = 300
        end
        item
          Width = 50
        end>
      SimplePanel = False
    end
    object Panel5: TPanel
      Left = 4
      Top = 338
      Width = 657
      Height = 4
      Align = alBottom
      BevelOuter = bvLowered
      TabOrder = 5
    end
    object Panel6: TPanel
      Left = 4
      Top = 314
      Width = 657
      Height = 4
      Align = alBottom
      BevelOuter = bvLowered
      TabOrder = 6
    end
    object Panel7: TPanel
      Left = 4
      Top = 259
      Width = 657
      Height = 4
      Align = alBottom
      BevelOuter = bvLowered
      TabOrder = 7
    end
  end
end