You've already forked lazarus-ccr
jvcllaz: Undo r7106, r7108 is better.
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7109 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -4875,24 +4875,6 @@ var
|
||||
I, J, lRightCol, lBottomRow: Integer;
|
||||
w, h: Integer;
|
||||
begin
|
||||
// For printing, fix Lazarus default fonts having size 0
|
||||
if not (csDesigning in ComponentState) then begin
|
||||
FixFont(ApptAttr.Font);
|
||||
FixFont(FancyRowHdrAttr.MajorFont);
|
||||
FixFont(FancyRowHdrAttr.MinorFont);
|
||||
FixFont(Font);
|
||||
FixFont(GroupHdrAttr.Font);
|
||||
FixFont(HdrAttr.Font);
|
||||
FixFont(SelApptAttr.Font);
|
||||
FixFont(SelFancyRowHdrAttr.MajorFont);
|
||||
FixFont(SelFancyRowHdrAttr.MinorFont);
|
||||
FixFont(SelGroupHdrAttr.Font);
|
||||
FixFont(SelHdrAttr.Font);
|
||||
FixFont(TimeBlockProps.BlockHdrAttr.Font);
|
||||
FixFont(TimeBlockProps.SelBlockHdrAttr.Font);
|
||||
end;
|
||||
|
||||
|
||||
{ optimization incorrectly kicks in if control is only partially
|
||||
visible on the screen
|
||||
if not PaintBuffer.Empty and
|
||||
|
Reference in New Issue
Block a user