nameunit.~dfm

delphi LED 显示屏用,带串口发送,内容编辑,演示功能

object Formname: TFormname
  Left = 208
  Top = 94
  AutoScroll = False
  AutoSize = True
  BorderIcons = [biSystemMenu, biMinimize]
  ClientHeight = 225
  ClientWidth = 393
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 393
    Height = 225
    BevelInner = bvLowered
    BorderWidth = 4
    BorderStyle = bsSingle
    TabOrder = 0
    object disptime: TLabel
      Left = 88
      Top = 20
      Width = 180
      Height = 24
      Caption = '10'#26376'10'#26085'  12:10'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -24
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 112
      Top = 72
      Width = 95
      Height = 21
      Caption = #34892#36710#23433#20840':'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -21
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 112
      Top = 112
      Width = 105
      Height = 21
      Caption = #20132#36890#23433#20840#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -21
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 112
      Top = 152
      Width = 106
      Height = 21
      Caption = #20154#36523#23433#20840' :'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -21
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 35
      Top = 67
      Width = 21
      Height = 105
      Caption = #23433#20840#25581#31034#29260
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -21
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      WordWrap = True
    end
    object Edit1: TEdit
      Left = 224
      Top = 64
      Width = 121
      Height = 24
      MaxLength = 5
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 224
      Top = 104
      Width = 121
      Height = 24
      MaxLength = 5
      TabOrder = 1
    end
    object Edit3: TEdit
      Left = 224
      Top = 144
      Width = 121
      Height = 24
      MaxLength = 5
      TabOrder = 2
    end
    object Button1: TButton
      Left = 88
      Top = 184
      Width = 49
      Height = 25
      Caption = 'COM1'
      TabOrder = 3
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 240
      Top = 184
      Width = 41
      Height = 25
      Caption = 'COM2'
      TabOrder = 4
      OnClick = Button2Click
    end
  end
  object Timer1: TTimer
    Interval = 500
    OnTimer = Timer1Timer
    Left = 456
    Top = 8
  end
  object mycomm1: Tmycomm
    DeviceName = 'COM2'
    BaudRate = 9600
    MonitorEvents = [evBreak, evCTS, evDSR, evError, evRing, evRlsd, evRxChar, evRxFlag, evTxEmpty]
    Options = []
    Left = 72
    Top = 32
  end
end