Source position: ovccaret.pas line 45
type TOvcCaretShape = (
csBlock,
csHalfBlock,
csVertLine,
csHorzLine,
csCustom,
csBitmap
);