[TRiPLE]

Willow, спасибо, все заработало. Конструкция вышла такая:

   HRGN MyRgn;
MyRgn = CreateRectRgn(Rect.Left,Rect.Top,Rect.Right,Rect.Bottom);
SelectClipRgn(StringGrid1->Canvas->Handle,MyRgn);