If you want to show a border around text,you can set IsBorder property as True.
Also,you can set value by code.
Code example:
procedure TMainFrm.Button1Click(Sender: TObject); begin if (MyCAD1.GetSelectedShape<>nil) and (MyCAD1.GetSelectedShape is TMyText) then TMyText(MyCAD1.GetSelectedShape).IsBorder:=true; end;