<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body text="#000000" bgcolor="#FFFFFF">
<p>Depending on the Information of the list here i have created some
patches and an Bug-Report
<a class="moz-txt-link-freetext" href="https://bugs.freepascal.org/view.php?id=33217">https://bugs.freepascal.org/view.php?id=33217</a></p>
<p>The heats of my changes is a more typesafe conversion and to use
QWord for the JSON. So nothing is broken and it rangechecksafe
now.<br>
</p>
<p>----- a small snippet ----<br>
</p>
<p>function QWordToReportColor(AQWord: QWord):TFPReportColor;<br>
begin<br>
Result := TFPReportColor(AQWord and $FFFFFFFF);<br>
end;</p>
<p>------------<br>
The second, i foung a not created Font, if you are not using
Parent-Fonts. Also fixed.</p>
<p>Thx to all who have some things more clear to me AND why.<br>
</p>
<p>Andreas<br>
</p>
<br>
<div class="moz-cite-prefix">Am 22.02.2018 um 08:05 schrieb Michael
Van Canneyt:<br>
</div>
<blockquote type="cite"
cite="mid:alpine.DEB.2.20.1802220804080.3577@home.telenet.be">
<br>
<br>
On Thu, 22 Feb 2018, Andreas Frieß wrote:
<br>
<br>
<blockquote type="cite">Another possible Problem with the
definition
<br>
<br>
TFPColor (fpc) record with word <> TColor (lazarus)
-$7FFFFFFF-1..$7FFFFFFF <> TFPReportColor (fpreport)
UInt32
<br>
<br>
So you cannot use in Lazarus the 'well known' TColors. With
TColor it is also Delphi compatible.
<br>
</blockquote>
<br>
Using TColor is not an option, it is windows specific and depeds
on Graphics.
<br>
<br>
Michael.<br>
<br>
<fieldset class="mimeAttachmentHeader"></fieldset>
<br>
<pre wrap="">_______________________________________________
fpc-pascal maillist - <a class="moz-txt-link-abbreviated" href="mailto:fpc-pascal@lists.freepascal.org">fpc-pascal@lists.freepascal.org</a>
<a class="moz-txt-link-freetext" href="http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal">http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal</a></pre>
</blockquote>
<br>
</body>
</html>