It works, all right, the problem seems to be more of a string concatination problem on these lines:
s_TotalMessage := 'Total amount is ' + FloatToStr(d_Total);
lblTotal.Text := s_TotalMessage;
lazarus 0.9.0
Linux
fpc 2.0.1
To clarify a bit, when I do this
lblTotal.Text := FloatToStr(d_Total)
it works.
When I do this:
s_TotalMessage := 'Total amount is ' + FloatToStr(d_Total);
lblTotal.Text := s_TotalMessage;
It will not display floating point numbers.