Changeset 829 for cprs/trunk/CPRS-Chart/Encounter/fPCEBaseGrid.pas

Timestamp:

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

Author:

Kevin Toppenberg

Message:

Upgrade to version 27

File:

• cprs/trunk/CPRS-Chart/Encounter/fPCEBaseGrid.pas (modified) (4 diffs)

cprs/trunk/CPRS-Chart/Encounter/fPCEBaseGrid.pas

@@ -5 +5 @@
 uses
   Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
-  fPCEBase, ComCtrls, StdCtrls, ORCtrls, ExtCtrls, Buttons, ORFn;
+  fPCEBase, ComCtrls, StdCtrls, ORCtrls, ExtCtrls, Buttons, ORFn,
+  VA508AccessibilityManager;
 
 type
@@ -38 +39 @@
 implementation
 
+uses
+  VA2006Utils, VA508AccessibilityRouter;
+
 {$R *.DFM}
 
@@ -46 +50 @@
 begin
   inherited;
-  lbGrid.Color := ReadOnlyColor;
-  lbGrid.ItemTipColor := ReadOnlyColor;
+  FixHeaderControlDelphi2006Bug(hcGrid);
   FSectionGap := 15;
   SyncGridHeader(TRUE);
@@ -223 +226 @@
 end;
 
+initialization
+  SpecifyFormIsNotADialog(TfrmPCEBaseGrid);
+
 end.