unit4.dfm

这是一个火车站公寓的自动叫班程序源码

object fmManualCall: TfmManualCall
  Left = 192
  Top = 114
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = #24405#38899#21483#29677
  ClientHeight = 317
  ClientWidth = 580
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 4
    Width = 580
    Height = 289
    Caption = #24405#38899#21483#29677
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = #26032#23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label1: TLabel
      Left = 68
      Top = 58
      Width = 80
      Height = 15
      Caption = #25151#38388#21495#30721#65306
    end
    object Label2: TLabel
      Left = 116
      Top = 168
      Width = 304
      Height = 15
      Caption = #20652#21483#30340#26102#38388#38388#38548#21487#20197#22312#31995#32479#35774#32622#20013#36827#34892#35843#25972
    end
    object Label3: TLabel
      Left = 24
      Top = 240
      Width = 80
      Height = 15
      Caption = #20449#24687#25552#31034#65306
    end
    object Label4: TLabel
      Left = 104
      Top = 240
      Width = 160
      Height = 15
      Caption = #27491#22312#31561#24453#36755#20837#25151#38388#21495#30721
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -15
      Font.Name = #26032#23435#20307
      Font.Style = []
      ParentFont = False
    end
    object BitBtn1: TBitBtn
      Left = 276
      Top = 56
      Width = 89
      Height = 25
      Caption = #24320#22987#21483#29677
      TabOrder = 0
      OnClick = BitBtn1Click
    end
    object BitBtn2: TBitBtn
      Left = 372
      Top = 56
      Width = 89
      Height = 25
      Caption = #20572#27490#21483#29677
      Enabled = False
      TabOrder = 2
      OnClick = BitBtn2Click
    end
    object CheckBox1: TCheckBox
      Left = 84
      Top = 112
      Width = 385
      Height = 17
      Caption = #26412#27425#21483#29677#38656#35201#20652#21483#65288#22312#20572#27490#21483#29677#21069#36873#25321#25165#33021#26377#25928#65289
      TabOrder = 3
      OnKeyPress = FormKeyPress
    end
    object ComboBox1: TComboBox
      Left = 148
      Top = 56
      Width = 121
      Height = 23
      ItemHeight = 15
      TabOrder = 1
      OnKeyDown = ComboBox1KeyDown
    end
  end
  object Button1: TButton
    Tag = 1
    Left = 240
    Top = 292
    Width = 82
    Height = 25
    Caption = #36864#20986
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = #26032#23435#20307
    Font.Style = []
    ModalResult = 1
    ParentFont = False
    TabOrder = 1
    OnClick = Button1Click
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 200
    OnTimer = Timer1Timer
    Left = 80
  end
end