Quellcode durchsuchen

add scrollbar for Python errors

Johann ELSASS vor 5 Jahren
Ursprung
Commit
a42152c84b
1 geänderte Dateien mit 1 neuen und 0 gelöschten Zeilen
  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;