object frmVit: TfrmVit
  Left = 451
  Top = 208
  Width = 499
  Height = 361
  Caption = 'frmVit'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object cmdOK: TButton
    Left = 319
    Top = 276
    Width = 75
    Height = 22
    Caption = 'OK'
    TabOrder = 1
    OnClick = cmdOKClick
  end
  object cmdCancel: TButton
    Left = 406
    Top = 276
    Width = 75
    Height = 22
    Cancel = True
    Caption = 'Cancel'
    TabOrder = 2
    OnClick = cmdCancelClick
  end
  object pnlmain: TPanel
    Left = 8
    Top = 24
    Width = 473
    Height = 241
    TabOrder = 0
    object lblVitPointer: TOROffsetLabel
      Left = 418
      Top = 48
      Width = 17
      Height = 15
      Caption = '<--'
      Color = clBtnFace
      HorzOffset = 5
      ParentColor = False
      Transparent = False
      VertOffset = 2
      WordWrap = False
    end
    object lblDate: TStaticText
      Left = 32
      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 = 11
    end
    object lblDateBP: TStaticText
      Tag = 3
      Left = 26
      Top = 122
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 12
      OnDblClick = lbllastClick
    end
    object lblDateTemp: TStaticText
      Left = 26
      Top = 52
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 13
      OnDblClick = lbllastClick
    end
    object lblDateResp: TStaticText
      Tag = 2
      Left = 26
      Top = 98
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 14
      OnDblClick = lbllastClick
    end
    object lblDatePulse: TStaticText
      Tag = 1
      Left = 26
      Top = 75
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 15
      OnDblClick = lbllastClick
    end
    object lblDateHeight: TStaticText
      Tag = 4
      Left = 26
      Top = 145
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 16
      OnDblClick = lbllastClick
    end
    object lblDateWeight: TStaticText
      Tag = 5
      Left = 26
      Top = 169
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 17
      OnDblClick = lbllastClick
    end
    object lblLstMeas: TStaticText
      Left = 116
      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 = 18
    end
    object lbllastBP: TStaticText
      Tag = 3
      Left = 124
      Top = 122
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 19
      OnClick = lbllastClick
      OnDblClick = lbllastClick
    end
    object lblLastTemp: TStaticText
      Left = 124
      Top = 52
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 20
      OnDblClick = lbllastClick
    end
    object lblLastResp: TStaticText
      Tag = 2
      Left = 124
      Top = 98
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 21
      OnDblClick = lbllastClick
    end
    object lblLastPulse: TStaticText
      Tag = 1
      Left = 124
      Top = 75
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 22
      OnDblClick = lbllastClick
    end
    object lblLastHeight: TStaticText
      Tag = 4
      Left = 124
      Top = 145
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 23
      OnDblClick = lbllastClick
    end
    object lblLastWeight: TStaticText
      Tag = 5
      Left = 124
      Top = 169
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 24
      OnDblClick = lbllastClick
    end
    object lblVital: TStaticText
      Left = 256
      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 = 25
    end
    object lblVitBP: TStaticText
      Left = 256
      Top = 122
      Width = 23
      Height = 17
      Caption = 'B/P'
      TabOrder = 26
    end
    object lnlVitTemp: TStaticText
      Left = 256
      Top = 52
      Width = 31
      Height = 17
      Caption = 'Temp'
      TabOrder = 27
    end
    object lblVitResp: TStaticText
      Left = 256
      Top = 98
      Width = 29
      Height = 17
      Caption = 'Resp'
      TabOrder = 28
    end
    object lblVitPulse: TStaticText
      Left = 256
      Top = 75
      Width = 30
      Height = 17
      Caption = 'Pulse'
      TabOrder = 29
    end
    object lblVitHeight: TStaticText
      Left = 256
      Top = 145
      Width = 35
      Height = 17
      Caption = 'Height'
      TabOrder = 30
    end
    object lblVitWeight: TStaticText
      Left = 256
      Top = 169
      Width = 38
      Height = 17
      Caption = 'Weight'
      TabOrder = 31
    end
    object lblDatePain: TStaticText
      Tag = 5
      Left = 26
      Top = 193
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 32
      OnDblClick = lbllastClick
    end
    object lblLastPain: TStaticText
      Tag = 5
      Left = 124
      Top = 193
      Width = 24
      Height = 17
      Caption = 'N/A'
      TabOrder = 33
      OnDblClick = lbllastClick
    end
    object lblVitPain: TStaticText
      Left = 256
      Top = 193
      Width = 55
      Height = 17
      Caption = 'Pain Scale'
      TabOrder = 34
    end
    object txtMeasBP: TCaptionEdit
      Tag = 1
      Left = 318
      Top = 119
      Width = 100
      Height = 21
      TabOrder = 5
      OnEnter = SetVitPointer
      OnExit = txtMeasBPExit
      OnKeyPress = FormKeyPress
      Caption = 'Blood Pressure'
    end
    object cboTemp: TCaptionComboBox
      Tag = 7
      Left = 360
      Top = 48
      Width = 59
      Height = 21
      DropDownCount = 2
      ItemHeight = 13
      TabOrder = 2
      OnChange = cboTempChange
      OnEnter = SetVitPointer
      OnExit = cboTempExit
      OnKeyPress = FormKeyPress
      Items.Strings = (
        'F'
        'C')
      Caption = 'Temperature'
    end
    object txtMeasTemp: TCaptionEdit
      Tag = 2
      Left = 318
      Top = 48
      Width = 43
      Height = 21
      TabOrder = 1
      OnEnter = SetVitPointer
      OnExit = txtMeasTempExit
      OnKeyPress = FormKeyPress
      Caption = 'Temperature'
    end
    object txtMeasResp: TCaptionEdit
      Tag = 3
      Left = 318
      Top = 95
      Width = 100
      Height = 21
      TabOrder = 4
      OnEnter = SetVitPointer
      OnExit = txtMeasRespExit
      OnKeyPress = FormKeyPress
      Caption = 'Resp'
    end
    object txtMeasPulse: TCaptionEdit
      Tag = 4
      Left = 318
      Top = 72
      Width = 100
      Height = 21
      TabOrder = 3
      OnEnter = SetVitPointer
      OnExit = txtMeasPulseExit
      OnKeyPress = FormKeyPress
      Caption = 'Pulse'
    end
    object txtMeasHt: TCaptionEdit
      Tag = 5
      Left = 318
      Top = 142
      Width = 43
      Height = 21
      TabOrder = 6
      OnEnter = SetVitPointer
      OnExit = txtMeasHtExit
      OnKeyPress = FormKeyPress
      Caption = 'Height'
    end
    object cboHeight: TCaptionComboBox
      Tag = 8
      Left = 361
      Top = 142
      Width = 58
      Height = 21
      ItemHeight = 13
      TabOrder = 7
      OnChange = cboHeightChange
      OnEnter = SetVitPointer
      OnExit = cboHeightExit
      OnKeyPress = FormKeyPress
      Items.Strings = (
        'IN'
        'CM')
      Caption = 'Height'
    end
    object txtMeasWt: TCaptionEdit
      Tag = 6
      Left = 318
      Top = 166
      Width = 43
      Height = 21
      TabOrder = 8
      OnEnter = SetVitPointer
      OnExit = txtMeasWtExit
      OnKeyPress = FormKeyPress
      Caption = 'Weight'
    end
    object cboWeight: TCaptionComboBox
      Tag = 9
      Left = 361
      Top = 166
      Width = 58
      Height = 21
      ItemHeight = 13
      TabOrder = 9
      OnChange = cboWeightChange
      OnEnter = SetVitPointer
      OnExit = cboWeightExit
      OnKeyPress = FormKeyPress
      Items.Strings = (
        'LB'
        'KG')
      Caption = 'Weight'
    end
    object txtMeasDate: TORDateBox
      Tag = 11
      Left = 312
      Top = 16
      Width = 121
      Height = 21
      TabOrder = 0
      Text = 'txtMeasDate'
      OnEnter = SetVitPointer
      OnKeyPress = FormKeyPress
      DateOnly = False
      RequireTime = False
      Caption = 'Vital Measured Date'
    end
    object cboPain: TORComboBox
      Tag = 10
      Left = 318
      Top = 190
      Width = 102
      Height = 21
      Style = orcsDropDown
      AutoSelect = True
      Caption = 'Pain Scale'
      Color = clWindow
      DropDownCount = 8
      ItemHeight = 13
      ItemTipColor = clWindow
      ItemTipEnable = True
      ListItemsOnly = True
      LongList = False
      LookupPiece = 0
      MaxLength = 0
      Pieces = '1,2'
      Sorted = False
      SynonymChars = '<>'
      TabOrder = 10
      OnEnter = SetVitPointer
      OnKeyPress = FormKeyPress
      CharsNeedMatch = 1
    end
  end
  object DKLanguageController1: TDKLanguageController
    Left = 200
    Top = 296
    LangData = {
      060066726D566974010100000001000000070043617074696F6E012700000005
      00636D644F4B010100000002000000070043617074696F6E000900636D644361
      6E63656C010100000003000000070043617074696F6E000700706E6C6D61696E
      00000D006C626C566974506F696E746572000007006C626C4461746501010000
      0004000000070043617074696F6E0009006C626C446174654250010100000005
      000000070043617074696F6E000B006C626C4461746554656D70010100000006
      000000070043617074696F6E000B006C626C4461746552657370010100000007
      000000070043617074696F6E000C006C626C4461746550756C73650101000000
      08000000070043617074696F6E000D006C626C44617465486569676874010100
      000009000000070043617074696F6E000D006C626C4461746557656967687401
      010000000A000000070043617074696F6E000A006C626C4C73744D6561730101
      0000000B000000070043617074696F6E0009006C626C6C617374425001010000
      000C000000070043617074696F6E000B006C626C4C61737454656D7001010000
      000D000000070043617074696F6E000B006C626C4C6173745265737001010000
      000E000000070043617074696F6E000C006C626C4C61737450756C7365010100
      00000F000000070043617074696F6E000D006C626C4C61737448656967687401
      0100000010000000070043617074696F6E000D006C626C4C6173745765696768
      74010100000011000000070043617074696F6E0008006C626C566974616C0101
      00000012000000070043617074696F6E0008006C626C56697442500101000000
      13000000070043617074696F6E000A006C6E6C56697454656D70010100000014
      000000070043617074696F6E000A006C626C5669745265737001010000001500
      0000070043617074696F6E000B006C626C56697450756C736501010000001600
      0000070043617074696F6E000C006C626C566974486569676874010100000017
      000000070043617074696F6E000C006C626C5669745765696768740101000000
      18000000070043617074696F6E000B006C626C446174655061696E0101000000
      19000000070043617074696F6E000B006C626C4C6173745061696E0101000000
      1A000000070043617074696F6E000A006C626C5669745061696E01010000001B
      000000070043617074696F6E0009007478744D656173425001010000001C0000
      00070043617074696F6E00070063626F54656D7001020000001E000000070043
      617074696F6E1D00000005004974656D73000B007478744D65617354656D7001
      010000001F000000070043617074696F6E000B007478744D6561735265737001
      0100000020000000070043617074696F6E000C007478744D65617350756C7365
      010100000021000000070043617074696F6E0009007478744D65617348740101
      00000022000000070043617074696F6E00090063626F48656967687401020000
      0024000000070043617074696F6E2300000005004974656D730009007478744D
      6561735774010100000025000000070043617074696F6E00090063626F576569
      676874010200000027000000070043617074696F6E2600000005004974656D73
      000B007478744D65617344617465010200000029000000070043617074696F6E
      2800000004005465787400070063626F5061696E01010000002A000000070043
      617074696F6E00}
  end
end