Browse Source

Correct BeveledLabel position on UninstallProgressForm.

Delphi 11.3 has problems positioning anchored controls correctly if they are resized while the form has no handle. Here, the form had no handle while BeveledLabel.Caption was being assigned because TSetupForm.Create's Position property change triggers a RecreateWnd. Setting Position in the .dfm avoids that RecreateWnd.

Later (not 6.4), the same change should be made to all of Setup's forms. It was only being set in code because D2 wouldn't write it in the .dfm.

Jordan Russell 8 months ago
parent
commit
1eaec50c57
1 changed files with 1 additions and 2 deletions
  1. 1 2
      Projects/Src/Setup.UninstallProgressForm.dfm

+ 1 - 2
Projects/Src/Setup.UninstallProgressForm.dfm

@@ -12,12 +12,11 @@ object UninstallProgressForm: TUninstallProgressForm
   Font.Height = -11
   Font.Name = 'MS Sans Serif'
   Font.Style = []
-  OldCreateOrder = True
+  Position = poDesigned
   Scaled = False
   DesignSize = (
     497
     360)
-  PixelsPerInch = 96
   TextHeight = 13
   object FBevel: TBevel
     Left = 0