u_gsout.~dfm

小型劳资管理系统,用visual basic+access编写

object F_GSout: TF_GSout
  Left = 318
  Top = 172
  Width = 308
  Height = 194
  BorderIcons = []
  Caption = #24037#26102#32479#35745#36873#25321
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label3: TLabel
    Left = 6
    Top = 140
    Width = 16
    Height = 15
    Caption = #20174
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -15
    Font.Name = #20223#23435'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 150
    Top = 140
    Width = 24
    Height = 15
    Caption = #21040':'
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -15
    Font.Name = #20223#23435'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label1: TLabel
    Left = 136
    Top = 48
    Width = 20
    Height = 13
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = #20223#23435'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 128
    Top = 104
    Width = 100
    Height = 13
  end
  object ComboBox1: TComboBox
    Left = 133
    Top = 72
    Width = 123
    Height = 21
    ItemHeight = 13
    TabOrder = 2
    OnClick = ComboBox1Click
  end
  object RadioGroup1: TRadioGroup
    Left = 8
    Top = 0
    Width = 113
    Height = 129
    Caption = #32479#35745#26041#24335
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = #20223#23435'_GB2312'
    Font.Style = []
    Items.Strings = (
      #25972#20010#20844#21496
      #19968#32423#37096#38376
      #20108#32423#37096#38376
      #21333#20010#21592#24037)
    ParentFont = False
    TabOrder = 0
    OnClick = RadioGroup1Click
  end
  object Edit1: TEdit
    Left = 133
    Top = 72
    Width = 105
    Height = 21
    TabOrder = 1
    Visible = False
    OnKeyPress = Edit1KeyPress
  end
  object BitBtn1: TBitBtn
    Left = 136
    Top = 8
    Width = 75
    Height = 25
    Caption = #30830#23450
    Font.Charset = GB2312_CHARSET
    Font.Color = clPurple
    Font.Height = -15
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ModalResult = 1
    ParentFont = False
    TabOrder = 3
    Glyph.Data = {
      66010000424D6601000000000000760000002800000014000000140000000100
      040000000000F0000000120B0000120B00001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      777777776D7077777777777777777777500077777777887777777777A6007777
      777CC887777777777470777777C22C8877777777504177777A2222C887777777
      A6007777A222222C88777777A6007777A222A222C887777765347777A22C8A22
      2C877777342E7777A22C87A22C88777700F077777A2C777A22C887771D777777
      77AA7777A22C88776D707777777777777A22C887500077777777777777A22C87
      9700777777777777777A2C8774767777777777777777AC774945777777777777
      7777777700F0777777777777777777772C7777777777777777777777626D7777
      7777777777777777424D}
  end
  object BitBtn2: TBitBtn
    Left = 216
    Top = 8
    Width = 75
    Height = 25
    Caption = #36864#20986
    Font.Charset = GB2312_CHARSET
    Font.Color = clPurple
    Font.Height = -13
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ModalResult = 2
    ParentFont = False
    TabOrder = 4
    OnClick = BitBtn2Click
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      04000000000080000000120B0000120B00001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777777777777777777777777777777777777777877777777777777717777777
      7777777711777781777777778187781877777777711871177777777778111177
      7777777778111777777777778111187777777777118711877777777777777118
      7777777777777711877777777777777777777777777777777777}
  end
  object MaskEdit1: TMaskEdit
    Left = 24
    Top = 136
    Width = 105
    Height = 21
    EditMask = '!9999/99/00;1;_'
    MaxLength = 10
    TabOrder = 5
    Text = '    /  /  '
    OnChange = MaskEdit1Change
  end
  object MaskEdit2: TMaskEdit
    Left = 172
    Top = 135
    Width = 101
    Height = 21
    EditMask = '!9999/99/00;1;_'
    MaxLength = 10
    TabOrder = 6
    Text = '    /  /  '
  end
  object DateTimePicker1: TDateTimePicker
    Left = 128
    Top = 136
    Width = 18
    Height = 21
    CalAlignment = dtaLeft
    Date = 37555.3765776736
    Time = 37555.3765776736
    DateFormat = dfShort
    DateMode = dmComboBox
    Kind = dtkDate
    ParseInput = False
    TabOrder = 7
    OnChange = DateTimePicker1Change
  end
  object DateTimePicker2: TDateTimePicker
    Left = 272
    Top = 136
    Width = 18
    Height = 21
    CalAlignment = dtaLeft
    Date = 37555.3766948611
    Time = 37555.3766948611
    DateFormat = dfShort
    DateMode = dmComboBox
    Kind = dtkDate
    ParseInput = False
    TabOrder = 8
    OnChange = DateTimePicker2Change
  end
  object Query1: TQuery
    DatabaseName = 'person_DB'
    SQL.Strings = (
      'select * from ejbm')
    Left = 96
    Top = 40
  end
end