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;