@@ -7207,18 +7207,22 @@ procedure TMainForm.ResizeWelcomeComponent;
72077207 LabelView.Left := (PageControlPanel.Width div 4 ) - (LabelView.Width + 30 );
72087208 LabelDocumentation.Left := (PageControlPanel.Width div 4 ) - 23 ;
72097209 LabelHotkeys.Left := (PageControlPanel.Width div 4 ) - (LabelHotkeys.Width div 2 );
7210- LabelOpen.Left := (PageControlPanel.Width div 4 ) - 35 ;
7211- LabelSave.Left := (PageControlPanel.Width div 4 ) - 33 ;
7212- LabelZoom.Left := (PageControlPanel.Width div 4 ) - 38 ;
7213- LabelRun.Left := (PageControlPanel.Width div 4 ) - 28 ;
7214- LabelCompile.Left := (PageControlPanel.Width div 4 ) - 50 ;
7215- LabelClear.left := (PageControlPanel.Width div 4 ) - 34 ;
7216- PanelDescOpen.Left := (PageControlPanel.Width div 4 ) + 18 ;
7217- PanelDescSave.Left := (PageControlPanel.Width div 4 ) + 18 ;
7218- PanelDescZoom.Left := (PageControlPanel.Width div 4 ) + 18 ;
7219- PanelDescRun.Left := (PageControlPanel.Width div 4 ) + 18 ;
7220- PanelDescCompile.Left := (PageControlPanel.Width div 4 ) + 18 ;
7221- PanelDescClear.Left := (PageControlPanel.Width div 4 ) + 18 ;
7210+
7211+ var adj := 45 ;
7212+ LabelOpen .Left := (PageControlPanel.Width div 4 ) - adj - LabelOpen .width;
7213+ LabelSave .Left := (PageControlPanel.Width div 4 ) - adj - LabelSave .width;
7214+ LabelZoom .Left := (PageControlPanel.Width div 4 ) - adj - LabelZoom .width;
7215+ LabelRun .Left := (PageControlPanel.Width div 4 ) - adj - LabelRun .width;
7216+ LabelCompile.Left := (PageControlPanel.Width div 4 ) - adj - LabelCompile.width;
7217+ LabelClear .left := (PageControlPanel.Width div 4 ) - adj - LabelClear .width;
7218+
7219+ PanelDescOpen .Left := (PageControlPanel.Width div 4 ) + adj;
7220+ PanelDescSave .Left := (PageControlPanel.Width div 4 ) + adj;
7221+ PanelDescZoom .Left := (PageControlPanel.Width div 4 ) + adj;
7222+ PanelDescRun .Left := (PageControlPanel.Width div 4 ) + adj;
7223+ PanelDescCompile.Left := (PageControlPanel.Width div 4 ) + adj;
7224+ PanelDescClear .Left := (PageControlPanel.Width div 4 ) + adj;
7225+
72227226 ButtonNewDocument.Left := Max(50 , (PanelRight.Width div 2 ) - ButtonNewDocument.Width - (ButtonOpenDocument.Width div 2 ) - 65 );
72237227 ButtonOpenDocument.Left := ButtonNewDocument.Left + ButtonNewDocument.Width + 25 ;
72247228 ButtonOptions.Left := ButtonOpenDocument.Left + ButtonOpenDocument.Width + 25 ;
0 commit comments