monospace font for debugger pseudo terminal, issue #33652

git-svn-id: trunk@58224 -
This commit is contained in:
martin 2018-06-10 23:59:12 +00:00
parent 94d15ca481
commit dd6656f6dd

View File

@ -5,7 +5,7 @@ unit PseudoTerminalDlg;
interface
uses
IDEWindowIntf, Classes,
IDEWindowIntf, Classes, Graphics,
Forms, StdCtrls, DebuggerDlg, BaseDebugManager, LazarusIDEStrConsts, LCLType;
type
@ -52,6 +52,7 @@ end;
constructor TPseudoConsoleDlg.Create(TheOwner: TComponent);
begin
inherited Create(TheOwner);
font.Name := 'monospace';
Caption:= lisDbgTerminal;
end;