diff --git a/designer/utslvcldesigner.tsf b/designer/utslvcldesigner.tsf
index 26e62d0..f21ed22 100644
--- a/designer/utslvcldesigner.tsf
+++ b/designer/utslvcldesigner.tsf
@@ -373,7 +373,8 @@ type TVclDesigner = class(tvcform)
                     end 
                     else 
                     begin 
-                        FProjectFileOpener.initialDir := f[1:(i-1)];
+                        return messageboxa("examples not exists!","ΜαΚΎ",0,self);
+                        //FProjectFileOpener.initialDir := f[1:(i-1)];
                     end 
                     break;
                 end