captioninfoty

type captioninfoty = record

  dim: rectty;

  caption: richstringty;

  font: tfont;

  textflags: textflagsty;

  imagepos: imageposty;

  captiondist: Integer;

  imagenr: imagenrty;

  colorglyph: colorty;

  imagelist: timagelist;

  imagedist: Integer;

  imagedist1: Integer;

  imagedist2: Integer;

  captionclipped: Boolean;

end;