git-svn-id: https://svn.code.sf.net/p/kolmck/code@61 91bb2d04-0c0c-4d2d-88a5-bbb6f4c1fa07
This commit is contained in:
@ -340,7 +340,7 @@ begin
|
||||
if Result then
|
||||
begin
|
||||
DeleteObject(Font.Handle);
|
||||
Font.Handle := CreateFontIndirect(TMPLogFont);
|
||||
Font.Handle := CreateFontIndirectA(TMPLogFont);
|
||||
Font.Color := Color;
|
||||
end;
|
||||
end;
|
||||
|
Reference in New Issue
Block a user