{
ClientRect example
The following code uses ClientRect to find and draw a line from the top left to the bottom right of the current control.  It assumes that the current object has a Canvas property, such as can be found on descendants of TGraphicControl or TCustomControl.
} 
with ClientRect do
begin
  Canvas.MoveTo(Left,Top);
  Canvas.LineTo(Right, Bottom);
end; 
