orderitem.dfm

某大型医院护士站

        Left = 199
        Top = 41
        Width = 30
        Height = 12
        Caption = '医保:'
      end
      object DBCheckReuse: TDBCheckBox
        Left = 133
        Top = 60
        Width = 45
        Height = 14
        TabStop = False
        Alignment = taLeftJustify
        Caption = '回收:'
        DataField = 'IsReuse'
        DataSource = DM.srcOrderItem
        ReadOnly = True
        TabOrder = 0
        ValueChecked = '1'
        ValueUnchecked = '0'
      end
      object DBCheckExCost: TDBCheckBox
        Left = 133
        Top = 79
        Width = 45
        Height = 14
        TabStop = False
        Alignment = taLeftJustify
        Caption = '贵重:'
        DataField = 'IsExcost'
        DataSource = DM.srcOrderItem
        ReadOnly = True
        TabOrder = 1
        ValueChecked = '1'
        ValueUnchecked = '0'
      end
      object DBCheckSelfPay: TDBCheckBox
        Left = 133
        Top = 98
        Width = 45
        Height = 13
        TabStop = False
        Alignment = taLeftJustify
        Caption = '自费:'
        DataField = 'IsSelfPay'
        DataSource = DM.srcOrderItem
        ReadOnly = True
        TabOrder = 2
        ValueChecked = '1'
        ValueUnchecked = '0'
      end
      object DBCheckBox1: TDBCheckBox
        Left = 196
        Top = 60
        Width = 45
        Height = 15
        TabStop = False
        Alignment = taLeftJustify
        Caption = '记帐:'
        DataField = 'IsPayBill'
        DataSource = DM.srcOrderItem
        ReadOnly = True
        TabOrder = 3
        ValueChecked = '1'
        ValueUnchecked = '0'
      end
      object DBCheckBox2: TDBCheckBox
        Left = 196
        Top = 79
        Width = 45
        Height = 15
        TabStop = False
        Alignment = taLeftJustify
        Caption = '麻毒:'
        DataField = 'IsDanger'
        DataSource = DM.srcOrderItem
        ReadOnly = True
        TabOrder = 4
        ValueChecked = '1'
        ValueUnchecked = '0'
      end
      object DBCheckBox3: TDBCheckBox
        Left = 196
        Top = 98
        Width = 45
        Height = 14
        TabStop = False
        Alignment = taLeftJustify
        Caption = '缺药:'
        DataField = 'IsQflag'
        DataSource = DM.srcOrderItem
        ReadOnly = True
        TabOrder = 5
        ValueChecked = '1'
        ValueUnchecked = '0'
      end
    end
  end
  object pn_InputCase: TPanel
    Left = 0
    Top = 394
    Width = 795
    Height = 24
    Align = alBottom
    BevelInner = bvRaised
    BevelOuter = bvNone
    TabOrder = 4
    object Bevel3: TBevel
      Left = 4
      Top = 1
      Width = 4
      Height = 22
      Align = alLeft
      Style = bsRaised
    end
    object Bevel4: TBevel
      Left = 1
      Top = 1
      Width = 3
      Height = 22
      Align = alLeft
      Style = bsRaised
    end
    object Bevel5: TBevel
      Left = 325
      Top = 1
      Width = 3
      Height = 20
    end
    object fcLabel1: TfcLabel
      Left = 339
      Top = 6
      Width = 84
      Height = 12
      Caption = '病人重要提示：'
      TextOptions.Alignment = taLeftJustify
      TextOptions.ShadeColor = clInactiveCaptionText
      TextOptions.Style = fclsRaised
      TextOptions.VAlignment = vaTop
    end
    object lb_Patmsg: TfcLabel
      Left = 440
      Top = 5
      Width = 0
      Height = 0
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TextOptions.Alignment = taLeftJustify
      TextOptions.ShadeColor = clInactiveCaptionText
      TextOptions.Style = fclsRaised
      TextOptions.VAlignment = vaTop
    end
    object Label19: TLabel
      Left = 424
      Top = 6
      Width = 60
      Height = 12
      Caption = '[结算种类]'
    end
    object Label20: TLabel
      Left = 587
      Top = 6
      Width = 60
      Height = 12
      Caption = '[费用情况]'
    end
    object DBText10: TDBText
      Left = 489
      Top = 6
      Width = 65
      Height = 14
      Color = clBtnFace
      DataField = 'BALNAME'
      DataSource = DM.srcPatientBedno
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object fcButtonGroup1: TfcButtonGroup
      Left = 8
      Top = 1
      Width = 312
      Height = 22
      Align = alLeft
      AutoBold = True
      BevelOuter = bvNone
      ButtonClassName = 'TfcShapeBtn'
      ClickStyle = bcsRadioGroup
      ControlSpacing = 1
      Columns = 1
      Layout = loHorizontal
      MaxControlSize = 0
      TabOrder = 0
      Transparent = False
      object btnPartLong: TfcShapeBtn
        Left = 0
        Top = 0
        Width = 78
        Height = 22
        Action = NSLongOrder
        Caption = '有效长嘱'
        Color = clBtnFace
        DitherColor = clWhite
        Down = True
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = [fsBold]
        Glyph.Data = {
          42020000424D4202000000000000420000002800000010000000100000000100
          1000030000000002000000000000000000000000000000000000007C0000E003
          00001F0000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C0000000000000000000000000000000000000000
          1F7C1F7C1F7C1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F0000
          1F7C1F7C1F7C1F7C1F7C1F7C0000FF7F0000000000000000FF7FFF7FFF7F0000
          1F7C1F7C1F7C1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F0000
          1F7C1F7C1F7C1F7C1F7C1F7C0000FF7F000000000000000000000000FF7F0000
          1F7C1F7C1F7C1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F0000
          1F7C1F7C1F7C1F7C1F7C1F7C0000FF7F000000000000000000000000FF7F0000
          1F7C1F7C1F7C1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F0000
          1F7C1F7C1F7C1F7C1F7C1F7C0000FF7F000000000000FF7FFF7FFF7FFF7F0000
          1F7C1F7C1F7C1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7F0000000000000000
          1F7C1F7C1F7C1F7C1F7C1F7C0000FF7F00000000FF7FFF7F0000FF7F00001F7C
          1F7C1F7C1F7C1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7F000000001F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C00000000000000000000000000001F7C1F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C}
        GroupIndex = 1
        NumGlyphs = 0
        ParentClipping = True
        ParentFont = False
        RoundRectBias = 25
        ShadeStyle = fbsHighlight
        TabOrder = 0
        TextOptions.Alignment = taCenter
        TextOptions.VAlignment = vaVCenter
      end
      object btnAllLong: TfcShapeBtn
        Left = 79
        Top = 0
        Width = 77
        Height = 22
        Action = AllLongOrder
        Caption = '所有长嘱'
        Color = clBtnFace
        DitherColor = clWhite
        Glyph.Data = {
          42020000424D4202000000000000420000002800000010000000100000000100
          1000030000000002000000000000000000000000000000000000007C0000E003
          00001F0000001F7C1F7C1F7C1F7C1F7C1F7C0000000000000000000000000000
          0000000000001F7C1F7C1F7C1F7C000000000000FF7FFF7FFF7FFF7FFF7FFF7F
          FF7FFF7F00001F7C1F7C000000000000FF7F0000FF7F0000000000000000FF7F
          FF7FFF7F0000000000000000FF7F0000FF7F0000FF7FFF7FFF7FFF7FFF7FFF7F
          FF7FFF7F00000000FF7F0000FF7F0000FF7F0000FF7F00000000000000000000
          0000FF7F00000000FF7F0000FF7F0000FF7F0000FF7FFF7FFF7FFF7FFF7FFF7F
          FF7FFF7F00000000FF7F0000FF7F0000FF7F0000FF7F00000000000000000000
          0000FF7F00000000FF7F0000FF7F0000FF7F0000FF7FFF7FFF7FFF7FFF7FFF7F
          FF7FFF7F00000000FF7F0000FF7F0000FF7F0000FF7F000000000000FF7FFF7F
          FF7FFF7F00000000FF7F0000FF7F0000FF7F0000FF7FFF7FFF7FFF7FFF7F0000
          0000000000000000FF7F0000FF7F0000FF7F0000FF7F00000000FF7FFF7F0000
          FF7F00001F7C0000FF7F0000FF7F0000FF7F0000FF7FFF7FFF7FFF7FFF7F0000
          00001F7C1F7C0000FF7F0000FF7F0000FF7F0000000000000000000000000000
          1F7C1F7C1F7C0000FF7F0000FF7F00000000000000000000000000001F7C1F7C
          1F7C1F7C1F7C0000FF7F00000000000000000000000000001F7C1F7C1F7C1F7C
          1F7C1F7C1F7C00000000000000000000000000001F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C}
        GroupIndex = 1
        ParentClipping = True
        RoundRectBias = 25
        ShadeStyle = fbsHighlight
        TabOrder = 1
        TextOptions.Alignment = taCenter
        TextOptions.VAlignment = vaVCenter
      end
      object btnPartShort: TfcShapeBtn
        Left = 157
        Top = 0
        Width = 77
        Height = 22
        Action = NSTempOrder
        Caption = '有效临嘱'
        Color = clBtnFace
        DitherColor = clWhite
        Glyph.Data = {
          42020000424D4202000000000000420000002800000010000000100000000100
          1000030000000002000000000000000000000000000000000000007C0000E003
          00001F0000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C0000000000000000000000000000000000000000
          1F7C1F7C1F7C1F7C1F7C0000E07FFF7FE07FFF7FE07FFF7FE07FFF7FE07F0000
          1F7C1F7C1F7C1F7C1F7C0000FF7FE07FFF7FE07FFF7FE07FFF7FE07FFF7F0000
          1F7C1F7C1F7C1F7C1F7C0000E07FFF7FE07FFF7FE07FFF7FE07FFF7FE07F0000
          1F7C1F7C1F7C1F7C1F7C0000FF7FE07FFF7FE07FFF7FE07FFF7FE07FFF7F0000
          1F7C1F7C1F7C1F7C1F7C0000E07FFF7FE07FFF7FE07FFF7FE07FFF7FE07F0000
          1F7C1F7C1F7C1F7C1F7C0000FF7FE07FFF7FE07FFF7FE07FFF7FE07FFF7F0000
          1F7C1F7C1F7C1F7C1F7C00000000000000000000000000000000000000001F7C
          1F7C1F7C1F7C1F7C1F7C1F7C0000FF7FE07FFF7FE07F00001F7C1F7C1F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7CEF3D0000000000000000EF3D1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C}
        GroupIndex = 1
        ParentClipping = True
        RoundRectBias = 25
        ShadeStyle = fbsHighlight
        TabOrder = 2
        TextOptions.Alignment = taCenter
        TextOptions.VAlignment = vaVCenter
      end
      object btnAllShort: TfcShapeBtn
        Left = 235
        Top = 0
        Width = 77
        Height = 22
        Action = AllTempOrder
        Caption = '所有临嘱'
        Color = clBtnFace
        DitherColor = clWhite
        Glyph.Data = {
          42020000424D4202000000000000420000002800000010000000100000000100
          1000030000000002000000000000000000000000000000000000007C0000E003
          00001F0000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C00000000000000000000000000000000
          000000001F7C1F7C1F7C1F7C1F7C0000E07FFF7FE07FFF7FE07FFF7FE07FFF7F
          E07F00001F7C1F7C1F7C1F7C00000000FF7FE07FFF7FE07FFF7FE07FFF7FE07F
          FF7F00001F7C1F7C1F7C0000E07F0000E07FFF7FE07FFF7FE07FFF7FE07FFF7F
          E07F00001F7C1F7C00000000FF7F0000FF7FE07FFF7FE07FFF7FE07FFF7FE07F
          FF7F00001F7C0000E07F0000E07F0000E07FFF7FE07FFF7FE07FFF7FE07FFF7F
          E07F00001F7C0000FF7F0000FF7F0000FF7FE07FFF7FE07FFF7FE07FFF7FE07F
          FF7F00001F7C0000E07F0000E07F000000000000000000000000000000000000
          00001F7C1F7C0000FF7F0000FF7FE07F0000FF7FE07FFF7FE07F0000FF7F0000
          1F7C1F7C1F7C0000E07F000000000000EF3D0000000000000000EF3D00001F7C
          1F7C1F7C1F7C0000FF7FE07F0000FF7FE07FFF7FE07F0000FF7F00001F7C1F7C
          1F7C1F7C1F7C000000000000EF3D0000000000000000EF3D00001F7C1F7C1F7C
          1F7C1F7C1F7C1F7C0000FF7FE07FFF7FE07F00001F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C1F7CEF3D0000000000000000EF3D1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C}
        GroupIndex = 1
        ParentClipping = True
        RoundRectBias = 25
        ShadeStyle = fbsHighlight
        TabOrder = 3
        TextOptions.Alignment = taCenter
        TextOptions.VAlignment = vaVCenter
      end
    end
  end
  object pn_PatInfo: TPanel
    Left = 0
    Top = 28
    Width = 795
    Height = 25
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvNone
    TabOrder = 5
    object Label1: TLabel
      Left = 6
      Top = 6
      Width = 24
      Height = 12
      Caption = '床号'
    end
    object Bevel6: TBevel
      Left = 174
      Top = 2
      Width = 3
      Height = 21
      Shape = bsLeftLine
    end
    object lbInid: TDBText
      Left = 224
      Top = 6
      Width = 36
      Height = 12