编辑器

优化安装

designer/ctl_mgr/resource.tfm/t_compile_config.tfm

@@ -282,7 +282,6 @@ object ed_script:t_compile_config
       end
       object ck_s_rp:tcheckbtn
          caption="资源文件保留相对路径"
-         enabled=false
          height=25
          left=253
          top=25

designer/ctl_mgr/t_compile_config.tsf

@@ -100,6 +100,7 @@ type t_compile_config=class(tdcreateform)
             else 
                 cb_type.ItemIndex := 0;
         end 
+        flibpath := r["libpath"];
         e_script.text := r["buildfile"];  
         ed_output.text := r["output"];
         ed_out_f.text := r["exports"] ;
@@ -125,6 +126,7 @@ type t_compile_config=class(tdcreateform)
         end         
         r["buildfile"] := e_script.text;
         r["output"] := ed_output.text;
+        r["libpath"] := flibpath;
         r["exports"] := ed_out_f.text;
         r["dependsdir"]:=ed_f_dirs.text;
         r["depends"]:=ed_include_f.text;
@@ -154,6 +156,7 @@ type t_compile_config=class(tdcreateform)
         ck_gui.Checked := "";
         ed_ico.text := "";  
         ck_s_rp.Checked := "";
+        flibpath := "";
     end 
     function bt_outputname_clk(o;e);virtual;
     begin
@@ -446,4 +449,5 @@ type t_compile_config=class(tdcreateform)
         return r;   
     end 
     fcmd_shower;
+    flibpath;
 end