Source position: ovccaret.pas line 132
published property TOvcCaret.CaretWidth : Integer read FCaretWd write SetCaretWidth default 2;