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 tháng trước cách đây
mục cha
commit
1eaec50c57
1 tập tin đã thay đổi với 1 bổ sung2 xóa
  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