tdlgdatetime.dfm

联通接收发送新程序

object DlgDateTime: TDlgDateTime
  Left = 212
  Top = 161
  Width = 696
  Height = 480
  Caption = '时间测试'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Disp: TLabel
    Left = 200
    Top = 16
    Width = 21
    Height = 13
    Caption = 'Disp'
  end
  object DispTime: TLabel
    Left = 312
    Top = 16
    Width = 44
    Height = 13
    Caption = 'DispTime'
  end
  object timespan: TLabel
    Left = 560
    Top = 256
    Width = 42
    Height = 13
    Caption = 'timespan'
  end
  object ABS: TLabel
    Left = 456
    Top = 16
    Width = 21
    Height = 13
    Caption = 'ABS'
  end
  object getlocaltime: TButton
    Left = 56
    Top = 24
    Width = 75
    Height = 25
    Caption = 'getlocaltime'
    TabOrder = 0
    OnClick = getlocaltimeClick
  end
  object Date: TEdit
    Left = 40
    Top = 296
    Width = 121
    Height = 21
    ImeName = '中文 (简体) - 微软拼音'
    TabOrder = 1
    Text = '00000101'
  end
  object Time: TEdit
    Left = 176
    Top = 296
    Width = 121
    Height = 21
    ImeName = '中文 (简体) - 微软拼音'
    TabOrder = 2
    Text = '000000'
  end
  object Add: TButton
    Left = 544
    Top = 88
    Width = 75
    Height = 25
    Caption = 'Add'
    TabOrder = 3
    OnClick = AddClick
  end
  object Minus: TButton
    Left = 544
    Top = 152
    Width = 75
    Height = 25
    Caption = 'Minus'
    TabOrder = 4
    OnClick = MinusClick
  end
  object OK: TButton
    Left = 160
    Top = 360
    Width = 75
    Height = 25
    Caption = 'OK'
    TabOrder = 5
  end
  object CANCEL: TButton
    Left = 400
    Top = 360
    Width = 75
    Height = 25
    Caption = 'CANCEL'
    TabOrder = 6
    OnClick = CANCELClick
  end
  object hour: TEdit
    Left = 392
    Top = 128
    Width = 121
    Height = 21
    ImeName = '中文 (简体) - 微软拼音'
    TabOrder = 7
    Text = '0'
  end
  object minute: TEdit
    Left = 392
    Top = 168
    Width = 121
    Height = 21
    ImeName = '中文 (简体) - 微软拼音'
    TabOrder = 8
    Text = '0'
  end
  object second: TEdit
    Left = 392
    Top = 224
    Width = 121
    Height = 21
    ImeName = '中文 (简体) - 微软拼音'
    TabOrder = 9
    Text = '0'
  end
  object day: TEdit
    Left = 392
    Top = 80
    Width = 121
    Height = 21
    ImeName = '中文 (简体) - 微软拼音'
    TabOrder = 10
    Text = '1'
  end
  object GetDate: TButton
    Left = 320
    Top = 296
    Width = 75
    Height = 25
    Caption = 'GetDate'
    TabOrder = 11
    OnClick = GetDateClick
  end
  object Print: TButton
    Left = 584
    Top = 304
    Width = 75
    Height = 25
    Caption = 'Print'
    TabOrder = 12
    OnClick = PrintClick
  end
  object EditVar: TEdit
    Left = 176
    Top = 136
    Width = 121
    Height = 21
    ImeName = '中文 (简体) - 微软拼音'
    TabOrder = 13
    Text = 'EditVar'
  end
  object Button1: TButton
    Left = 64
    Top = 80
    Width = 75
    Height = 25
    Caption = 'AddYear'
    TabOrder = 14
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 64
    Top = 128
    Width = 75
    Height = 25
    Caption = 'MinusYear'
    TabOrder = 15
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 72
    Top = 176
    Width = 75
    Height = 25
    Caption = 'AddDay'
    TabOrder = 16
    OnClick = Button3Click
  end
  object Button4: TButton
    Left = 72
    Top = 232
    Width = 75
    Height = 25
    Caption = 'MinusDay'
    TabOrder = 17
    OnClick = Button4Click
  end
end