mainframe.dfm

住宿餐饮 - 订餐管理系统,DelPhi写的。适合酒店

object Form1: TForm1
  Left = 227
  Top = 180
  Width = 726
  Height = 512
  Caption = #35746#39184#31995#32479
  Color = clBtnShadow
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = MainMenu1
  OldCreateOrder = False
  WindowState = wsMaximized
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 718
    Height = 25
    BorderWidth = 1
    Color = clBtnFace
    Indent = 5
    ParentColor = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    Wrapable = False
  end
  object MainMenu1: TMainMenu
    Left = 56
    Top = 200
    object N1: TMenuItem
      Caption = #31995#32479
      object Menu_Sys_UserSetting: TMenuItem
        Caption = #29992#25143#35774#32622
        OnClick = Menu_Sys_UserSettingClick
      end
      object Menu_Sys_ChangePass: TMenuItem
        Caption = #20462#25913#23494#30721
        OnClick = Menu_Sys_ChangePassClick
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object Menu_Sys_Quit: TMenuItem
        Caption = #36864'        '#20986
        OnClick = Menu_Sys_QuitClick
      end
    end
    object N7: TMenuItem
      Caption = #25968#25454#31649#29702
      object Menu_DataCtl_UserInfo: TMenuItem
        Caption = #29992#25143#31649#29702
        OnClick = Menu_DataCtl_UserInfoClick
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object Menu_DataCtl_MenuInfo: TMenuItem
        Caption = #33756#21333#31649#29702
        OnClick = Menu_DataCtl_MenuInfoClick
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object Menu_DataCtl_OrderInfo: TMenuItem
        Caption = #23450#39184#31649#29702
        OnClick = Menu_DataCtl_OrderInfoClick
      end
    end
    object N10: TMenuItem
      Caption = #25968#25454#26597#35810
      object Menu_Query_User: TMenuItem
        Caption = #29992#25143#26597#35810
        OnClick = Menu_Query_UserClick
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Menu_Query_Meun: TMenuItem
        Caption = #33756#21333#26597#35810
        OnClick = Menu_Query_MeunClick
      end
      object N16: TMenuItem
        Caption = '-'
      end
      object Meun_Query_Order: TMenuItem
        Caption = #35746#21333#26597#35810
        OnClick = Meun_Query_OrderClick
      end
    end
    object N11: TMenuItem
      Caption = #24110#21161
      object Menu_Help_About: TMenuItem
        Caption = #20851#20110'...'
        OnClick = Menu_Help_AboutClick
      end
    end
  end
  object OpenDialog: TOpenDialog
    Filter = 'All files (*.*)|*.*'
    Left = 8
    Top = 200
  end
  object ActionList1: TActionList
    Left = 144
    Top = 200
    object FileNew1: TAction
      Category = 'File'
      Caption = '&New'
      Hint = 'New|Create a new file'
      ImageIndex = 6
      ShortCut = 16462
    end
    object FileOpen1: TAction
      Category = 'File'
      Caption = '&Open'
      Hint = 'Open|Open a file'
      ImageIndex = 7
      ShortCut = 16463
    end
    object FileClose1: TWindowClose
      Category = 'File'
      Caption = '&Close'
      Hint = 'Close|Close current file'
    end
    object FileSave1: TAction
      Category = 'File'
      Caption = '&Save'
      Hint = 'Save|Save current file'
      ImageIndex = 8
      ShortCut = 16467
    end
    object FileSaveAs1: TAction
      Category = 'File'
      Caption = 'Save &As...'
      Hint = 'Save As|Save current file with different name'
    end
    object FileExit1: TAction
      Category = 'File'
      Caption = 'E&xit'
      Hint = 'Exit|Exit application'
    end
    object EditCut1: TEditCut
      Category = 'Edit'
      Caption = 'Cu&t'
      Hint = 'Cut|Cuts the selection and puts it on the Clipboard'
      ImageIndex = 0
      ShortCut = 16472
    end
    object EditCopy1: TEditCopy
      Category = 'Edit'
      Caption = '&Copy'
      Hint = 'Copy|Copies the selection and puts it on the Clipboard'
      ImageIndex = 1
      ShortCut = 16451
    end
    object EditPaste1: TEditPaste
      Category = 'Edit'
      Caption = '&Paste'
      Hint = 'Paste|Inserts Clipboard contents'
      ImageIndex = 2
      ShortCut = 16470
    end
    object WindowCascade1: TWindowCascade
      Category = 'Window'
      Caption = '&Cascade'
      Hint = 'Cascade'
      ImageIndex = 17
    end
    object WindowTileHorizontal1: TWindowTileHorizontal
      Category = 'Window'
      Caption = 'Tile &Horizontally'
      Hint = 'Tile Horizontally'
      ImageIndex = 15
    end
    object WindowTileVertical1: TWindowTileVertical
      Category = 'Window'
      Caption = 'Tile &Vertically'
      Hint = 'Tile Vertically'
      ImageIndex = 16
    end
    object WindowMinimizeAll1: TWindowMinimizeAll
      Category = 'Window'
      Caption = '&Minimize All'
      Hint = 'Minimize All'
    end
    object WindowArrangeAll1: TWindowArrange
      Category = 'Window'
      Caption = '&Arrange All'
      Hint = 'Arrange All'
    end
    object HelpAbout1: TAction
      Category = 'Help'
      Caption = '&About...'
      Hint = 
        'About|Displays program information, version number, and copyrigh' +
        't'
    end
  end
end