Page 1 of 1

Browser (FMXWindowParent) size.

Posted: Sat May 16, 2020 11:27 pm
by Tagruato
Me need full screen browser without "full screen mode", for open "TRADE" page of "PATH OF EXILE" game.
I set size of the form in FormCreate

Code: Select all

  Left := 0;
  Top := 0;
  Width := VCL.Forms.Screen.DesktopWidth; // MONITOR RESOLUTION: X
  Height := VCL.Forms.Screen.DesktopHeight; // MONITOR RESOLUTION: Y
But in practice this
How i can fix this?
P.S.FMX Application (VCL.Forms uses only for get monitor resolution).

Re: Browser (FMXWindowParent) size.

Posted: Sun May 17, 2020 6:59 am
by salvadordf

Use FMX.Forms.TScreen.Size to get the screen dimensions in logical units.

Or use this code if your Delphi version doesn't have that feature :

If your monitor uses high DPI I would suggest that you set it to 100% (96 DPI) while you develop the first versions of the web browser. Once you have everything working then set the resolution to the original DPI value to fix the high DPI issues in the last step.

Re: Browser (FMXWindowParent) size.

Posted: Sun May 17, 2020 2:46 pm
by Tagruato
How can this help me with my problem?
Since the browser when showing is shifted by X, Y coordinates (they must be 0, 0)
My monitor: 1600x900 (VCL.Forms.Screen.DesktopWidth and VCL.Forms.Screen.DesktopHeight too 1600 and 900), and DPI set always default 100% (96 DPI).

Re: Browser (FMXWindowParent) size.

Posted: Sun May 17, 2020 3:13 pm
by salvadordf
Please, check that your application is calling "SetBounds" for the TFMXWindowParent component.

The SimpleFMXBrowser demo calls TFMXWindowParent.SetBounds when the main form is resized :

That procedure sets the size and position of TFMXWindowParent using the TRect returned by TSimpleFMXBrowserFrm.GetFMXWindowParentRect.

Notice that GetFMXWindowParentRect uses the FMXChromium1.ScreenScale value to calculate the position of TFMXWindowParent and FMXChromium1.ScreenScale is calculated based on the monitor DPI value.

Re: Browser (FMXWindowParent) size.

Posted: Sun May 17, 2020 3:27 pm
by Tagruato
I fix this problem, in CreateFMXWindowParent, here

Code: Select all

  if (FMXWindowParent = nil) then
    FMXWindowParent := TFMXWindowParent.CreateNew(nil);
    FMXWindowParent.Position := TFormPosition.Designed; // <--