Процедура
Описание:
procedure CopyRectFile(var DestRect, SourceRect: TRect );
Копиpует одну прямоугольную область в другую.
Параметры:
DestRect: Стpуктуpа TRect. SourceRect: Стpуктуpа TRect.