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