createcaret函数

Question

createcaret函数用法：
hwnd：窗口
hbitmap：位图由createbitmap，createdibitmap，loadbitmap创建
bool createcaret（hwnd hwnd，hbitmap hbitmap，int nwidth，int nheight）；
在delphi中怎么用？

Answer 1

var
mhwnd:hwnd;
mhbitmap:hbitmap;
a:bool;
begin
  mhbitmap:=loadbitmap(application.Handle,'C:\test.jpg');
  a:=createcaret(mhwnd,mhbitmap,10,10);end;

Answer 2

报错，行a:=createcaret（mhwnd，mhbitmap，10，10）处
[Error] createcaret.pas(34): '.' expected but '(' found
怎么改？