Watch, Follow, &
Connect with Us
Public Report
Report From: Delphi-BCB/VCL/Dialog Controls/TPageSetupDialog    [ Add a report in this area ]  
Report #:  74280   Status: Closed
Margin* propeties do not refect in shown dialog
Project:  Delphi Build #:  12.0.3210.17555
Version:    12.1 Submitted By:   Joachim Marder
Report Type:  Basic functionality failure Date Reported:  5/27/2009 7:33:11 AM
Severity:    Serious / Highly visible problem Last Updated: 1/9/2010 8:28:21 PM
Platform:    32 Bit Internal Tracking #:  
Resolution: Test Case Error (Resolution Comments) Resolved in Build: : None
Duplicate of:  None
Voting and Rating
Overall Rating: No Ratings Yet
0.00 out of 5
Total Votes: None
Description
Executing the code below shows the page setup dialog always with its default values, but not with the values assigned to the Margin* properties.


Steps to Reproduce:
  With TPageSetupDialog.Create(Self) do
  try
    MarginLeft := 1;
    MarginTop  := 20;
    MarginRight:= 300;
    MarginBottom := 4000;
    Execute;
  finally
    Free;
  end;//try.finally
Workarounds
None
Attachment
None
Comments

Tomohiro Takahashi at 5/28/2009 12:27:50 AM -
Could you please try to add psoMargins option like this?
PageSetupDialog1.Options := [psoMargins];

Server Response from: ETNACODE01