TCvContour

type TCvContour = record

  flags: Integer;

  header_size: Integer;

  h_prev: pCvArr;

  h_next: pCvArr;

  v_prev: pCvArr;

  v_next: pCvArr;

  total: Integer;

  elem_size: Integer;

  block_max: Pansichar;

  ptr: Pansichar;

  delta_elems: Integer;

  storage: pCvMemStorage;

  free_blocks: pCvSeqBlock;

  First: pCvSeqBlock;

  rect: TCvRect;

  color: Integer;

  reserved: array [0..2] of Integer;

end;