[lazarus] New Bug Entered

[bugtracker at miraclec.com]

Title: LCL: TControl GetClientRect, GetClientWidth, GetCLientHeight

Entered by: Claude Rieth

In   TControl  (control.inc)

GetClientRect returns Right and Bottom as Width and Height, it should be Width-1 and Height-1

GetClientWidth returns Right, should be Right+1 
GetClientHeight return Bottom, should be Bottom+1

TWinControl.GetClientRect has the same problem, 

Correcting this automagically fixes different glitches in the UI