@ handoko
I don't really have a problem with publicizeing my project (even though, as you've understood, the data is 'live' and personal) except that it is some 12000 lines long and calls on 26 databases of information!
I'm running on Win 7 Ultimate 64, Laz 1.6 FPC 3.0
I might be able to extract the part of the code that deals with just the display of the VAT Returns and make it a completely new project - though I'm not convinced that would lead to a solution.
My question is more to do with why records 1 to 5 (or 0 to 4) display correctly but the others do not.
@ SkyKhan & wp
Whilst I can see your points, I do actually draw the box/line every time the data is refreshed.
I also make [DrawLines] the last call so that they are on top of anything already on the canvas.
In case it is beneficial this is the code that writes the VAT_Due figure - just before DrawLines is called :
if VAT_Ret.Value < 0 then
Form1.vat_Due.font.Color := clRed
else
Form1.vat_Due.font.Color := clBlack;
Form1.vat_Due.Caption := StringValue(Abs(VAT_Ret.Value),True);
[StringValue] is a 'Helper' type function which formats the value received and adds the currency sign (or not).
I've even looked at the Borderspacing Properties of the TLabel to see if that might be used to 'highlight' the figure (without success).