git-svn-id: https://svn.code.sf.net/p/kolmck/code@61 91bb2d04-0c0c-4d2d-88a5-bbb6f4c1fa07

This commit is contained in:
dkolmck
2010-04-15 13:00:34 +00:00
parent f5b39b5a0a
commit e8fdcb7c63
3 changed files with 8 additions and 21 deletions

View File

@ -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;