unit1.~dfm

針對LE-365所製作的GPIO設定及模擬測試程式

object Form1: TForm1
  Left = 251
  Top = 462
  AutoScroll = False
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'GPIO Test for LE-366'
  ClientHeight = 175
  ClientWidth = 408
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 220
    Top = 92
    Width = 4
    Height = 16
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label2: TLabel
    Left = 264
    Top = 92
    Width = 4
    Height = 16
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object led1: TAbLED
    Left = 204
    Top = 124
    Width = 29
    Height = 37
    Caption = '1'
    LED.ColorOn = clRed
    LED.ColorOff = clMaroon
    LED.Height = 18
    LED_Position = lpBottom
    Spacing = 5
    Checked = False
    Flashing = False
    Frequency = ff1Hz
    StatusInt = 0
    StatusBit = 0
    GroupIndex = 0
    Mode = mIndicator
    OnClick = led1Click
  end
  object led2: TAbLED
    Left = 228
    Top = 124
    Width = 29
    Height = 37
    Caption = '2'
    LED.ColorOn = clRed
    LED.ColorOff = clMaroon
    LED.Height = 18
    LED_Position = lpBottom
    Spacing = 5
    Checked = False
    Flashing = False
    Frequency = ff1Hz
    StatusInt = 0
    StatusBit = 0
    GroupIndex = 0
    Mode = mIndicator
    OnClick = led1Click
  end
  object led3: TAbLED
    Left = 252
    Top = 124
    Width = 29
    Height = 37
    Caption = '3'
    LED.ColorOn = clRed
    LED.ColorOff = clMaroon
    LED.Height = 18
    LED_Position = lpBottom
    Spacing = 5
    Checked = False
    Flashing = False
    Frequency = ff1Hz
    StatusInt = 0
    StatusBit = 0
    GroupIndex = 0
    Mode = mIndicator
    OnClick = led1Click
  end
  object led4: TAbLED
    Left = 276
    Top = 124
    Width = 29
    Height = 37
    Caption = '4'
    LED.ColorOn = clRed
    LED.ColorOff = clMaroon
    LED.Height = 18
    LED_Position = lpBottom
    Spacing = 5
    Checked = False
    Flashing = False
    Frequency = ff1Hz
    StatusInt = 0
    StatusBit = 0
    GroupIndex = 0
    Mode = mIndicator
    OnClick = led1Click
  end
  object led5: TAbLED
    Left = 300
    Top = 124
    Width = 29
    Height = 37
    Caption = '5'
    LED.ColorOn = clRed
    LED.ColorOff = clMaroon
    LED.Height = 18
    LED_Position = lpBottom
    Spacing = 5
    Checked = False
    Flashing = False
    Frequency = ff1Hz
    StatusInt = 0
    StatusBit = 0
    GroupIndex = 0
    Mode = mIndicator
    OnClick = led1Click
  end
  object led6: TAbLED
    Left = 324
    Top = 124
    Width = 29
    Height = 37
    Caption = '6'
    LED.ColorOn = clRed
    LED.ColorOff = clMaroon
    LED.Height = 18
    LED_Position = lpBottom
    Spacing = 5
    Checked = False
    Flashing = False
    Frequency = ff1Hz
    StatusInt = 0
    StatusBit = 0
    GroupIndex = 0
    Mode = mIndicator
    OnClick = led1Click
  end
  object led7: TAbLED
    Left = 348
    Top = 124
    Width = 29
    Height = 37
    Caption = '7'
    LED.ColorOn = clRed
    LED.ColorOff = clMaroon
    LED.Height = 18
    LED_Position = lpBottom
    Spacing = 5
    Checked = False
    Flashing = False
    Frequency = ff1Hz
    StatusInt = 0
    StatusBit = 0
    GroupIndex = 0
    Mode = mIndicator
    OnClick = led1Click
  end
  object led8: TAbLED
    Left = 372
    Top = 124
    Width = 29
    Height = 37
    Caption = '8'
    LED.ColorOn = clRed
    LED.ColorOff = clMaroon
    LED.Height = 18
    LED_Position = lpBottom
    Spacing = 5
    Checked = False
    Flashing = False
    Frequency = ff1Hz
    StatusInt = 0
    StatusBit = 0
    GroupIndex = 0
    Mode = mIndicator
    OnClick = led1Click
  end
  object Memo1: TMemo
    Left = 8
    Top = 8
    Width = 185
    Height = 153
    Ctl3D = False
    ParentCtl3D = False
    ReadOnly = True
    TabOrder = 0
  end
  object Button4: TButton
    Left = 320
    Top = 12
    Width = 81
    Height = 65
    Caption = 'Exit'
    TabOrder = 1
    OnClick = Button4Click
  end
  object GroupBox1: TGroupBox
    Left = 204
    Top = 8
    Width = 109
    Height = 73
    Caption = ' Test Mode '
    TabOrder = 2
    object rInput: TRadioButton
      Left = 12
      Top = 20
      Width = 81
      Height = 17
      Caption = 'Input Mode'
      TabOrder = 0
      OnClick = rInputClick
    end
    object rOutput: TRadioButton
      Left = 12
      Top = 44
      Width = 89
      Height = 17
      Caption = 'Output Mode'
      TabOrder = 1
      OnClick = rInputClick
    end
  end
  object Timer1: TTimer
    Enabled = False
    OnTimer = Timer1Timer
    Left = 12
    Top = 8
  end
end