When you draw a shape by mouse,you can set some properties before do it.you can change ShapeTool property whether what style of shape you will draw.ReturnToSelecting property whether change ShapeTool's value as selecting state.when you set this property as true and drawed a shape,the ShapeTool's value will set as SpSelecting of itself,or not,it do not change ShapeTool's value when you drawed a shape.

Set Snap property as true and set SnapPixels property,set SnapShape property as true,it will snap to grid and snap to shape itwhen you draw or drag or resize a shape.

Also,you can set this property value by code.

Code example:

procedure TMainFrm.Button1Click(Sender: TObject);