inherited frmEncVitals: TfrmEncVitals
  Left = 353
  Top = 210
  Caption = 'Vitals'
  KeyPreview = True
  OnActivate = FormActivate
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object lvVitals: TCaptionListView [0]
    Left = 0
    Top = 0
    Width = 624
    Height = 368
    Hint = 'To sort, click on column headers|'
    Align = alClient
    Columns = <>
    Constraints.MinHeight = 50
    HideSelection = False
    MultiSelect = True
    ReadOnly = True
    RowSelect = True
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    ViewStyle = vsReport
  end
  object pnlBottom: TPanel [1]
    Left = 0
    Top = 368
    Width = 624
    Height = 32
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 5
  end
  inherited btnOK: TBitBtn
    Left = 444
    Top = 377
    TabOrder = 3
  end
  inherited btnCancel: TBitBtn
    Left = 524
    Top = 377
    TabOrder = 4
  end
  object pnlmain: TPanel [4]
    Left = 28
    Top = 24
    Width = 569
    Height = 217
    TabOrder = 0
    Visible = False
    object lblVitPointer: TOROffsetLabel
      Left = 506
      Top = 48
      Width = 17
      Height = 15
      Caption = '<--'
      Color = clBtnFace
      HorzOffset = 5
      ParentColor = False
      Transparent = False
      VertOffset = 2
      WordWrap = False
    end
    object lblDate: TStaticText
      Left = 56
      Top = 23
      Width = 31
      Height = 17
      Caption = 'Date'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
    end
    object lblDateBP: TStaticText
      Tag = 3
      Left = 50
      Top = 122
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 17
    end
    object lblDateTemp: TStaticText
      Left = 50
      Top = 52
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 4
    end
    object lblDateResp: TStaticText
      Tag = 2
      Left = 50
      Top = 98
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 13
    end
    object lblDatePulse: TStaticText
      Tag = 1
      Left = 50
      Top = 75
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 9
    end
    object lblDateHeight: TStaticText
      Tag = 4
      Left = 50
      Top = 145
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 21
    end
    object lblDateWeight: TStaticText
      Tag = 5
      Left = 50
      Top = 169
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 26
    end
    object lblLstMeas: TStaticText
      Left = 180
      Top = 23
      Width = 80
      Height = 17
      Caption = 'Last Measure'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
    end
    object lbllastBP: TStaticText
      Tag = 3
      Left = 188
      Top = 122
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 18
    end
    object lblLastTemp: TStaticText
      Left = 188
      Top = 52
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 5
    end
    object lblLastResp: TStaticText
      Tag = 2
      Left = 188
      Top = 98
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 14
    end
    object lblLastPulse: TStaticText
      Tag = 1
      Left = 188
      Top = 75
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 10
    end
    object lblLastHeight: TStaticText
      Tag = 4
      Left = 188
      Top = 145
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 22
    end
    object lblLastWeight: TStaticText
      Tag = 5
      Left = 188
      Top = 169
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 27
    end
    object lblVital: TStaticText
      Left = 344
      Top = 23
      Width = 29
      Height = 17
      Caption = 'Vital'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 3
    end
    object lblVitBP: TStaticText
      Left = 344
      Top = 122
      Width = 23
      Height = 17
      Caption = 'B/P'
      TabOrder = 19
    end
    object lnlVitTemp: TStaticText
      Left = 344
      Top = 52
      Width = 31
      Height = 17
      Caption = 'Temp'
      TabOrder = 6
    end
    object lblVitResp: TStaticText
      Left = 344
      Top = 98
      Width = 29
      Height = 17
      Caption = 'Resp'
      TabOrder = 15
    end
    object lblVitPulse: TStaticText
      Left = 344
      Top = 75
      Width = 30
      Height = 17
      Caption = 'Pulse'
      TabOrder = 11
    end
    object lblVitHeight: TStaticText
      Left = 344
      Top = 145
      Width = 35
      Height = 17
      Caption = 'Height'
      TabOrder = 23
    end
    object lblVitWeight: TStaticText
      Left = 344
      Top = 169
      Width = 38
      Height = 17
      Caption = 'Weight'
      TabOrder = 28
    end
    object lblVitPain: TStaticText
      Left = 344
      Top = 193
      Width = 55
      Height = 17
      Caption = 'Pain Scale'
      TabOrder = 33
    end
    object lblLastPain: TStaticText
      Tag = 5
      Left = 188
      Top = 193
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 32
    end
    object lblDatePain: TStaticText
      Tag = 5
      Left = 50
      Top = 193
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 31
    end
    object txtMeasBP: TCaptionEdit
      Tag = 1
      Left = 406
      Top = 119
      Width = 100
      Height = 21
      TabOrder = 20
      OnEnter = SetVitPointer
      OnExit = txtMeasBPExit
      Caption = 'Blood Pressure'
    end
    object cboTemp: TCaptionComboBox
      Tag = 7
      Left = 448
      Top = 48
      Width = 57
      Height = 21
      DropDownCount = 2
      ItemHeight = 13
      TabOrder = 8
      OnChange = cboTempChange
      OnEnter = SetVitPointer
      OnExit = cboTempExit
      Items.Strings = (
        'F'
        'C')
      Caption = 'Temperature'
    end
    object txtMeasTemp: TCaptionEdit
      Tag = 2
      Left = 406
      Top = 48
      Width = 43
      Height = 21
      TabOrder = 7
      OnEnter = SetVitPointer
      OnExit = txtMeasTempExit
      Caption = 'Temperature'
    end
    object txtMeasResp: TCaptionEdit
      Tag = 3
      Left = 406
      Top = 95
      Width = 100
      Height = 21
      TabOrder = 16
      OnEnter = SetVitPointer
      OnExit = txtMeasRespExit
      Caption = 'Resp'
    end
    object cboHeight: TCaptionComboBox
      Tag = 8
      Left = 449
      Top = 142
      Width = 57
      Height = 21
      ItemHeight = 13
      TabOrder = 25
      OnChange = cboHeightChange
      OnEnter = SetVitPointer
      OnExit = cboHeightExit
      Items.Strings = (
        'IN'
        'CM')
      Caption = 'Height'
    end
    object txtMeasWt: TCaptionEdit
      Tag = 6
      Left = 406
      Top = 166
      Width = 43
      Height = 21
      TabOrder = 29
      OnEnter = SetVitPointer
      OnExit = txtMeasWtExit
      Caption = 'Weight'
    end
    object cboWeight: TCaptionComboBox
      Tag = 9
      Left = 449
      Top = 166
      Width = 57
      Height = 21
      ItemHeight = 13
      TabOrder = 30
      OnChange = cboWeightChange
      OnEnter = SetVitPointer
      OnExit = cboWeightExit
      Items.Strings = (
        'LB'
        'KG')
      Caption = 'Weight'
    end
    object txtMeasDate: TORDateBox
      Tag = 11
      Left = 406
      Top = 16
      Width = 121
      Height = 21
      TabOrder = 0
      OnEnter = SetVitPointer
      DateOnly = False
      RequireTime = False
      Caption = 'Current Vital Date '
    end
    object cboPain: TORComboBox
      Tag = 10
      Left = 406
      Top = 190
      Width = 102
      Height = 21
      Style = orcsDropDown
      AutoSelect = True
      Caption = 'Pain Scale'
      Color = clWindow
      DropDownCount = 12
      ItemHeight = 13
      ItemTipColor = clWindow
      ItemTipEnable = True
      ListItemsOnly = True
      LongList = False
      LookupPiece = 0
      MaxLength = 0
      Pieces = '1,2'
      Sorted = False
      SynonymChars = '<>'
      TabOrder = 34
      TabStop = True
      OnEnter = SetVitPointer
      CharsNeedMatch = 1
    end
    object txtMeasPulse: TCaptionEdit
      Tag = 4
      Left = 406
      Top = 72
      Width = 100
      Height = 21
      TabOrder = 12
      OnEnter = SetVitPointer
      OnExit = txtMeasPulseExit
      Caption = 'Pulse'
    end
    object txtMeasHt: TCaptionEdit
      Tag = 5
      Left = 406
      Top = 142
      Width = 43
      Height = 21
      TabOrder = 24
      OnEnter = SetVitPointer
      OnExit = txtMeasHtExit
      Caption = 'Height'
    end
  end
  object btnEnterVitals: TButton [5]
    Left = 8
    Top = 377
    Width = 75
    Height = 21
    Caption = 'Enter Vitals'
    TabOrder = 2
    OnClick = btnEnterVitalsClick
  end
  inherited DKLanguageController1: TDKLanguageController
    LangData = {
      0C0066726D456E63566974616C73010100000001000000070043617074696F6E
      012A000000050062746E4F4B010100000002000000070043617074696F6E0009
      0062746E43616E63656C010100000003000000070043617074696F6E0008006C
      76566974616C73010100000004000000040048696E74000900706E6C426F7474
      6F6D00000700706E6C6D61696E00000D006C626C566974506F696E7465720000
      07006C626C44617465010100000005000000070043617074696F6E0009006C62
      6C446174654250010100000006000000070043617074696F6E000B006C626C44
      61746554656D70010100000007000000070043617074696F6E000B006C626C44
      61746552657370010100000008000000070043617074696F6E000C006C626C44
      61746550756C7365010100000009000000070043617074696F6E000D006C626C
      4461746548656967687401010000000A000000070043617074696F6E000D006C
      626C4461746557656967687401010000000B000000070043617074696F6E000A
      006C626C4C73744D65617301010000000C000000070043617074696F6E000900
      6C626C6C617374425001010000000D000000070043617074696F6E000B006C62
      6C4C61737454656D7001010000000E000000070043617074696F6E000B006C62
      6C4C6173745265737001010000000F000000070043617074696F6E000C006C62
      6C4C61737450756C7365010100000010000000070043617074696F6E000D006C
      626C4C617374486569676874010100000011000000070043617074696F6E000D
      006C626C4C617374576569676874010100000012000000070043617074696F6E
      0008006C626C566974616C010100000013000000070043617074696F6E000800
      6C626C5669744250010100000014000000070043617074696F6E000A006C6E6C
      56697454656D70010100000015000000070043617074696F6E000A006C626C56
      697452657370010100000016000000070043617074696F6E000B006C626C5669
      7450756C7365010100000017000000070043617074696F6E000C006C626C5669
      74486569676874010100000018000000070043617074696F6E000C006C626C56
      6974576569676874010100000019000000070043617074696F6E000A006C626C
      5669745061696E01010000001A000000070043617074696F6E000B006C626C4C
      6173745061696E01010000001B000000070043617074696F6E000B006C626C44
      6174655061696E01010000001C000000070043617074696F6E0009007478744D
      656173425001010000001D000000070043617074696F6E00070063626F54656D
      7001020000001F000000070043617074696F6E1E00000005004974656D73000B
      007478744D65617354656D70010100000020000000070043617074696F6E000B
      007478744D65617352657370010100000021000000070043617074696F6E0009
      0063626F486569676874010200000023000000070043617074696F6E22000000
      05004974656D730009007478744D656173577401010000002400000007004361
      7074696F6E00090063626F576569676874010200000026000000070043617074
      696F6E2500000005004974656D73000B007478744D6561734461746501010000
      0027000000070043617074696F6E00070063626F5061696E0101000000280000
      00070043617074696F6E000C007478744D65617350756C736501010000002900
      0000070043617074696F6E0009007478744D656173487401010000002A000000
      070043617074696F6E000E0062746E456E746572566974616C7301010000002B
      000000070043617074696F6E00}
  end
end