Not sure it is ok, why not to a) copy Size, b) copy PixelsPerInch. why
such strange logic.
if TFont(Source).PixelsPerInch <> FPixelsPerInch then
// use size to convert source height pixels to current
resolution
Size := TFont(Source).Size
else
// use height which users could have changed directly
Height := TFont(Source).Height;
Also good to copy PixelsPerInch to do good copy
--
Regards,
Alexey
--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus-ide.org
http://lists.lazarus-ide.org/listinfo/lazarus