Pārlūkot izejas kodu

add scrollbar for Python errors

Johann ELSASS 5 gadi atpakaļ
vecāks
revīzija
a42152c84b
1 mainītis faili ar 1 papildinājumiem un 0 dzēšanām
  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;