Changeset 460 for cprs/branches/foia-cprs/CPRS-Chart/fRptBox.pas

Timestamp:

Jul 6, 2008, 8:20:14 PM (16 years ago)

Author:

Kevin Toppenberg

Message:

Uploading from OR_30_258

File:

• cprs/branches/foia-cprs/CPRS-Chart/fRptBox.pas (modified) (2 diffs)

cprs/branches/foia-cprs/CPRS-Chart/fRptBox.pas

@@ -29 +29 @@
 
 uses
-  uCore, rCore, rReports, Printers;
+  uCore, rCore, rReports, Printers, rMisc;
 
 {$R *.DFM}
@@ -79 +79 @@
       BoundsRect := Rect;
       ResizeAnchoredFormToFont(Result);
+
+      memReport.Align := alClient; //CQ6661
+
+      //CQ6889 - force Print & Close buttons to bottom right of form regardless of selected font size
+      cmdClose.Left := (pnlButton.Left+pnlButton.Width)-cmdClose.Width;
+      cmdPrint.Left := (cmdClose.Left-cmdPrint.Width)-1;
+      //end CQ6889
+
       SetLength(BtnLeft, k);
       for j := 0 to k - 1 do