unit1.dfm

SPI读写

object Form1: TForm1
  Left = 440
  Top = 216
  Width = 485
  Height = 407
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'sst write'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 402
    Top = 74
    Width = 32
    Height = 16
    Caption = '分  '
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Panel5: TPanel
    Left = 0
    Top = 0
    Width = 477
    Height = 356
    Align = alClient
    BevelInner = bvLowered
    BevelOuter = bvNone
    Color = clSilver
    TabOrder = 1
    Visible = False
  end
  object Panel6: TPanel
    Left = 0
    Top = 0
    Width = 477
    Height = 356
    Align = alClient
    BevelInner = bvLowered
    BevelOuter = bvNone
    Caption = ' '
    Color = clSilver
    TabOrder = 0
    object SpeedButton2: TSpeedButton
      Left = 376
      Top = 284
      Width = 40
      Height = 25
      Caption = 'Send'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = '宋体'
      Font.Style = []
      NumGlyphs = 2
      ParentFont = False
      OnClick = SpeedButton2Click
    end
    object Button3: TSpeedButton
      Left = 2
      Top = 2
      Width = 82
      Height = 30
      Caption = 'OpenComm'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Visible = False
      OnClick = Button3Click
    end
    object SpeedButton1: TSpeedButton
      Left = 385
      Top = 103
      Width = 32
      Height = 24
      Caption = '.....'
      OnClick = SpeedButton1Click
    end
    object Label16: TLabel
      Left = 56
      Top = 86
      Width = 56
      Height = 13
      Caption = 'File Path:    '
    end
    object MSGLIST: TMemo
      Left = 56
      Top = 168
      Width = 361
      Height = 104
      ScrollBars = ssBoth
      TabOrder = 0
    end
    object Button1: TButton
      Left = 339
      Top = 284
      Width = 37
      Height = 25
      Caption = 'Clear'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = Button1Click
    end
    object RadioGroup1: TRadioGroup
      Left = 56
      Top = 33
      Width = 361
      Height = 48
      Caption = 'PortID'
      Color = clSilver
      Columns = 5
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ItemIndex = 0
      Items.Strings = (
        'COM1'
        'COM2'
        'COM3'
        'COM4'
        'COM5'
        'COM6'
        'COM7'
        'COM8')
      ParentColor = False
      ParentFont = False
      TabOrder = 2
      OnClick = RadioGroup1Click
    end
    object Edit_path: TEdit
      Left = 56
      Top = 104
      Width = 329
      Height = 21
      TabOrder = 3
      Text = 'C:\Documents and Settings\tomosyan_01\桌面\1.bin'
    end
    object ProgressBar1: TProgressBar
      Left = 56
      Top = 288
      Width = 281
      Height = 17
      Min = 0
      Max = 10000
      TabOrder = 4
    end
    object RG_filetype: TRadioGroup
      Left = 232
      Top = 128
      Width = 185
      Height = 38
      Caption = 'write file type'
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        'FPGA'
        'MCU')
      TabOrder = 5
    end
    object rg_op_type: TRadioGroup
      Left = 56
      Top = 128
      Width = 169
      Height = 38
      Caption = 'operation type'
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        'Write'
        'Read')
      TabOrder = 6
    end
    object Edit_SIZE: TEdit
      Left = 109
      Top = 82
      Width = 64
      Height = 21
      Color = clSilver
      ReadOnly = True
      TabOrder = 7
      Text = '9'
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 356
    Width = 477
    Height = 17
    Panels = <
      item
        Text = 'Status：'
        Width = 50
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 500
    Left = 672
    Top = 158
  end
  object TimerRec: TTimer
    Enabled = False
    Interval = 500
    OnTimer = TimerRecTimer
    Left = 672
    Top = 112
  end
  object OpenDialog1: TOpenDialog
    Left = 280
    Top = 88
  end
end