Bläddra i källkod

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 månader sedan
förälder
incheckning
1eaec50c57
1 ändrade filer med 1 tillägg och 2 borttagningar
  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