⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 main.~dfm

📁 delphi+sql编写的医院信息系统
💻 ~DFM
📖 第 1 页 / 共 5 页
字号:
            Visible = True
            OnClick = mxLBarHeaders3Buttons1Click
          end
          item
            AutoSize = True
            AllowGrayed = False
            ButtonIndex = 2
            ButtonStyle = bsLarge
            ButtonView = bvNormal
            BiDiMode = bdLeftToRight
            Checked = False
            Caption = #32844#21153#32500#25252
            Color = clBtnFace
            CheckState = cbUnchecked
            Enabled = True
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            HighlightFont.Charset = DEFAULT_CHARSET
            HighlightFont.Color = clWindowText
            HighlightFont.Height = -11
            HighlightFont.Name = 'MS Sans Serif'
            HighlightFont.Style = []
            HelpContext = 0
            ImageIndex = -1
            Name = 'mxButton3'
            ParentBiDiMode = False
            Transparent = True
            Options = [boAutoWidthLabel, boUnderlineFont]
            Visible = True
            OnClick = mxLBarHeaders3Buttons2Click
          end
          item
            AutoSize = True
            AllowGrayed = False
            ButtonIndex = 3
            ButtonStyle = bsLarge
            ButtonView = bvNormal
            BiDiMode = bdLeftToRight
            Checked = False
            Caption = #20540#29677#20154#21592#31649#29702
            Color = clBtnFace
            CheckState = cbUnchecked
            Enabled = True
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            HighlightFont.Charset = DEFAULT_CHARSET
            HighlightFont.Color = clWindowText
            HighlightFont.Height = -11
            HighlightFont.Name = 'MS Sans Serif'
            HighlightFont.Style = []
            HelpContext = 0
            ImageIndex = -1
            Name = 'mxButton4'
            ParentBiDiMode = False
            Transparent = True
            Options = [boAutoWidthLabel, boUnderlineFont]
            Visible = True
            OnClick = mxLBarHeaders3Buttons3Click
          end>
        BiDiMode = bdLeftToRight
        Caption = #21307#21153#20154#21592#31649#29702
        FirstButtonTop = 10
        HeaderIndex = 3
        HeaderState = hsClosed
        Settings.ButtonUp.AlphaBlend = 255
        Settings.ButtonUp.Gradient.BeginColor = clBtnFace
        Settings.ButtonDown.AlphaBlend = 255
        Settings.ButtonDown.Gradient.BeginColor = clBtnFace
        Settings.ButtonFocused.AlphaBlend = 255
        Settings.ButtonFocused.Gradient.BeginColor = clBtnFace
        Settings.ButtonDisabled.AlphaBlend = 255
        Settings.ButtonDisabled.Gradient.BeginColor = clBtnFace
        Settings.ButtonFont.Charset = DEFAULT_CHARSET
        Settings.ButtonFont.Color = clWindowText
        Settings.ButtonFont.Height = -11
        Settings.ButtonFont.Name = 'MS Sans Serif'
        Settings.ButtonFont.Style = []
        Settings.ButtonHighlightFont.Charset = DEFAULT_CHARSET
        Settings.ButtonHighlightFont.Color = clWindowText
        Settings.ButtonHighlightFont.Height = -11
        Settings.ButtonHighlightFont.Name = 'MS Sans Serif'
        Settings.ButtonHighlightFont.Style = []
        Settings.ButtonStyle = bsLarge
        Settings.ButtonView = bvNormal
        Settings.ExplorerAddOn = 12
        Settings.Font.Charset = DEFAULT_CHARSET
        Settings.Font.Color = clWindowText
        Settings.Font.Height = -11
        Settings.Font.Name = 'MS Sans Serif'
        Settings.Font.Style = []
        Settings.HighlightFont.Charset = DEFAULT_CHARSET
        Settings.HighlightFont.Color = clWindowText
        Settings.HighlightFont.Height = -11
        Settings.HighlightFont.Name = 'MS Sans Serif'
        Settings.HighlightFont.Style = []
        Settings.Height = 22
        Settings.LargeWidth = 60
        Settings.LargeHeight = 60
        Settings.PicLabDistance = 8
        Settings.StatusButton.ArrowColor = clBlack
        Settings.StatusButton.Background = clWhite
        Settings.StatusButton.BorderColor = clGray
        Settings.SmallHeight = 20
        Settings.XPColors.BorderColor = clNavy
        Settings.XPColors.Background = 14199984
        Settings.XPColors.PressedBackground = 13076383
        Settings.XPColors.UseShadow = True
        Settings.XPColors.ShadowColor = clBlack
        ImageIndex = 3
        Name = 'mxH_Person'
        Options = [hoButtonDown, hoDrawBorder, hoRoundedHeader, hoShowStatusButton]
        Opened = False
      end
      item
        Background.AlphaBlend = 50
        Background.Color = clWhite
        Background.Gradient.BeginColor = clBtnFace
        Background.Style = btTransparent
        Buttons = <
          item
            AutoSize = True
            AllowGrayed = False
            ButtonIndex = 0
            ButtonStyle = bsLarge
            ButtonView = bvNormal
            BiDiMode = bdLeftToRight
            Checked = False
            Caption = #33647#21697#20998#31867#31649#29702
            Color = clBtnFace
            CheckState = cbUnchecked
            Enabled = True
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            HighlightFont.Charset = DEFAULT_CHARSET
            HighlightFont.Color = clWindowText
            HighlightFont.Height = -11
            HighlightFont.Name = 'MS Sans Serif'
            HighlightFont.Style = []
            HelpContext = 0
            ImageIndex = -1
            Name = 'mxButton1'
            ParentBiDiMode = False
            Transparent = True
            Options = [boAutoWidthLabel, boUnderlineFont]
            Visible = True
            OnClick = mxLBarHeaders4Buttons0Click
          end
          item
            AutoSize = True
            AllowGrayed = False
            ButtonIndex = 1
            ButtonStyle = bsLarge
            ButtonView = bvNormal
            BiDiMode = bdLeftToRight
            Checked = False
            Caption = #33647#21697#31181#31867#32500#25252
            Color = clBtnFace
            CheckState = cbUnchecked
            Enabled = True
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            HighlightFont.Charset = DEFAULT_CHARSET
            HighlightFont.Color = clWindowText
            HighlightFont.Height = -11
            HighlightFont.Name = 'MS Sans Serif'
            HighlightFont.Style = []
            HelpContext = 0
            ImageIndex = -1
            Name = 'mxButton2'
            ParentBiDiMode = False
            Transparent = True
            Options = [boAutoWidthLabel, boUnderlineFont]
            Visible = True
            OnClick = mxLBarHeaders4Buttons1Click
          end
          item
            AutoSize = True
            AllowGrayed = False
            ButtonIndex = 2
            ButtonStyle = bsLarge
            ButtonView = bvNormal
            BiDiMode = bdLeftToRight
            Checked = False
            Caption = #27835#30103#31181#31867#32500#25252
            Color = clBtnFace
            CheckState = cbUnchecked
            Enabled = True
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            HighlightFont.Charset = DEFAULT_CHARSET
            HighlightFont.Color = clWindowText
            HighlightFont.Height = -11
            HighlightFont.Name = 'MS Sans Serif'
            HighlightFont.Style = []
            HelpContext = 0
            ImageIndex = -1
            Name = 'mxButton3'
            ParentBiDiMode = False
            Transparent = True
            Options = [boAutoWidthLabel, boUnderlineFont]
            Visible = True
            OnClick = mxLBarHeaders4Buttons2Click
          end
          item
            AutoSize = True
            AllowGrayed = False
            ButtonIndex = 3
            ButtonStyle = bsLarge
            ButtonView = bvNormal
            BiDiMode = bdLeftToRight
            Checked = False
            Caption = #35745#37327#21333#20301#32500#25252
            Color = clBtnFace
            CheckState = cbUnchecked
            Enabled = True
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            HighlightFont.Charset = DEFAULT_CHARSET
            HighlightFont.Color = clWindowText
            HighlightFont.Height = -11
            HighlightFont.Name = 'MS Sans Serif'
            HighlightFont.Style = []
            HelpContext = 0
            ImageIndex = -1
            Name = 'mxButton4'
            ParentBiDiMode = False
            Transparent = True
            Options = [boAutoWidthLabel, boUnderlineFont]
            Visible = True
            OnClick = mxLBarHeaders4Buttons3Click
          end
          item
            AutoSize = True
            AllowGrayed = False
            ButtonIndex = 4
            ButtonStyle = bsLarge
            ButtonView = bvNormal
            BiDiMode = bdLeftToRight
            Checked = False
            Caption = #33647#21697#20844#21496#32500#25252
            Color = clBtnFace
            CheckState = cbUnchecked
            Enabled = True
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            HighlightFont.Charset = DEFAULT_CHARSET
            HighlightFont.Color = clWindowText
            HighlightFont.Height = -11
            HighlightFont.Name = 'MS Sans Serif'
            HighlightFont.Style = []
            HelpContext = 0
            ImageIndex = -1
            Name = 'mxButton5'
            ParentBiDiMode = False
            Transparent = True
            Options = [boAutoWidthLabel, boUnderlineFont]
            Visible = True
            OnClick = mxLBarHeaders4Buttons4Click
          end>
        BiDiMode = bdLeftToRight
        Caption = #36741#21161#36164#26009#31649#29702
        FirstButtonTop = 10
        HeaderIndex = 4
        HeaderState = hsClosed
        Settings.ButtonUp.AlphaBlend = 255
        Settings.ButtonUp.Gradient.BeginColor = clBtnFace
        Settings.ButtonDown.AlphaBlend = 255
        Settings.ButtonDown.Gradient.BeginColor = clBtnFace
        Settings.ButtonFocused.AlphaBlend = 255
        Settings.ButtonFocused.Gradient.BeginColor = clBtnFace
        Settings.ButtonDisabled.AlphaBlend = 255
        Settings.ButtonDisabled.Gradient.BeginColor = clBtnFace
        Settings.ButtonFont.Charset = DEFAULT_CHARSET
        Settings.ButtonFont.Color = clWindowText
        Settings.ButtonFont.Height = -11
        Settings.ButtonFont.Name = 'MS Sans Serif'
        Settings.ButtonFont.Style = []
        Settings.ButtonHighlightFont.Charset = DEFAULT_CHARSET
        Settings.ButtonHighlightFont.Color = clWindowText
        Settings.ButtonHighlightFont.Height = -11
        Settings.ButtonHighlightFont.Name = 'MS Sans Serif'
        Settings.ButtonHighlightFont.Style = []
        Settings.ButtonStyle = bsLarge
        Settings.ButtonView = bvNormal
        Settings.ExplorerAddOn = 12
        Settings.Font.Charset = DEFAULT_CHARSET
        Settings.Font.Color = clWindowText
        Settings.Font.Height = -11
        Settings.Font.Name = 'MS Sans Serif'
        Settings.Font.Style = []
        Settings.HighlightFont.Charset = DEFAULT_CHARSET
        Settings.HighlightFont.Color = clWindowText
        Settings.HighlightFont.Height = -11
        Settings.HighlightFont.Name = 'MS Sans Serif'
        Settings.HighlightFont.Style = []
        Settings.Height = 22
        Settings.LargeWidth = 60
        Settings.LargeHeight = 60
        Settings.PicLabDistance = 8
        Settings.StatusButton.ArrowColor = clBlack
        Settings.StatusButton.Background = clWhite
        Settings.StatusButton.BorderColor = clGray
        Settings.SmallHeight = 20
        Settings.XPColors.BorderColor = clNavy
        Settings.XPColors.Background = 14199984
        Settings.XPColors.PressedBackground = 13076383
        Settings.XPColors.UseShadow = True
        Settings.XPColors.ShadowColor = clBlack

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -