mzshg.dfm

delphi制作的校医院收费系统

object mzshgf: Tmzshgf
  Left = 136
  Top = 60
  Width = 878
  Height = 726
  AutoSize = True
  BorderIcons = [biSystemMenu]
  Caption = #38376#35786#25910#36153'.'#21010#20215'.'#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020000001001800A80C00001600000028000000200000004000
    00000100180000000000000C0000000000000000000000000000000000000000
    000000000000000000000000000000006F48C0200FB01007AF0F00CF80809FA0
    8FFFA08FFFFFFFFFFFFFFFAF9FB04F6070403F4F403F4F403F4F705870FFF8F0
    FFFFFFFFFFFFA08FFFA08FFF6F67A0DFD0D00000000000000000000000000000
    000000000000000000000000000000007F7FBF1007AF0F00BF3027BFDFD0D07F
    60FFFFF8F0FFFFFFFFF8F0AFAFCFBFE0FFA0D8FF80C0FF80C0FF8F9FB0FFF8F0
    FFFFFFFFFFFFFFFFFF7F60FFAF98C0EFD8E00000000000000000000000000000
    000000000000000000000000000000000000001007AF200FC0C0C0C07F60FFC0
    B0F0FFFFFFFFFFFFF0F0EF6F7F908F9FB0B0D7EFA0D8FF6098CF808080DFD0D0
    CFC0C0DFD0D0EFE8E0AF98C08F7FB00000000000000000000000000000000000
    000000000000000000000000000000000000006F67A0603F90A08FFF7F60FFEF
    E8E0DFD0D0A0978FAFA09F8F677F3000002F283F6087B06098CF8F677FCFC0C0
    F0F0EFEFD8E00000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000080809F6F7F9050678F50779F50779F50678F000000000000
    000000000000000000000000000000000000000000000000000000000000CFA0
    B0000000000000000000000000000000000000000000000000BFBFFFAFAFCFB0
    D7FFBFE0FFBFE0FF8F9FB08090D08090D08090D090C0FF80B0FF80C0FF6087B0
    402F2F000000000000000000000000000000000000BF5090BF5090000000B027
    80B027800000000000000000000000000000000000008F9FB0BFE0FFBFE0FFB0
    D7FFB0D7FFA0C0E08090D080B0FF80B0FF7F7FBFB0D7EF90C0FF80B0FF90C0FF
    80B0FF80809F00000000000000000000000090085FDF1790C0107FDF1790C010
    7FC0278F000000000000000000000000000000B0D7EFBFE0FFB0D7FFB0D7FFB0
    D7FFBFE0FF80809F7F7FBF7F7FBF7F7FBF6F67A0B0D7FFB0D7FF90C0FF80B0FF
    80B0FF80B0FF6087B00000000000000000007F7FBF8090D08090D090408FB010
    70CF1F90A04F70000000000000000000B0D7EFBFE0FFB0D7FFB0D7FFB0D7FFB0
    D7FFB0D7FF8F9FB08F9FB08F9FB08F9FB0AFAFCFB0D7FFB0D7FFB0D7FF80C0FF
    80B0FF80B0FF80C0FF50779F00000070A0DF80C0FF80C0FF80C0FF6098CFA00F
    60CF1F90DF17900000000000008F9FB0BFE0FFB0D7FFB0D7FFB0D7FFB0D7FFB0
    D7FFB0D7FFA0D8FFA0D8FFBFE0FFBFE0FFBFE0FFB0D7FFB0D7FFBFE0FFA0D8FF
    90C0FF80B0FF80B0FF80C0FF4F607070A0DF80B0FF6098CF80C0FF80C0FF7F08
    40C0107FDF179080407F0000008F9FB0BFE0FFB0D7FFB0D7FFB0D7FFB0D7FFB0
    D7FFB0D7FF80B0FF80B0FF80B0FFB0D7FFB0D7FFB0D7FFA0C0E0504F6F50203F
    705870F0F0EF80809F6087B06098CF6098CF80C0FF6087B080B0FF90C0FF5F0F
    30B01070A02F70A0C0E06098CF8F9FB0BFE0FFB0D7FFB0D7FFBFE0FFBFE0FFBF
    E0FFBFE0FF90C0FF80B0FF90C0FFBFE0FFBFE0FFB0D7FF603F405F0F305F0F30
    300000AFA09FDFD0D0402F2F6087B0403F4F6087B06087B06098CFA0C0E07F08
    407F0840808080A0D8FF6098CF8F9FB0A0C0E0DFD0FFF0F0EF8F677F5F2F4F8F
    9FB0BFE0FFB0D7FFB0D7FFB0D7FFB0D7FFBFE0FFAFAFCF801850A04F707F3850
    A06F807F3850F0F0EF403F4F504F6F7F084050203F6098CFBFE0FFA06F80CF40
    9F5F0F30A06F80A0D8FF6087B06F7F90AFA09FFFFFFFCFB0BF7F08407F08404F
    0810A0C0E0BFE0FFBFE0FFB0D7FFB0D7FFBFE0FF9F8FB07F08405F0F3060173F
    A078907F3850EFE8E0402F2F60173F90085F90085F602F4F705870C0107FCF40
    9FAF287F50203F90C0FF6087B06F7F90A0978FFFFFFF8F677F7F0840A04F707F
    385080809FBFE0FFB0D7FFB0D7FFB0D7FFBFE0FF9F8FB08F677F8F677F4F0810
    4F08107F3850A0978F402F2F90085F7F0840B010707F08404F0810B010704F08
    10CF1F9090085F603F404F60708F9FB08F677FFFFFFF603F405F0F3060173F60
    173F80809FB0D7EFB0D7FFB0D7FFB0D7FFB0D7FFA0C0E0FFF8F0FFFFFF602F4F
    4F0810603F40403F4F80407FB010708F084F9F1060504F6F2F283F50678F7F08
    408F084FCF1F907F084060173F8018504F0810DFD0D0AFA09FDFC0D0602F4F30
    00008F9FB0A0C0E08F9FB0BFE0FFB0D7FFB0D7FFB0D7EFF0F0EFFFFFFF7F3850
    30000030000050678F90408FB010709F1060A00F6080407F6087B050B7E0B010
    7090085F8F084FA00F60B01070C0107F5F0F30603F40FFF8F0FFFFFFAFA09F30
    0000AFAFCFB0D7FF705870A0C0E0B0D7FFB0D7FFB0D7EF705870603F40400F10
    403F4F7F38509058A09F206FC0107F90085F90085F9F10606098CF6098CFDF17
    90C0107F8F084FC0107FB01070C0107F90085F5F0F308F677FDFD0D08F677F40
    2F2FB0D7FFBFE0FFA06F8080809FBFE0FFBFE0FFB0D7FF602F4F4F081050678F
    AFAFCF90408F8F677FC0107FC0107F7F084090085F7058704FC0EF50B7E0DF17
    90DF17908F084FA00F60B01070DF179090085F8F084F8018504F6070400F104F
    6070BFE0FFBFE0FFAF98C080306F90C0FFBFE0FFB0D7EF80306FAF106F70A0DF
    90C0FFA04F7090408FC0107FAF106F90085F90085F6087B050B7E050B7E0DF17
    90DF1790A00F608F084FAF106FC0107F90085F8F084F80185070A0DF705870AF
    AFCFBFE0FFBFE0FFB0D7EF9F206F8090D0A0D8FFA0C0E09F206FC0107F9F8FDF
    70A0DF80306F80306FB01070DF289FAF106F8F084F50678F6087B04FC0EFDF17
    90DF1790C0107F8F084FA00F60AF106FA00F608F084F90085F7F7FBF7F7FBF9F
    8FB0BFE0FFB0D7FFB0D7FFA02F707F7FBF80C0FF6098CF9F1060C0107F9F8FDF
    6087B07F0840AF106FDF289FE030AF9F206F90085FC0107F80306F3F778FDF17
    90DF1790DF1790B01070A00F60B01070B010707F084090085F9F206F8090D090
    408FA0C0E0B0D7FFB0D7FFA06F809058A080C0FF80809F8F084FB010707F7FBF
    80407F90085FCF1F90E030AFE047B0A02F709F1060DF1790A02F702F283FDF28
    9FDF289FDF1790C0107F90085FA00F60DF17909F10607F08407F084070587080
    306F7F7FBFBFE0FFBFE0FF9F8FB080407F80C0FF9F8FB0B01070DF17908090D0
    80407FA00F60DF289FE047B0EF5FC0A02F70A02F70DF289F5F188F0F00BFE030
    AFDF289FDF289FDF17908F084F90085FCF1F90CF1F9090085FA00F6080185080
    407F90408F90C0FFBFE0FFAFAFCF9F206F80B0FF8F7FB0AF106FDF17909058A0
    9F206F9F1060E047B0EF5FC0F087D0B0478FC0278FC0278F1007AF1000DFE030
    AFE030AFE030AFDF289FC0107F8F084FAF106FE047B0AF106FC0107F90085F80
    407FB027807F7FBFBFE0FFB0D7EFA02F708090D06F67A0B01070CF1F9080306F
    90085FB01070F05FC0F087D0F087D0CF409FE03F9F3F108F0F00CF0F00CFB027
    80F05FC0E047B0E047B0DF1790A00F608F084FE047B0CF409FAF106FC0107F80
    18509F206FAF479F80C0FFB0D7FFC0278F9058A080407FB01070CF1F909F206F
    A00F60CF1F90F087D0FF97E0F087D0E03F9FB027800F00BF1000DF1007AFA02F
    70EF5FC0F087D0EF5FC0E047B0DF17908F084F9F1060F087D09F206FCF1F90AF
    106F8F084FB010708090D080C0FFCF409F80306F80407FC0107FCF1F90B01070
    B02780E047B0FF97E0F087D0F05FC0E03F9F3F108F1000DF1000DF10078FE047
    B0C05FA0F0AFE0F087D0EF5FC0E030AFC0107F5F0F30CF409FC05FA0AF106FB0
    278090085FB01070B0478F70A0DFAF479F9F1060A02F70B02780CF1F90B02780
    B02780EF5FC0F087D0F05FC0E03F9F5F188F0F00CF0F00CF0F00CF5F188F0000
    00D087B0E0A0CFF0AFE0F087D0EF5FC0E030AFAF106F8F084FF05FC0B0478FCF
    1F90B010709F1060C0107F801850801850B01070B02780C0278FCF1F90B01070
    C0278FEF5FC0EF5FC0E047B05F188F0F00BF2008DF1000DF0F00BFAF479F0000
    00000000CFB0BFE0A0CFFF97E0F087D0E047B0E030AFC0107FB02780F05FC0CF
    409FE030AF9F1060AF106FC0107F90085F9F1060AF287FCF1F90B02780B02780
    E030AFF05FC0E047B05F188F0F00CF2008DF2008DF0F00CF3F108FE047B00000
    00000000000000DFB0CFF0AFE0FF97E0EF5FC0E047B0E030AFB01070C0278FEF
    5FC0E047B0E030AF9F1060C0107FA00F60C0107FC0278FB02780B02780E030AF
    E047B0CF409F5F188F0F00CF2008DF2008DF1000DF10078FCF409F000000FC00
    000FFC00000FFE00001FFE0000FFFFFC0FFF7F8001F93F0000F03E0000701C00
    0020180000000800000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    00000000000000000000000000000000000080000000C0000000E0000001}
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 870
    Height = 41
    Align = alTop
    BevelInner = bvLowered
    BorderStyle = bsSingle
    Color = clGradientActiveCaption
    TabOrder = 0
    object ToolBar1: TToolBar
      Left = 2
      Top = 2
      Width = 862
      Height = 29
      ButtonHeight = 23
      Caption = 'ToolBar1'
      TabOrder = 0
      object Label17: TLabel
        Left = 0
        Top = 2
        Width = 617
        Height = 23
        AutoSize = False
        Caption = '                                    '#38376#35786#25910#36153','#21010#20215','#31649#29702#25805#20316#31383#21475
        Font.Charset = GB2312_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
    end
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 41
    Width = 870
    Height = 658
    Align = alClient
    TabOrder = 1
    object Panel2: TPanel
      Left = 2
      Top = 15
      Width = 866
      Height = 58
      Align = alTop
      BevelInner = bvLowered
      Color = clWhite
      TabOrder = 0
      object Label1: TLabel
        Left = 40
        Top = 8
        Width = 60
        Height = 13
        Caption = #38376#35786#32534#21495#65306
      end
      object Label2: TLabel
        Left = 197
        Top = 8
        Width = 60
        Height = 13
        Caption = #30149#20154#22995#21517#65306
      end
      object Label3: TLabel
        Left = 354
        Top = 8
        Width = 60
        Height = 13
        Caption = #25346#21495#26085#26399#65306
      end
      object Label4: TLabel
        Left = 512
        Top = 8
        Width = 60
        Height = 13
        Caption = #20027#27835#21307#24072#65306
      end
      object Edit1: TEdit
        Left = 40
        Top = 32
        Width = 81
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 0
        Text = 'Edit1'
        OnKeyPress = Edit1KeyPress
      end
      object Edit2: TEdit
        Left = 200
        Top = 32
        Width = 97
        Height = 21
        Color = clGradientInactiveCaption
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 1
        Text = 'Edit2'
      end
      object Edit3: TEdit
        Left = 352
        Top = 32
        Width = 121
        Height = 21
        Color = clGradientInactiveCaption
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 2
        Text = 'Edit3'
      end
      object ComboBox2: TComboBox
        Left = 512
        Top = 32
        Width = 73
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        TabOrder = 3
        Text = #21307#29983#22995#21517
        Items.Strings = (
          #29579'1'
          #23567'2'
          #23567'3'
          #23567'4'
          #23567'5')
      end
    end
    object Panel3: TPanel
      Left = 2
      Top = 554
      Width = 866
      Height = 102
      Align = alBottom
      BevelInner = bvLowered
      Color = clInfoBk
      TabOrder = 1
      object Label7: TLabel
        Left = 2
        Top = 2
        Width = 862
        Height = 13
        Align = alTop
        AutoSize = False
        Caption = '          '#38376#35786#25910#36153#26126#32454#34920':       '
      end
      object DBGrid3: TDBGrid
        Left = 2
        Top = 15
        Width = 862
        Height = 85
        Align = alClient
        DataSource = dm_mzshg.Datamingxi
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnDrawColumnCell = DBGrid3DrawColumnCell
      end
    end
    object Panel4: TPanel
      Left = 2
      Top = 73
      Width = 866
      Height = 481
      Align = alClient
      Color = clSkyBlue
      TabOrder = 2
      object Bevel2: TBevel
        Left = -12
        Top = 232
        Width = 1037
        Height = 4
      end
      object GroupBox2: TGroupBox
        Left = 1
        Top = 1
        Width = 864
        Height = 112
        Align = alTop
        TabOrder = 0
        object Label5: TLabel
          Left = 32
          Top = 16