Przeglądaj źródła

add scrollbar for Python errors

Johann ELSASS 5 lat temu
rodzic
commit
a42152c84b
1 zmienionych plików z 1 dodań i 0 usunięć
  1. 1 0
      lazpaint/lazpaintinstance.pas

+ 1 - 0
lazpaint/lazpaintinstance.pas

@@ -1666,6 +1666,7 @@ begin
         memo := TMemo.Create(fError);
         memo.Align:= alClient;
         memo.Parent := fError;
+        memo.ScrollBars := ssVertical;
         memo.Font.Name:= 'monospace';
         memo.Text := p.ErrorText;
         fError.ShowModal;