unit FrameChr;
interface
 
type
  TFrameChars = String[11];
const
  fcHorz=1; fcVert=2;             { - |   }
  fcUpLt=3; fcUpCt=4;  fcUpRt=5;