diff --git a/harbour/contrib/hgf/tests/form3.prg b/harbour/contrib/hgf/tests/form3.prg
index d9da5b2720..ab89a46743 100644
--- a/harbour/contrib/hgf/tests/form3.prg
+++ b/harbour/contrib/hgf/tests/form3.prg
@@ -18,6 +18,8 @@ CLASS TForm3 FROM TForm
 
    METHOD New()
 
+   METHOD FormClick( oSender, nX, nY ) INLINE MsgInfo( "Click" )
+
 ENDCLASS
 
 METHOD New() CLASS TForm3