uduty.~dfm

ＤＥＬＰＨＩ开发的寝室管理系统

object frmduty: Tfrmduty
  Left = 206
  Top = 114
  Width = 736
  Height = 501
  Caption = #20540#29677#20449#24687
  Color = clActiveBorder
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 728
    Height = 467
    ActivePage = TabSheet1
    Align = alClient
    Style = tsFlatButtons
    TabIndex = 1
    TabOrder = 0
    object TabSheet3: TTabSheet
      Caption = #26597#35810#20540#29677#20449#24687
      ImageIndex = 2
      object GroupBox1: TGroupBox
        Left = 249
        Top = 0
        Width = 471
        Height = 436
        Align = alClient
        Caption = #20540#29677#35760#24405
        Color = clBtnFace
        ParentColor = False
        TabOrder = 0
        object DBGrid1: TDBGrid
          Left = 2
          Top = 15
          Width = 467
          Height = 419
          Align = alClient
          DataSource = DataSource1
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
        end
      end
      object Panel2: TPanel
        Left = 0
        Top = 0
        Width = 249
        Height = 436
        Align = alLeft
        TabOrder = 1
        object Label5: TLabel
          Left = 8
          Top = 16
          Width = 105
          Height = 17
          AutoSize = False
          Caption = #36755#20837#31649#29702#21592#32534#21495#65306
        end
        object Edit1: TEdit
          Left = 8
          Top = 56
          Width = 121
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 0
        end
        object Button1: TButton
          Left = 8
          Top = 96
          Width = 73
          Height = 25
          Caption = #26597#35810
          TabOrder = 1
          OnClick = Button1Click
        end
      end
    end
    object TabSheet1: TTabSheet
      Caption = #22686#21152#20540#29677#20449#24687
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 249
        Height = 436
        Align = alLeft
        TabOrder = 0
        object Label1: TLabel
          Left = 9
          Top = 9
          Width = 72
          Height = 24
          AutoSize = False
          Caption = #20540#29677#26102#38388
        end
        object Label2: TLabel
          Left = 16
          Top = 40
          Width = 32
          Height = 13
          Caption = 'Label2'
        end
        object Label3: TLabel
          Left = 16
          Top = 80
          Width = 97
          Height = 25
          AutoSize = False
          Caption = #20540#29677#21592#32534#21495
        end
        object Label6: TLabel
          Left = 16
          Top = 168
          Width = 73
          Height = 13
          AutoSize = False
          Caption = #20540#29677#24773#20917
        end
        object Label4: TLabel
          Left = 144
          Top = 80
          Width = 97
          Height = 25
          AutoSize = False
          Caption = #20540#29677#20449#24687#32534#21495
        end
        object Memo1: TMemo
          Left = 8
          Top = 192
          Width = 225
          Height = 89
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 0
        end
        object Button2: TButton
          Left = 8
          Top = 296
          Width = 81
          Height = 25
          Caption = #28155#21152
          TabOrder = 1
          OnClick = Button2Click
        end
        object Edit2: TEdit
          Left = 8
          Top = 120
          Width = 89
          Height = 21
          AutoSize = False
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 2
        end
        object Edit3: TEdit
          Left = 136
          Top = 120
          Width = 105
          Height = 21
          AutoSize = False
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 3
        end
      end
      object GroupBox2: TGroupBox
        Left = 249
        Top = 0
        Width = 471
        Height = 436
        Align = alClient
        Caption = #20540#29677#35760#24405
        TabOrder = 1
        object DBGrid2: TDBGrid
          Left = 2
          Top = 15
          Width = 467
          Height = 419
          Align = alClient
          DataSource = DataSource1
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #21024#38500#20540#29677#20449#24687
      ImageIndex = 1
      object Panel3: TPanel
        Left = 0
        Top = 0
        Width = 249
        Height = 436
        Align = alLeft
        TabOrder = 0
        object Label7: TLabel
          Left = 16
          Top = 32
          Width = 169
          Height = 33
          AutoSize = False
          Caption = #35831#36755#20837#35201#21024#38500#30340#20540#29677#32534#21495
        end
        object Edit4: TEdit
          Left = 16
          Top = 80
          Width = 129
          Height = 21
          AutoSize = False
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 0
        end
        object Button3: TButton
          Left = 16
          Top = 144
          Width = 81
          Height = 33
          Caption = #21024#38500
          TabOrder = 1
          OnClick = Button3Click
        end
      end
      object GroupBox3: TGroupBox
        Left = 249
        Top = 0
        Width = 471
        Height = 436
        Align = alClient
        Caption = #20540#29677#35760#24405
        TabOrder = 1
        object DBGrid3: TDBGrid
          Left = 2
          Top = 15
          Width = 467
          Height = 419
          Align = alClient
          DataSource = DataSource1
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
        end
      end
    end
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 216
    Top = 32
  end
  object ADOQuery1: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select  *'
      'from duty_info')
    Left = 32
    Top = 256
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=MSDASQL.1;Persist Security Info=False;Data Source=SD-MI' +
      'S'
    LoginPrompt = False
    Left = 80
    Top = 256
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 128
    Top = 256
  end
end