From 032850517e45c631ca80182ac063923c48a0ffcd Mon Sep 17 00:00:00 2001 From: skalogryz Date: Sat, 14 Mar 2015 00:24:13 +0000 Subject: [PATCH] richmemo: fix style check for boldness of the default font git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4025 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/richmemo/gtk2/gtk2richmemo.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/components/richmemo/gtk2/gtk2richmemo.pas b/components/richmemo/gtk2/gtk2richmemo.pas index 10561f4f9..81bfbb9c0 100644 --- a/components/richmemo/gtk2/gtk2richmemo.pas +++ b/components/richmemo/gtk2/gtk2richmemo.pas @@ -1345,7 +1345,7 @@ begin // rely on LogFont structure to be initialiazed (as it seems to be) if gtkobj^.LogFont.lfItalic > 0 then Include(params.Style, fsItalic); - if gtkobj^.LogFont.lfWidth >= FW_BOLD then Include(params.Style, fsBold); + if gtkobj^.LogFont.lfWeight >= FW_BOLD then Include(params.Style, fsBold); if gtkobj^.LogFont.lfUnderline > 0 then Include(params.Style, fsUnderline); if gtkobj^.LogFont.lfStrikeOut > 0 then Include(params.Style, fsStrikeOut); end;