?? mc_sdmqfdy.~dfm

?? 物業管理 1.建立一個WYGL數據庫
?? ~DFM
?? 第 1 頁 / 共 5 頁
字號:
12 3 4 5 下一頁
object SDMQFDY: TSDMQFDY
  Left = 222
  Top = 75
  Hint = '水電煤氣費打印'
  BorderStyle = bsToolWindow
  Caption = '水電煤氣費打印：'
  ClientHeight = 626
  ClientWidth = 792
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋體'
  Font.Style = []
  OldCreateOrder = False
  Scaled = False
  ShowHint = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object GroupBox1: TGroupBox
    Left = 4
    Top = 5
    Width = 193
    Height = 51
    Caption = '現有小區：'
    TabOrder = 0
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 9
      Top = 21
      Width = 174
      Height = 20
      KeyField = '小區名'
      ListField = '小區名'
      ListSource = DataSource1
      TabOrder = 0
    end
  end
  object GroupBox2: TGroupBox
    Left = 4
    Top = 61
    Width = 193
    Height = 225
    Caption = '區內樓房列表：'
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 8
      Top = 17
      Width = 175
      Height = 198
      DataSource = DataSource2
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = '宋體'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = '大樓名稱'
          Width = 95
          Visible = True
        end
        item
          Expanded = False
          FieldName = '負責人'
          Width = 44
          Visible = True
        end>
    end
  end
  object GroupBox3: TGroupBox
    Left = 202
    Top = 4
    Width = 119
    Height = 617
    Caption = '選種房屋列表：'
    TabOrder = 2
    object ListBox1: TListBox
      Left = 8
      Top = 16
      Width = 103
      Height = 569
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = '宋體'
      Font.Style = []
      ItemHeight = 16
      ParentFont = False
      TabOrder = 0
      OnDblClick = ListBox1DblClick
    end
    object BitBtn1: TBitBtn
      Left = 8
      Top = 588
      Width = 103
      Height = 25
      Caption = '確定'
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = '宋體'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = BitBtn1Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333330000333333333333333333333333F33333333333
        00003333344333333333333333388F3333333333000033334224333333333333
        338338F3333333330000333422224333333333333833338F3333333300003342
        222224333333333383333338F3333333000034222A22224333333338F338F333
        8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
        33333338F83338F338F33333000033A33333A222433333338333338F338F3333
        0000333333333A222433333333333338F338F33300003333333333A222433333
        333333338F338F33000033333333333A222433333333333338F338F300003333
        33333333A222433333333333338F338F00003333333333333A22433333333333
        3338F38F000033333333333333A223333333333333338F830000333333333333
        333A333333333333333338330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
  end
  object GroupBox4: TGroupBox
    Left = 4
    Top = 291
    Width = 193
    Height = 330
    Caption = '房間信息列表：'
    TabOrder = 3
    object DBGrid2: TDBGrid
      Left = 9
      Top = 18
      Width = 172
      Height = 302
      DataSource = DataSource3
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = '宋體'
      TitleFont.Style = []
      OnDblClick = DBGrid2DblClick
      Columns = <
        item
          Expanded = False
          FieldName = '房間編號'
          Width = 71
          Visible = True
        end
        item
          Expanded = False
          FieldName = '房主姓名'
          Visible = True
        end>
    end
  end
  object PageControl1: TPageControl
    Left = 328
    Top = 8
    Width = 460
    Height = 613
    ActivePage = TabSheet1
    TabOrder = 4
    object TabSheet1: TTabSheet
      Caption = '【水費】'
      object DBGrid3: TDBGrid
        Left = 5
        Top = 6
        Width = 441
        Height = 551
        DataSource = DataSource4
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = '宋體'
        TitleFont.Style = []
      end
      object BitBtn2: TBitBtn
        Left = 5
        Top = 560
        Width = 148
        Height = 26
        Caption = '打印水費信息'
        TabOrder = 1
        OnClick = BitBtn2Click
        Glyph.Data = {
          36020000424D3602000000000000360000002800000010000000100000000100
          10000000000000020000000000000000000000000000000000001F7CEF3DEF3D
          EF3DEF3DEF3D1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7CAD3528212821
          282128218B2D39671F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C734EFF7FDD77
          9C737A6B734E3967EF3D1F7C28211F7C1F7C1F7C1F7C1F7C1F7C1F7C7A6BDD77
          DD77DD777A6B8B2DE71CEF3DC51484101F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          5146E71CAD35734EB452734EE71CE71C21041F7C1F7C1F7C1F7C1F7CEF3DE71C
          B452F75E9C73734EB452B452E71CE71C2821C514E71C1F7C1F7C282139677A6B
          DD77EF3DB452B452F75E734EE71CE71CE71CE71CE71C84101F7CDD77F75E5146
          7A6B3967F75EF75E9C73B452E71CE71CE71CE71CE71CE71C8410DD779C739C73
          9C739C739C73F75EF75EB452C514C5142821E71CE71CE71C0000DD77DD779C73
          F75EF75E7A6B7A6BDD779C73734EE71CE71C2821E71CE71C2104DD77F75E9C73
          9C73DD77FF7F734E3967F75EB452F75E5146C514E71CE71C2104DD77DD77DD77
          B452AD35B452B452282128219C737A6B9C73DD77C514E71C21047A6B3967AD35
          DD77FF7FFF7FDD779C73B4528B2DF75EF75EE71CAD35E71C21041F7C1F7CB452
          3967E71C28212821EF3D734EE71C21043967AD359C735F6F21041F7C1F7C1F7C
          1F7C7A6BAD35E71C8410E71CB452DD77DD77F75E1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C3967F75EFF7F7A6BF75E1F7C1F7C1F7C1F7C1F7C1F7C}
      end
    end
    object TabSheet2: TTabSheet
      Caption = '【電費】'
      ImageIndex = 1
      object DBGrid4: TDBGrid
        Left = 5
        Top = 6
        Width = 441
        Height = 551
        DataSource = DataSource5
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = '宋體'
        TitleFont.Style = []
      end
      object BitBtn3: TBitBtn
        Left = 5
        Top = 560
        Width = 148
        Height = 26
        Caption = '打印電費信息'
        TabOrder = 1
        OnClick = BitBtn3Click
        Glyph.Data = {
          36020000424D3602000000000000360000002800000010000000100000000100
          10000000000000020000000000000000000000000000000000001F7CEF3DEF3D
          EF3DEF3DEF3D1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7CAD3528212821
          282128218B2D39671F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C734EFF7FDD77
          9C737A6B734E3967EF3D1F7C28211F7C1F7C1F7C1F7C1F7C1F7C1F7C7A6BDD77
          DD77DD777A6B8B2DE71CEF3DC51484101F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          5146E71CAD35734EB452734EE71CE71C21041F7C1F7C1F7C1F7C1F7CEF3DE71C
          B452F75E9C73734EB452B452E71CE71C2821C514E71C1F7C1F7C282139677A6B
          DD77EF3DB452B452F75E734EE71CE71CE71CE71CE71C84101F7CDD77F75E5146
          7A6B3967F75EF75E9C73B452E71CE71CE71CE71CE71CE71C8410DD779C739C73
          9C739C739C73F75EF75EB452C514C5142821E71CE71CE71C0000DD77DD779C73
          F75EF75E7A6B7A6BDD779C73734EE71CE71C2821E71CE71C2104DD77F75E9C73
          9C73DD77FF7F734E3967F75EB452F75E5146C514E71CE71C2104DD77DD77DD77
          B452AD35B452B452282128219C737A6B9C73DD77C514E71C21047A6B3967AD35
          DD77FF7FFF7FDD779C73B4528B2DF75EF75EE71CAD35E71C21041F7C1F7CB452
          3967E71C28212821EF3D734EE71C21043967AD359C735F6F21041F7C1F7C1F7C
          1F7C7A6BAD35E71C8410E71CB452DD77DD77F75E1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C3967F75EFF7F7A6BF75E1F7C1F7C1F7C1F7C1F7C1F7C}
      end
    end
    object TabSheet3: TTabSheet
      Caption = '【煤氣費】'
      ImageIndex = 2
      object DBGrid5: TDBGrid
        Left = 5
        Top = 6
        Width = 441
        Height = 551
        DataSource = DataSource6
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = '宋體'
        TitleFont.Style = []
      end
      object BitBtn4: TBitBtn
        Left = 5
        Top = 560
        Width = 148
        Height = 26
        Caption = '打印煤氣費信息'
        TabOrder = 1
        OnClick = BitBtn4Click
        Glyph.Data = {
          36020000424D3602000000000000360000002800000010000000100000000100
          10000000000000020000000000000000000000000000000000001F7CEF3DEF3D
          EF3DEF3DEF3D1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7CAD3528212821
          282128218B2D39671F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C734EFF7FDD77
          9C737A6B734E3967EF3D1F7C28211F7C1F7C1F7C1F7C1F7C1F7C1F7C7A6BDD77
          DD77DD777A6B8B2DE71CEF3DC51484101F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          5146E71CAD35734EB452734EE71CE71C21041F7C1F7C1F7C1F7C1F7CEF3DE71C
          B452F75E9C73734EB452B452E71CE71C2821C514E71C1F7C1F7C282139677A6B
          DD77EF3DB452B452F75E734EE71CE71CE71CE71CE71C84101F7CDD77F75E5146
          7A6B3967F75EF75E9C73B452E71CE71CE71CE71CE71CE71C8410DD779C739C73
          9C739C739C73F75EF75EB452C514C5142821E71CE71CE71C0000DD77DD779C73
          F75EF75E7A6B7A6BDD779C73734EE71CE71C2821E71CE71C2104DD77F75E9C73
          9C73DD77FF7F734E3967F75EB452F75E5146C514E71CE71C2104DD77DD77DD77
          B452AD35B452B452282128219C737A6B9C73DD77C514E71C21047A6B3967AD35
          DD77FF7FFF7FDD779C73B4528B2DF75EF75EE71CAD35E71C21041F7C1F7CB452
          3967E71C28212821EF3D734EE71C21043967AD359C735F6F21041F7C1F7C1F7C
          1F7C7A6BAD35E71C8410E71CB452DD77DD77F75E1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C3967F75EFF7F7A6BF75E1F7C1F7C1F7C1F7C1F7C1F7C}
      end
    end
  end
  object QuickRep1: TQuickRep
    Left = 184
    Top = 631
    Width = 794
    Height = 1123
    Frame.Color = clBlack
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    DataSet = Query2
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋體'
    Font.Style = []
    Functions.Strings = (
      'PAGENUMBER'
      'COLUMNNUMBER'
      'REPORTTITLE')
    Functions.DATA = (
      '0'
      '0'
      #39#39)
    OnPreview = QuickRep1Preview
    Options = [FirstPageHeader, LastPageFooter]
    Page.Columns = 1
    Page.Orientation = poPortrait
    Page.PaperSize = A4
    Page.Values = (
      100
      2970
      100
      2100
      100
      100
      0)
    PrinterSettings.Copies = 1
    PrinterSettings.Duplex = False
    PrinterSettings.FirstPage = 0
    PrinterSettings.LastPage = 0
    PrinterSettings.OutputBin = Auto
    PrintIfEmpty = True
    SnapToGrid = True
    Units = MM
    Zoom = 100
    object PageHeaderBand1: TQRBand
      Left = 38
      Top = 38
      Width = 718
      Height = 40
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      AlignToBottom = False
      Color = clWhite
      ForceNewColumn = False
      ForceNewPage = False
      Size.Values = (
        105.833333333333
        1899.70833333333)
      BandType = rbPageHeader
      object QRLabel1: TQRLabel
        Left = 300
        Top = 10
        Width = 97
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          793.75
          26.4583333333333
          256.645833333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = '水費信息打印'
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = '宋體'
        Font.Style = []
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 12
      end
      object QRLabel2: TQRLabel
        Left = 10
        Top = 20
        Width = 61
        Height = 13
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          34.3958333333333
          26.4583333333333
          52.9166666666667
          161.395833333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = '[萬通花園]'
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = '宋體'
        Font.Style = []
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRLabel9: TQRLabel
        Left = 600
        Top = 20
        Width = 25
        Height = 13
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          34.3958333333333
          1587.5
          52.9166666666667
          66.1458333333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = '第：'
        Color = clWhite
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRSysData1: TQRSysData
        Left = 630
        Top = 20
        Width = 43
        Height = 13
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          34.3958333333333
          1666.875
12 3 4 5 下一頁
?? 文件大小 6772 K
?? 上傳用戶 suroot2005
?? 所屬分類數據庫系統
??? 相關標簽

#WYGL #物業管理 #數據庫
?? 快捷鍵說明

復制代碼 Ctrl + C
搜索代碼 Ctrl + F
全屏模式 F11
切換主題 Ctrl + Shift + D
顯示快捷鍵 ?
增大字號 Ctrl + =
減小字號 Ctrl + -
亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频

?? mc_sdmqfdy.~dfm

?? 快捷鍵說明
