いつもお世話になっております。

データウィンドウを入力項目として使っています。
仕様として
エラーの値が入力されたらフォーカスの移動はしない。
というのがあります。
マウスクリックでFocusが抜けた場合は
Itemchangedが走らないのでLoseFocusでSetFocus()をしています。
以下がDWCtrlのスクリプトです。

----+----1----+----2----+----3----+----4----+----5
イベント：Itemchanged
IF (data = \"ABC\") THEN
  st_err.Text = \"ABCは入力できません。\"
  RETURN 1
END IF
----+----1----+----2----+----3----+----4----+----5
イベント：ItemError
RETURN 1
----+----1----+----2----+----3----+----4----+----5
イベント：LoseFocus
IF (this.AcceptText() < 0) THEN
  this.SetFocus()
  RETURN
END IF
----+----1----+----2----+----3----+----4----+----5

上記で実行し、マウスクリックで抜けると
ABCでエラーは出ますが、カーソルが見えない状態になります。
FocusはSetされています。

なにかいい解決策があれば教えてください。
よろしくお願いします。