From ffdd500012dd5fbb50a799e28f97f4333caf243b Mon Sep 17 00:00:00 2001
From: JianjunLiu <cqljj123@126.com>
Date: Tue, 10 Oct 2023 16:34:00 +0800
Subject: [PATCH] Update utslvcldesigner.tsf
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

优化范例打开
---
 designer/utslvcldesigner.tsf | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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