CaretAPI don't work

[Paul TOTH]

Tried with Tokyo 10.2.2 with CrossVCL 0.99i for Ubuntu 16.04 LTS under VirtualBox and OSX 10.13

on both OS, the first click do nothing, with a second click, a blue rectangle (0, 0, 50, 100) is drawn on the form.

under Windows a blinking caret is shown as expected

procedure TForm1.FormClick(Sender: TObject);
begin
  CreateCaret(Handle, 0, 2, 20);
  SetCaretPos(50, 100);
  ShowCaret(Handle);
end;

[Eugene Kryukov]

fixed at 0.99j