PageSize for TFlexCelPreviewer

How set "real" page size for TFlexCelPreviewer?

I want preview without any transfering to new lines.

My code
procedure TForm1.ToolButtonQueryClick(Sender: TObject);
var FileName: string;
  Xls:=TXlsFile.Create(1, false);
  Xls.Open(FileName); // yes, need error check - no care
  setVisualPreviewer(Xls, FlexCelPreviewer1);

procedure TForm1.setVisualPreviewer(myExcelFile: TExcelFile;
      myFlexCelPreviewer: TFlexCelPreviewer);
  myFixedSize: TPaperDimensions;
  m: TXlsMargins;
  ImgExport: TFlexCelImgExport;
  rectangleCoords: TUIRectangle;
  ImgExport:=TFlexCelImgExport.Create(myExcelFile, false);

  // set zero margins
  m:=TXlsMargins.Create(0, 0, 0, 0, 0, 0);

  // make seperation smaller
  FlexCelPreviewer1.PageXSeparation:=1; FlexCelPreviewer1.PageYSeparation:=1;

  // get rectangle with data
  rectangleCoords:=myExcelFile.CellRangeDimensions(0, 0, 0, 0, true);
  myFixedSize.Width:=rectangleCoords.Width; // wrong!!! width - too small
  // myFixedSize.Width:=rectangleCoords.Width+400; // good, but why 400???
  // update preview

I get this
But I want this
How I can calculate right width for page?

This is just an unfortunate mix up of units. We try to keep the units Excel uses everywhere, but sadly Excel seems to use a different unit in every little thing.
In particular, the sizes in myFixedSize.Width are in inches/100 (because that is how Excel measures page sizes):

But, the size returned by CellRangeDimensions is in points (1/72 of an inch, points are in what most measurements are done):

So that's the root of the problem. For some reason, Excel uses 1/100 of an inch for page sizes (and page margins I think), instead of 1/72 as used in most other places. So to fix it, you need to convert from 1/72 of an inch to 1/100 of an inch. The code would end up being:

myFixedSize.Width:=rectangleCoords.Width * 100.0 / 72.0;
myFixedSize.Height:=rectangleCoords.Height * 100.0 / 72.0;

Solved. Thanks.