diff --git a/harbour/contrib/hgf/tests/form3res.prg b/harbour/contrib/hgf/tests/form3res.prg
new file mode 100644
index 0000000000..367a639e3e
--- /dev/null
+++ b/harbour/contrib/hgf/tests/form3res.prg
@@ -0,0 +1,24 @@
+//
+// $Id$
+//
+// Loading persistence files at runtime sample
+
+#include "hbclass.ch"
+
+function Main()
+
+   local oForm3 := TForm3():New()
+
+   oForm3:LoadFromFile( "form3.hbf" )
+
+   oForm3:ShowModal()
+
+return nil
+
+CLASS TForm3 FROM TForm
+
+   DATA   aTest PROPERTY
+
+   METHOD FormClick( oSender, nX, nY ) INLINE MsgInfo( "Click" )
+
+ENDCLASS
\ No newline at end of file