Changeset 829 for cprs/trunk/CPRS-Chart/Consults/fConsultsView.dfm

Timestamp:

Jul 7, 2010, 4:31:10 PM (15 years ago)

Author:

Kevin Toppenberg

Message:

Upgrade to version 27

File:

• cprs/trunk/CPRS-Chart/Consults/fConsultsView.dfm (modified) (5 diffs)

cprs/trunk/CPRS-Chart/Consults/fConsultsView.dfm

@@ -1 @@
-object frmConsultsView: TfrmConsultsView
+inherited frmConsultsView: TfrmConsultsView
   Left = 320
   Top = 172
-  Width = 414
-  Height = 400
   BorderIcons = []
   Caption = 'List Selected Consults'
-  Color = clBtnFace
-  Font.Charset = DEFAULT_CHARSET
-  Font.Color = clWindowText
-  Font.Height = -11
-  Font.Name = 'MS Sans Serif'
-  Font.Style = []
+  ClientHeight = 373
+  ClientWidth = 406
   OldCreateOrder = True
   Position = poScreenCenter
   PixelsPerInch = 96
   TextHeight = 13
-  object pnlBase: TORAutoPanel
+  object pnlBase: TORAutoPanel [0]
     Left = 0
     Top = 0
@@ -154 +148 @@
       ListItemsOnly = True
       LongList = False
+      LookupPiece = 0
       MaxLength = 0
       Pieces = '2'
@@ -161 +156 @@
       OnKeyPause = cboServiceSelect
       OnMouseClick = cboServiceSelect
+      CharsNeedMatch = 1
     end
     object cboGroupBy: TORComboBox
@@ -182 +178 @@
       ListItemsOnly = False
       LongList = False
+      LookupPiece = 0
       MaxLength = 0
       Pieces = '2'
@@ -187 +184 @@
       SynonymChars = '<>'
       TabOrder = 5
-    end
+      CharsNeedMatch = 1
+    end
+  end
+  inherited amgrMain: TVA508AccessibilityManager
+    Data = (
+      (
+        'Component = pnlBase'
+        'Status = stsDefault')
+      (
+        'Component = calBeginDate'
+        'Status = stsDefault')
+      (
+        'Component = calEndDate'
+        'Status = stsDefault')
+      (
+        'Component = lstStatus'
+        'Status = stsDefault')
+      (
+        'Component = radSort'
+        'Status = stsDefault')
+      (
+        'Component = cmdOK'
+        'Status = stsDefault')
+      (
+        'Component = cmdCancel'
+        'Status = stsDefault')
+      (
+        'Component = treService'
+        'Status = stsDefault')
+      (
+        'Component = cboService'
+        'Status = stsDefault')
+      (
+        'Component = cboGroupBy'
+        'Status = stsDefault')
+      (
+        'Component = frmConsultsView'
+        'Status = stsDefault'))
   end
   object popStatus: TPopupMenu