| 
            Last change
 on this file since 1179 was             453, checked in by Kevin Toppenberg, 17 years ago           | 
        
        
          | 
             
Initial upload of TMG-CPRS 1.0.26.69 
 
           | 
        
        
          | 
            File size:
            4.5 KB
           | 
        
      
      
| Rev | Line |   | 
|---|
| [453] | 1 | object frmGMV_SupO2: TfrmGMV_SupO2
 | 
|---|
 | 2 |   Left = 815
 | 
|---|
 | 3 |   Top = 181
 | 
|---|
 | 4 |   BorderIcons = [biSystemMenu]
 | 
|---|
 | 5 |   BorderStyle = bsNone
 | 
|---|
 | 6 |   Caption = 'frmGMV_SupO2'
 | 
|---|
 | 7 |   ClientHeight = 193
 | 
|---|
 | 8 |   ClientWidth = 313
 | 
|---|
 | 9 |   Color = clBtnFace
 | 
|---|
 | 10 |   Font.Charset = DEFAULT_CHARSET
 | 
|---|
 | 11 |   Font.Color = clWindowText
 | 
|---|
 | 12 |   Font.Height = -14
 | 
|---|
 | 13 |   Font.Name = 'MS Sans Serif'
 | 
|---|
 | 14 |   Font.Style = []
 | 
|---|
 | 15 |   OldCreateOrder = False
 | 
|---|
 | 16 |   Position = poDefault
 | 
|---|
 | 17 |   OnActivate = FormActivate
 | 
|---|
 | 18 |   PixelsPerInch = 120
 | 
|---|
 | 19 |   TextHeight = 16
 | 
|---|
 | 20 |   object pnlMain: TPanel
 | 
|---|
 | 21 |     Left = 0
 | 
|---|
 | 22 |     Top = 0
 | 
|---|
 | 23 |     Width = 313
 | 
|---|
 | 24 |     Height = 193
 | 
|---|
 | 25 |     Align = alClient
 | 
|---|
 | 26 |     BevelInner = bvLowered
 | 
|---|
 | 27 |     BorderWidth = 1
 | 
|---|
 | 28 |     TabOrder = 0
 | 
|---|
 | 29 |     object pnlBottom: TPanel
 | 
|---|
 | 30 |       Left = 3
 | 
|---|
 | 31 |       Top = 142
 | 
|---|
 | 32 |       Width = 307
 | 
|---|
 | 33 |       Height = 48
 | 
|---|
 | 34 |       Align = alBottom
 | 
|---|
 | 35 |       BevelOuter = bvLowered
 | 
|---|
 | 36 |       TabOrder = 0
 | 
|---|
 | 37 |       DesignSize = (
 | 
|---|
 | 38 |         307
 | 
|---|
 | 39 |         48)
 | 
|---|
 | 40 |       object btnOK: TButton
 | 
|---|
 | 41 |         Left = 146
 | 
|---|
 | 42 |         Top = 12
 | 
|---|
 | 43 |         Width = 73
 | 
|---|
 | 44 |         Height = 25
 | 
|---|
 | 45 |         Anchors = [akTop, akRight]
 | 
|---|
 | 46 |         Caption = 'O&K'
 | 
|---|
 | 47 |         ModalResult = 1
 | 
|---|
 | 48 |         TabOrder = 0
 | 
|---|
 | 49 |         OnClick = btnOKClick
 | 
|---|
 | 50 |       end
 | 
|---|
 | 51 |       object btnCancel: TButton
 | 
|---|
 | 52 |         Left = 223
 | 
|---|
 | 53 |         Top = 12
 | 
|---|
 | 54 |         Width = 70
 | 
|---|
 | 55 |         Height = 25
 | 
|---|
 | 56 |         Anchors = [akTop, akRight]
 | 
|---|
 | 57 |         Cancel = True
 | 
|---|
 | 58 |         Caption = '&Cancel'
 | 
|---|
 | 59 |         ModalResult = 2
 | 
|---|
 | 60 |         TabOrder = 1
 | 
|---|
 | 61 |       end
 | 
|---|
 | 62 |     end
 | 
|---|
 | 63 |     object Panel1: TPanel
 | 
|---|
 | 64 |       Left = 3
 | 
|---|
 | 65 |       Top = 30
 | 
|---|
 | 66 |       Width = 307
 | 
|---|
 | 67 |       Height = 74
 | 
|---|
 | 68 |       Align = alTop
 | 
|---|
 | 69 |       BevelOuter = bvNone
 | 
|---|
 | 70 |       TabOrder = 1
 | 
|---|
 | 71 |       object lblFlow: TLabel
 | 
|---|
 | 72 |         Left = 9
 | 
|---|
 | 73 |         Top = 21
 | 
|---|
 | 74 |         Width = 63
 | 
|---|
 | 75 |         Height = 16
 | 
|---|
 | 76 |         Caption = '&Flow Rate:'
 | 
|---|
 | 77 |         FocusControl = edtFlow
 | 
|---|
 | 78 |       end
 | 
|---|
 | 79 |       object lblO2Con: TLabel
 | 
|---|
 | 80 |         Left = 9
 | 
|---|
 | 81 |         Top = 50
 | 
|---|
 | 82 |         Width = 105
 | 
|---|
 | 83 |         Height = 16
 | 
|---|
 | 84 |         Caption = '&O2 Concentration:'
 | 
|---|
 | 85 |         FocusControl = edtO2Con
 | 
|---|
 | 86 |       end
 | 
|---|
 | 87 |       object lblPercent: TLabel
 | 
|---|
 | 88 |         Left = 117
 | 
|---|
 | 89 |         Top = 50
 | 
|---|
 | 90 |         Width = 20
 | 
|---|
 | 91 |         Height = 16
 | 
|---|
 | 92 |         Caption = '(%)'
 | 
|---|
 | 93 |         ParentShowHint = False
 | 
|---|
 | 94 |         ShowHint = False
 | 
|---|
 | 95 |       end
 | 
|---|
 | 96 |       object lblLitMin: TLabel
 | 
|---|
 | 97 |         Left = 98
 | 
|---|
 | 98 |         Top = 21
 | 
|---|
 | 99 |         Width = 38
 | 
|---|
 | 100 |         Height = 16
 | 
|---|
 | 101 |         Hint = 'liters/minute'
 | 
|---|
 | 102 |         Caption = '(l/min)'
 | 
|---|
 | 103 |         ParentShowHint = False
 | 
|---|
 | 104 |         ShowHint = True
 | 
|---|
 | 105 |       end
 | 
|---|
 | 106 |       object edtFlow: TEdit
 | 
|---|
 | 107 |         Left = 146
 | 
|---|
 | 108 |         Top = 16
 | 
|---|
 | 109 |         Width = 121
 | 
|---|
 | 110 |         Height = 24
 | 
|---|
 | 111 |         Hint = 'Enter values between 0.5 and 20'
 | 
|---|
 | 112 |         MaxLength = 4
 | 
|---|
 | 113 |         ParentShowHint = False
 | 
|---|
 | 114 |         ShowHint = True
 | 
|---|
 | 115 |         TabOrder = 0
 | 
|---|
 | 116 |         OnKeyUp = edtFlowKeyUp
 | 
|---|
 | 117 |       end
 | 
|---|
 | 118 |       object edtO2Con: TEdit
 | 
|---|
 | 119 |         Left = 146
 | 
|---|
 | 120 |         Top = 46
 | 
|---|
 | 121 |         Width = 121
 | 
|---|
 | 122 |         Height = 24
 | 
|---|
 | 123 |         Hint = 'Enter value between 21 and 100'
 | 
|---|
 | 124 |         MaxLength = 3
 | 
|---|
 | 125 |         ParentShowHint = False
 | 
|---|
 | 126 |         ShowHint = True
 | 
|---|
 | 127 |         TabOrder = 1
 | 
|---|
 | 128 |         OnKeyUp = edtO2ConKeyUp
 | 
|---|
 | 129 |       end
 | 
|---|
 | 130 |       object udFlow: TUpDown
 | 
|---|
 | 131 |         Left = 271
 | 
|---|
 | 132 |         Top = 16
 | 
|---|
 | 133 |         Width = 19
 | 
|---|
 | 134 |         Height = 26
 | 
|---|
 | 135 |         Min = -32768
 | 
|---|
 | 136 |         Max = 32767
 | 
|---|
 | 137 |         TabOrder = 2
 | 
|---|
 | 138 |         OnChangingEx = udFlowChangingEx
 | 
|---|
 | 139 |       end
 | 
|---|
 | 140 |       object udO2: TUpDown
 | 
|---|
 | 141 |         Left = 271
 | 
|---|
 | 142 |         Top = 46
 | 
|---|
 | 143 |         Width = 19
 | 
|---|
 | 144 |         Height = 25
 | 
|---|
 | 145 |         Min = -32768
 | 
|---|
 | 146 |         Max = 32767
 | 
|---|
 | 147 |         TabOrder = 3
 | 
|---|
 | 148 |         OnChangingEx = udO2ChangingEx
 | 
|---|
 | 149 |       end
 | 
|---|
 | 150 |     end
 | 
|---|
 | 151 |     object Panel2: TPanel
 | 
|---|
 | 152 |       Left = 3
 | 
|---|
 | 153 |       Top = 3
 | 
|---|
 | 154 |       Width = 307
 | 
|---|
 | 155 |       Height = 27
 | 
|---|
 | 156 |       Align = alTop
 | 
|---|
 | 157 |       BevelInner = bvRaised
 | 
|---|
 | 158 |       BevelOuter = bvNone
 | 
|---|
 | 159 |       Caption = 'Supplemental Oxygen'
 | 
|---|
 | 160 |       TabOrder = 2
 | 
|---|
 | 161 |     end
 | 
|---|
 | 162 |     object pnlQual: TPanel
 | 
|---|
 | 163 |       Left = 3
 | 
|---|
 | 164 |       Top = 138
 | 
|---|
 | 165 |       Width = 307
 | 
|---|
 | 166 |       Height = 4
 | 
|---|
 | 167 |       Align = alClient
 | 
|---|
 | 168 |       BevelOuter = bvNone
 | 
|---|
 | 169 |       TabOrder = 3
 | 
|---|
 | 170 |     end
 | 
|---|
 | 171 |     object Panel5: TPanel
 | 
|---|
 | 172 |       Left = 3
 | 
|---|
 | 173 |       Top = 104
 | 
|---|
 | 174 |       Width = 307
 | 
|---|
 | 175 |       Height = 34
 | 
|---|
 | 176 |       Align = alTop
 | 
|---|
 | 177 |       BevelOuter = bvNone
 | 
|---|
 | 178 |       TabOrder = 4
 | 
|---|
 | 179 |       object lblMethodValue: TLabel
 | 
|---|
 | 180 |         Left = 10
 | 
|---|
 | 181 |         Top = 7
 | 
|---|
 | 182 |         Width = 45
 | 
|---|
 | 183 |         Height = 16
 | 
|---|
 | 184 |         Caption = '&Method'
 | 
|---|
 | 185 |         FocusControl = cbMethod
 | 
|---|
 | 186 |       end
 | 
|---|
 | 187 |       object cbMethod: TComboBox
 | 
|---|
 | 188 |         Left = 146
 | 
|---|
 | 189 |         Top = 1
 | 
|---|
 | 190 |         Width = 147
 | 
|---|
 | 191 |         Height = 24
 | 
|---|
 | 192 |         Hint = 'Select Method from the list'
 | 
|---|
 | 193 |         Style = csDropDownList
 | 
|---|
 | 194 |         ItemHeight = 16
 | 
|---|
 | 195 |         ParentShowHint = False
 | 
|---|
 | 196 |         ShowHint = True
 | 
|---|
 | 197 |         TabOrder = 0
 | 
|---|
 | 198 |         OnChange = cbMethodChange
 | 
|---|
 | 199 |       end
 | 
|---|
 | 200 |     end
 | 
|---|
 | 201 |   end
 | 
|---|
 | 202 | end
 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.