From ddacd707340984683d13c7e910687c7b46deab95 Mon Sep 17 00:00:00 2001 From: Jeremiah K <17190268+jeremiah-k@users.noreply.github.com> Date: Wed, 3 Jul 2024 13:47:47 -0500 Subject: [PATCH] trying AdjustPageElements --- mmrelay.iss | 19 ++++++++++++++++++- 1 file changed, 18 insertions(+), 1 deletion(-) diff --git a/mmrelay.iss b/mmrelay.iss index f132943..a585528 100644 --- a/mmrelay.iss +++ b/mmrelay.iss @@ -109,6 +109,23 @@ begin OptionsPage.Add('Radio broadcasts enabled'); OptionsPage.Values[0] := True; OptionsPage.Values[1] := True; + + // Adjust the layout to add more space between elements + AdjustPageElements(MatrixPage); + AdjustPageElements(MeshtasticPage); + AdjustPageElements(MatrixMeshtasticPage); +end; + +procedure AdjustPageElements(Page: TInputQueryWizardPage); +var + i, NewTop: Integer; +begin + NewTop := 0; + for i := 0 to Page.Edits.Count - 1 do + begin + Page.Edits[i].Top := NewTop; + NewTop := NewTop + Page.Edits[i].Height + 12; // Add more space between elements + end; end; function BoolToStr(Value : Boolean): String; @@ -195,4 +212,4 @@ begin begin MsgBox('Could not create batch file "relay.bat". Close any applications that may have it open and re-run setup', mbInformation, MB_OK); end; -end; \ No newline at end of file +end;