Fix overlapping label

GeKorm · Nov 6, 2017 · 38fff7a · 38fff7a
1 parent 443037d
commit 38fff7a
Show file tree

Hide file tree

Showing 2 changed files with 16 additions and 2 deletions.
diff --git a/dart_x64_dev_setup.iss b/dart_x64_dev_setup.iss
@@ -218,7 +218,14 @@ begin
       LatestLabel := TNewStaticText.Create(WizardForm);
       LatestLabel.Parent := Page.Surface;
       LatestLabel.Caption := FmtMessage(CustomMessage('DartLatestVersion'), [CurrentVersion]);
-      WizardForm.ReadyLabel.Top := LatestLabel.Top + WizardForm.ReadyLabel.Height + 16;
+      if Wizardform.ReadyMemo.Lines.Count > 0 then
+      begin
+        WizardForm.ReadyLabel.Caption := '';
+      end
+      else
+      begin
+        WizardForm.ReadyLabel.Top := LatestLabel.Top + WizardForm.ReadyLabel.Height + 16;
+      end
     end
   end;
   // If the user just reached the Installing page, then...

diff --git a/dart_x64_stable_setup.iss b/dart_x64_stable_setup.iss
@@ -219,7 +219,14 @@ begin
       LatestLabel := TNewStaticText.Create(WizardForm);
       LatestLabel.Parent := Page.Surface;
       LatestLabel.Caption := FmtMessage(CustomMessage('DartLatestVersion'), [CurrentVersion]);
-      WizardForm.ReadyLabel.Top := LatestLabel.Top + WizardForm.ReadyLabel.Height + 16;
+      if Wizardform.ReadyMemo.Lines.Count > 0 then
+      begin
+        WizardForm.ReadyLabel.Caption := '';
+      end
+      else
+      begin
+        WizardForm.ReadyLabel.Top := LatestLabel.Top + WizardForm.ReadyLabel.Height + 16;
+      end
     end
   end;
   // If the user just reached the Installing page, then...