Source position: winapih.inc line 54
function CreateCaret(
Handle: HWND;
Bitmap: HBITMAP;
width: Integer;
Height: Integer
):Boolean;