umain.dfm

小区物业管理(delphi+sql server)源代码

object MainForm: TMainForm
  Left = 222
  Top = 286
  Width = 654
  Height = 199
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #23567#21306#29289#19994#31649#29702#31995#32479
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object ControlBar1: TControlBar
    Left = 0
    Top = 0
    Width = 646
    Height = 41
    Align = alTop
    TabOrder = 0
    object ToolBar1: TToolBar
      Left = 11
      Top = 2
      Width = 605
      Height = 23
      AutoSize = True
      ButtonHeight = 21
      ButtonWidth = 91
      Caption = 'ToolBar1'
      Flat = True
      ShowCaptions = True
      TabOrder = 0
      object ToolButton3: TToolButton
        Left = 0
        Top = 0
        AllowAllUp = True
        AutoSize = True
        Caption = #22522#26412#25968#25454#24405#20837
        MenuItem = DataInput
      end
      object ToolButton1: TToolButton
        Left = 83
        Top = 0
        AllowAllUp = True
        Caption = #29289#19994#31649#29702
        MenuItem = WYManage
        ParentShowHint = False
        ShowHint = False
      end
      object ToolButton2: TToolButton
        Left = 174
        Top = 0
        AllowAllUp = True
        Caption = #32479#35745#25253#34920#19982#26597#35810
        MenuItem = rptMenu
      end
      object ToolButton4: TToolButton
        Left = 265
        Top = 0
        AllowAllUp = True
        Caption = #31995#32479#31649#29702
        MenuItem = SYSMENU
      end
      object ToolButton5: TToolButton
        Left = 356
        Top = 0
        AllowAllUp = True
        Caption = #24110#21161'[F1]'
        MenuItem = N9
      end
    end
  end
  object ToolBar2: TToolBar
    Left = 0
    Top = 41
    Width = 646
    Height = 87
    Align = alClient
    ButtonHeight = 48
    ButtonWidth = 103
    Caption = 'ToolBar1'
    EdgeInner = esLowered
    Images = ImageList1
    ParentShowHint = False
    ShowCaptions = True
    ShowHint = True
    TabOrder = 1
    Transparent = True
    object TSGLBT: TToolButton
      Left = 0
      Top = 2
      Hint = #20303#25143#25237#35785#31649#29702
      Caption = #20303#25143#25237#35785#31649#29702
      ImageIndex = 10
      OnClick = TSGLBTClick
    end
    object ZHZLBT: TToolButton
      Left = 103
      Top = 2
      Hint = #20303#25143#36164#26009#24405#20837#32534#36753
      Caption = #20303#25143#36164#26009#24405#20837#32534#36753
      ImageIndex = 5
      OnClick = ZHZLBTClick
    end
    object JFDJBT: TToolButton
      Left = 206
      Top = 2
      Hint = #29289#19994#32564#36153#21333#25454#31649#29702
      Caption = #29289#19994#32564#36153#31649#29702
      ImageIndex = 16
      OnClick = JFDJBTClick
    end
    object BXGLBT: TToolButton
      Left = 309
      Top = 2
      Hint = #20303#25143#25253#20462#31649#29702
      Caption = #20303#25143#25253#20462#31649#29702
      ImageIndex = 11
      OnClick = BXGLBTClick
    end
    object BACKDATABT: TToolButton
      Left = 412
      Top = 2
      Hint = #25968#25454#22791#20221#19982#24674#22797
      Caption = #25968#25454#22791#20221#19982#24674#22797
      ImageIndex = 2
      OnClick = BACKDATABTClick
    end
    object ToolButton15: TToolButton
      Left = 515
      Top = 2
      Hint = #36864#20986#31995#32479
      Caption = #36864#20986#31995#32479
      ImageIndex = 3
      OnClick = ToolButton15Click
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 128
    Width = 646
    Height = 25
    Panels = <
      item
        Width = 200
      end
      item
        Width = 200
      end
      item
        Width = 400
      end>
  end
  object MainMenu1: TMainMenu
    AutoMerge = True
    OwnerDraw = True
    Left = 576
    object N38: TMenuItem
      Caption = '-'
    end
    object DataInput: TMenuItem
      Caption = #22522#26412#25968#25454#24405#20837
      object FXZLLR: TMenuItem
        Caption = #25151#22411#36164#26009#24405#20837
        OnClick = FXZLLRClick
      end
      object ZHZLLR: TMenuItem
        Caption = #20303#25143#36164#26009#24405#20837
        OnClick = ZHZLLRClick
      end
      object N35: TMenuItem
        Caption = '-'
      end
      object SFGL: TMenuItem
        Caption = #29289#19994#25910#36153#39033#30446#31649#29702
        OnClick = SFGLClick
      end
      object N37: TMenuItem
        Caption = '-'
      end
      object TCCCWLR: TMenuItem
        Caption = #20572#36710#22330#36710#20301#36164#26009#24405#20837
        OnClick = TCCCWLRClick
      end
    end
    object WYManage: TMenuItem
      Caption = #29289#19994#31649#29702
      object TSGL: TMenuItem
        Caption = #20303#25143#25237#35785#31649#29702
        OnClick = TSGLClick
      end
      object BXGL: TMenuItem
        Caption = #20303#25143#25253#20462#31649#29702
        OnClick = BXGLClick
      end
      object N47: TMenuItem
        Caption = '-'
      end
      object TCGL: TMenuItem
        Caption = #20303#25143#20572#36710#36710#20301#31649#29702
        OnClick = TCGLClick
      end
      object N44: TMenuItem
        Caption = '-'
      end
      object WYJFGL: TMenuItem
        Caption = #29289#19994#32564#36153#31649#29702
        OnClick = WYJFGLClick
      end
      object YFKGL: TMenuItem
        Caption = #20303#25143#39044#20184#27454#31649#29702
        OnClick = YFKGLClick
      end
    end