TPolyInfo

type TPolyInfo = record

  paths: TPathsD;

  BrushClr: Cardinal;

  PenClr: Cardinal;

  PenWidth: Double;

  ShowCoords: Boolean;

  IsOpen: Boolean;

end;