shapeinfoty

type shapeinfoty = record

  ca: captioninfoty;

  focusrectdist: Integer;

  state: shapestatesty;

  tabpos: Integer;

  group: Integer;

  color: colorty;

  coloractive: colorty;

  facetemplate: tfacetemplate;

  imagenrdisabled: Integer;

  imagecheckedoffset: Integer;

  face: tcustomface;

  frame: tcustomframe;

  checkboxframe: tframetemplate;

  mouseframe: framety;

  tag: Integer;

  doexecute: tagmouseprocty;

end;