RectSize procedure
procedure RectSize(Const R: TRect; Var RectWidth, RectHeight: Integer);
Unit
TeCanvas
Description
Returns the dimensions of Rect R.
RectWidth := R.Right - R.Left
and
RectHeight := R.Bottom - R.Top
Send us Help Feedback. Copyright 1995-2013 © by Steema Software. All Rights Reserved.