mc_sfyl.dfm

delph6.0关于物业管理的源码.rar

object SFYL: TSFYL
  Left = 1
  Top = 27
  BorderStyle = bsToolWindow
  Caption = #25910#36153#24773#20917#19968#35272#65306
  ClientHeight = 395
  ClientWidth = 630
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object Bevel1: TBevel
    Left = 1
    Top = 510
    Width = 790
    Height = 9
    Shape = bsTopLine
  end
  object Panel1: TPanel
    Left = 6
    Top = 8
    Width = 781
    Height = 499
    BevelOuter = bvNone
    Caption = 'Panel1'
    TabOrder = 0
    object PageControl1: TPageControl
      Left = 0
      Top = 0
      Width = 781
      Height = 499
      ActivePage = TabSheet1
      Align = alClient
      HotTrack = True
      MultiLine = True
      TabIndex = 0
      TabOrder = 0
      TabPosition = tpBottom
      object TabSheet1: TTabSheet
        Caption = #12304#27700#36153#12305
        object DBGrid1: TDBGrid
          Left = 4
          Top = 2
          Width = 764
          Height = 464
          DataSource = DataSource1
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = #27700#34920#32534#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = #25143#20027#22995#21517
              Visible = True
            end
            item
              Alignment = taLeftJustify
              Expanded = False
              FieldName = #19978#26376#35835#25968
              Visible = True
            end
            item
              Alignment = taLeftJustify
              Expanded = False
              FieldName = #26412#26376#35835#25968
              Visible = True
            end
            item
              Alignment = taLeftJustify
              Expanded = False
              FieldName = #20351#29992#25968
              Visible = True
            end
            item
              Alignment = taLeftJustify
              Expanded = False
              FieldName = #24212#25910#37329#39069
              Visible = True
            end
            item
              Alignment = taLeftJustify
              Expanded = False
              FieldName = #23454#25910#37329#39069
              Visible = True
            end
            item
              Alignment = taLeftJustify
              Expanded = False
              FieldName = #21097#20313#37329#39069
              Visible = True
            end>
        end
      end
      object TabSheet2: TTabSheet
        Caption = #12304#30005#36153#12305
        ImageIndex = 1
        object DBGrid2: TDBGrid
          Left = 4
          Top = 2
          Width = 764
          Height = 464
          DataSource = DataSource2
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = #30005#34920#32534#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = #25143#20027#22995#21517
              Visible = True
            end
            item
              Alignment = taLeftJustify
              Expanded = False
              FieldName = #19978#26376#35835#25968
              Visible = True
            end
            item
              Alignment = taLeftJustify
              Expanded = False
              FieldName = #26412#26376#35835#25968
              Visible = True
            end
            item
              Alignment = taLeftJustify
              Expanded = False
              FieldName = #20351#29992#25968
              Visible = True
            end
            item
              Alignment = taLeftJustify
              Expanded = False
              FieldName = #24212#25910#37329#39069
              Visible = True
            end
            item
              Alignment = taLeftJustify
              Expanded = False
              FieldName = #23454#25910#37329#39069
              Visible = True
            end
            item
              Alignment = taLeftJustify
              Expanded = False
              FieldName = #21097#20313#37329#39069
              Visible = True
            end>
        end
      end
      object TabSheet3: TTabSheet
        Caption = #12304#29028#27668#36153#12305
        ImageIndex = 2
        object DBGrid3: TDBGrid
          Left = 4
          Top = 2
          Width = 764
          Height = 464
          DataSource = DataSource3
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = #29028#27668#34920#32534#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = #25143#20027#22995#21517
              Visible = True
            end
            item
              Expanded = False
              FieldName = #19978#26376#35835#25968
              Visible = True
            end
            item
              Expanded = False
              FieldName = #26412#26376#35835#25968
              Visible = True
            end
            item
              Expanded = False
              FieldName = #20351#29992#25968
              Visible = True
            end
            item
              Expanded = False
              FieldName = #24212#25910#37329#39069
              Visible = True
            end
            item
              Expanded = False
              FieldName = #23454#25910#37329#39069
              Visible = True
            end
            item
              Expanded = False
              FieldName = #21097#20313#37329#39069
              Visible = True
            end>
        end
      end
      object TabSheet5: TTabSheet
        Caption = #12304#24120#29992#36153#29992#12305
        ImageIndex = 4
        object StringGrid1: TStringGrid
          Left = 4
          Top = 2
          Width = 764
          Height = 464
          ColCount = 2
          DefaultColWidth = 11
          DefaultRowHeight = 16
          RowCount = 2
          TabOrder = 0
        end
      end
      object TabSheet4: TTabSheet
        Caption = #12304#20854#23427#36153#29992#12305
        ImageIndex = 4
        object StringGrid2: TStringGrid
          Left = 4
          Top = 2
          Width = 764
          Height = 464
          ColCount = 2
          DefaultColWidth = 11
          DefaultRowHeight = 16
          RowCount = 2
          TabOrder = 0
        end
      end
    end
  end
  object BitBtn1: TBitBtn
    Left = 4
    Top = 518
    Width = 205
    Height = 25
    Caption = #36873#25321#27983#35272#35268#21017'[&F]'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = BitBtn1Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
      33333333333F8888883F33330000324334222222443333388F3833333388F333
      000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
      F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
      223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
      3338888300003AAAAAAA33333333333888888833333333330000333333333333
      333333333333333333FFFFFF000033333333333344444433FFFF333333888888
      00003A444333333A22222438888F333338F3333800003A2243333333A2222438
      F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
      22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
      33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
      3333333333338888883333330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 214
    Top = 518
    Width = 187
    Height = 25
    Caption = #36864#20986#36153#29992#24773#20917#19968#35272'[&Q]'
    TabOrder = 2
    OnClick = BitBtn2Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333FFFFF333333000033333388888833333333333F888888FFF333
      000033338811111188333333338833FFF388FF33000033381119999111833333
      38F338888F338FF30000339119933331111833338F388333383338F300003391
      13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
      33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
      33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
      000039183811193333918338F8F833F83333838F000039118111933339118338
      F3833F83333833830000339111193333391833338F33F8333FF838F300003391
      11833338111833338F338FFFF883F83300003339111888811183333338FF3888
      83FF83330000333399111111993333333388FFFFFF8833330000333333999999
      3333333333338888883333330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object Query1: TQuery
    DatabaseName = 'WYGL'
    SQL.Strings = (
      'Select * From '#27700#36153)
    Left = 16
    Top = 450
    object Query1BDEDesigner: TStringField
      FieldName = #27700#34920#32534#21495
      Origin = 'WYGL.'#27700#36153'.'#27700#34920#32534#21495
      FixedChar = True
    end
    object Query1BDEDesigner2: TStringField
      FieldName = #25143#20027#22995#21517
      Origin = 'WYGL.'#27700#36153'.'#25143#20027#22995#21517
      FixedChar = True
      Size = 10
    end
    object Query1BDEDesigner3: TStringField
      FieldName = #25910#36153#26631#20934
      Origin = 'WYGL.'#27700#36153'.'#25910#36153#26631#20934
      FixedChar = True
    end
    object Query1BDEDesigner4: TFloatField
      FieldName = #25910#36153#37329#39069
      Origin = 'WYGL.'#27700#36153'.'#25910#36153#37329#39069
    end
    object Query1BDEDesigner5: TDateTimeField
      FieldName = #35745#36153#36215#22987#26085#26399
      Origin = 'WYGL.'#27700#36153'.'#35745#36153#36215#22987#26085#26399
    end
    object Query1BDEDesigner6: TDateTimeField
      FieldName = #35745#36153#32456#27490#26085#26399
      Origin = 'WYGL.'#27700#36153'.'#35745#36153#32456#27490#26085#26399
    end
    object Query1BDEDesigner7: TIntegerField
      FieldName = #26412#26376#35835#25968
      Origin = 'WYGL.'#27700#36153'.'#26412#26376#35835#25968
    end
    object Query1BDEDesigner8: TIntegerField
      FieldName = #19978#26376#35835#25968
      Origin = 'WYGL.'#27700#36153'.'#19978#26376#35835#25968
    end
    object Query1BDEDesigner9: TIntegerField
      FieldName = #20351#29992#25968
      Origin = 'WYGL.'#27700#36153'.'#20351#29992#25968
    end
    object Query1BDEDesigner10: TFloatField
      FieldName = #24212#25910#37329#39069
      Origin = 'WYGL.'#27700#36153'.'#24212#25910#37329#39069
    end
    object Query1BDEDesigner11: TFloatField
      FieldName = #23454#25910#37329#39069
      Origin = 'WYGL.'#27700#36153'.'#23454#25910#37329#39069
    end
    object Query1BDEDesigner12: TFloatField
      FieldName = #21097#20313#37329#39069
      Origin = 'WYGL.'#27700#36153'.'#21097#20313#37329#39069
    end
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 16
    Top = 418
  end
  object Query2: TQuery
    DatabaseName = 'WYGL'
    SQL.Strings = (
      'Select * From '#30005#36153)
    Left = 70
    Top = 451
    object Query2BDEDesigner: TStringField
      FieldName = #30005#34920#32534#21495
      Origin = 'WYGL.'#30005#36153'.'#30005#34920#32534#21495
      FixedChar = True
    end
    object Query2BDEDesigner2: TStringField
      FieldName = #25143#20027#22995#21517
      Origin = 'WYGL.'#30005#36153'.'#25143#20027#22995#21517
      FixedChar = True
      Size = 10
    end
    object Query2BDEDesigner3: TStringField
      FieldName = #25910#36153#26631#20934
      Origin = 'WYGL.'#30005#36153'.'#25910#36153#26631#20934
      FixedChar = True
    end
    object Query2BDEDesigner4: TFloatField
      FieldName = #25910#36153#37329#39069
      Origin = 'WYGL.'#30005#36153'.'#25910#36153#37329#39069
    end
    object Query2BDEDesigner5: TDateTimeField
      FieldName = #35745#36153#36215#22987#26085#26399
      Origin = 'WYGL.'#30005#36153'.'#35745#36153#36215#22987#26085#26399
    end
    object Query2BDEDesigner6: TDateTimeField
      FieldName = #35745#36153#32456#27490#26085#26399
      Origin = 'WYGL.'#30005#36153'.'#35745#36153#32456#27490#26085#26399
    end
    object Query2BDEDesigner7: TIntegerField
      FieldName = #26412#26376#35835#25968
      Origin = 'WYGL.'#30005#36153'.'#26412#26376#35835#25968
    end
    object Query2BDEDesigner8: TIntegerField
      FieldName = #19978#26376#35835#25968
      Origin = 'WYGL.'#30005#36153'.'#19978#26376#35835#25968
    end
    object Query2BDEDesigner9: TIntegerField
      FieldName = #20351#29992#25968
      Origin = 'WYGL.'#30005#36153'.'#20351#29992#25968
    end
    object Query2BDEDesigner10: TFloatField
      FieldName = #24212#25910#37329#39069
      Origin = 'WYGL.'#30005#36153'.'#24212#25910#37329#39069
    end
    object Query2BDEDesigner11: TFloatField
      FieldName = #23454#25910#37329#39069
      Origin = 'WYGL.'#30005#36153'.'#23454#25910#37329#39069
    end
    object Query2BDEDesigner12: TFloatField
      FieldName = #21097#20313#37329#39069
      Origin = 'WYGL.'#30005#36153'.'#21097#20313#37329#39069
    end
  end
  object DataSource2: TDataSource
    DataSet = Query2
    Left = 71
    Top = 418
  end
  object Query3: TQuery
    DatabaseName = 'WYGL'
    SQL.Strings = (
      'Select * From '#29028#27668#36153)
    Left = 138
    Top = 451
  end
  object DataSource3: TDataSource
    DataSet = Query3
    Left = 138
    Top = 419
  end
  object Query4: TQuery
    DatabaseName = 'WYGL'
    Left = 218
    Top = 446
  end
  object Query5: TQuery
    DatabaseName = 'WYGL'
    Left = 290
    Top = 446
  end
end