mc_sdfsq.dfm

这是用Delphi编写的小区物业管理系统

object SDFSQ: TSDFSQ
  Left = 150
  Top = 116
  BorderStyle = bsToolWindow
  Caption = #27700#30005#29028#27668#36153#25910#21462#65306
  ClientHeight = 385
  ClientWidth = 636
  Color = clBtnFace
  Constraints.MinHeight = 412
  Constraints.MinWidth = 644
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object BitBtn2: TBitBtn
    Left = 448
    Top = 355
    Width = 197
    Height = 25
    Caption = #36864#20986#25910#36153#31649#29702'[&Q]'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnClick = BitBtn2Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333FFFFF333333000033333388888833333333333F888888FFF333
      000033338811111188333333338833FFF388FF33000033381119999111833333
      38F338888F338FF30000339119933331111833338F388333383338F300003391
      13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
      33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
      33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
      000039183811193333918338F8F833F83333838F000039118111933339118338
      F3833F83333833830000339111193333391833338F33F8333FF838F300003391
      11833338111833338F338FFFF883F83300003339111888811183333338FF3888
      83FF83330000333399111111993333333388FFFFFF8833330000333333999999
      3333333333338888883333330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object PageControl1: TPageControl
    Left = 6
    Top = 6
    Width = 643
    Height = 347
    ActivePage = TabSheet1
    TabIndex = 0
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = #12304#27700#36153#12305
      object StringGrid1: TStringGrid
        Left = 3
        Top = 6
        Width = 622
        Height = 307
        ColCount = 12
        DefaultColWidth = 11
        DefaultRowHeight = 15
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goAlwaysShowEditor]
        TabOrder = 0
        OnKeyUp = StringGrid1KeyUp
        ColWidths = (
          11
          81
          69
          55
          77
          76
          50
          51
          52
          64
          58
          84)
      end
    end
    object TabSheet2: TTabSheet
      Caption = #12304#30005#36153#12305
      ImageIndex = 1
      object StringGrid2: TStringGrid
        Left = 3
        Top = 6
        Width = 622
        Height = 307
        ColCount = 12
        DefaultColWidth = 11
        DefaultRowHeight = 15
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goAlwaysShowEditor]
        TabOrder = 0
        OnKeyUp = StringGrid2KeyUp
        ColWidths = (
          11
          81
          69
          55
          77
          76
          50
          51
          52
          64
          58
          84)
      end
    end
    object TabSheet3: TTabSheet
      Caption = #12304#29028#27668#36153#12305
      ImageIndex = 2
      object StringGrid3: TStringGrid
        Left = 3
        Top = 6
        Width = 622
        Height = 307
        ColCount = 12
        DefaultColWidth = 11
        DefaultRowHeight = 15
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goAlwaysShowEditor]
        TabOrder = 0
        OnKeyUp = StringGrid3KeyUp
        ColWidths = (
          11
          81
          69
          55
          77
          76
          50
          51
          52
          64
          58
          84)
      end
    end
  end
  object BitBtn1: TBitBtn
    Left = 190
    Top = 355
    Width = 251
    Height = 25
    Caption = #23558#20197#19978#36153#29992#20449#24687#22788#29702#21518#20381#27425#36820#22238#34920#20013'[&F]'
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = BitBtn1Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
      33333333333F8888883F33330000324334222222443333388F3833333388F333
      000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
      F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
      223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
      3338888300003AAAAAAA33333333333888888833333333330000333333333333
      333333333333333333FFFFFF000033333333333344444433FFFF333333888888
      00003A444333333A22222438888F333338F3333800003A2243333333A2222438
      F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
      22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
      33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
      3333333333338888883333330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object DataSource1: TDataSource
    DataSet = Query2
    Left = 232
    Top = 168
  end
  object Query2: TQuery
    DatabaseName = 'WYGL'
    SQL.Strings = (
      'use WYGL'
      'Select * From '#27700#36153' Where'
      #27700#34920#32534#21495' in ('
      'Select '#25151#38388#32534#21495' From '#25151#23627#20449#24687#34920' '
      'Where '#25151#38388#32534#21495'='#39'A01111'#39' '
      'or '#25151#38388#32534#21495'='#39'A01112'#39' '
      'or '#25151#38388#32534#21495'='#39'A01113'#39' '
      'or '#25151#38388#32534#21495'='#39'A01114'#39' '
      'or '#25151#38388#32534#21495'='#39'A01115'#39' '
      'or '#25151#38388#32534#21495'='#39'A01116'#39' '
      'or '#25151#38388#32534#21495'='#39'A01117'#39' '
      ''
      ')')
    Left = 280
    Top = 152
  end
end