mirror of https://gitlab.com/basile.b/dexed.git
fine tweaks for first run on Windows
This commit is contained in:
parent
b481e14fbe
commit
06b28abc23
|
@ -194,7 +194,7 @@ begin
|
||||||
fPhobosDocRoot := 'https://dlang.org/phobos/';
|
fPhobosDocRoot := 'https://dlang.org/phobos/';
|
||||||
fFont := TFont.Create;
|
fFont := TFont.Create;
|
||||||
{$IFDEF WINDOWS}
|
{$IFDEF WINDOWS}
|
||||||
fFont.Name := 'Courier New';
|
fFont.Name := 'Consolas';
|
||||||
{$ELSE}
|
{$ELSE}
|
||||||
fFont.Name := 'DejaVu Sans Mono';
|
fFont.Name := 'DejaVu Sans Mono';
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
|
|
|
@ -256,7 +256,11 @@ constructor TCEMessagesOptions.Create(AOwner: TComponent);
|
||||||
begin
|
begin
|
||||||
inherited;
|
inherited;
|
||||||
fFont := TFont.Create;
|
fFont := TFont.Create;
|
||||||
fAutoSelect:=true;
|
fFont.Style := [fsBold];
|
||||||
|
{$IFDEF WINDOWS}
|
||||||
|
fFont.name := 'Consolas';
|
||||||
|
{$ENDIF}
|
||||||
|
fAutoSelect :=true;
|
||||||
fMaxCount := 1000;
|
fMaxCount := 1000;
|
||||||
fMsgColors[amkBub] := $FCE7D2;
|
fMsgColors[amkBub] := $FCE7D2;
|
||||||
fMsgColors[amkWarn]:= $B3FFFF;
|
fMsgColors[amkWarn]:= $B3FFFF;
|
||||||
|
|
Loading…
Reference in New Issue