liujianjun
/
tslediter
3
0
Fork 1
Code Issues Pull Requests Projects Releases Wiki Activity

编辑器 

编译加入manifest功能
This commit is contained in:
tslediter 2023-11-22 12:17:47 +08:00
parent bd8664d429
commit e1ee60f91c
3 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
TSL.exe
View File

Binary file not shown.

8
designer/ctl_mgr/t_compile_config.tsf
View File

@ -431,7 +431,13 @@ type t_compile_config=class(tdcreateform)
r += f_b_a_param(d,"output"); r += f_b_a_param(d,"output");
if d["strong"] then r+= " -strong"; if d["strong"] then r+= " -strong";
if d["buildgui"] then r+= " -buildgui"; if d["buildgui"] then r+= " -buildgui";
{$ifdef linux}
{$else}
if r[length(r)]="\n" then
r +=format('--manifest="%s" ',d["buildfile"]+".manifest");
else r +=format('\r\n--manifest="%s" ',d["buildfile"]+".manifest");
{$endif}
return r; return r;
end end
function f_b_a_param(d,n); function f_b_a_param(d,n);

6
designer/utslcodeeditor.tsf
View File

@ -5318,7 +5318,11 @@ type TEditerEchoWnd=class(TSynMemoNorm) //
r += f_b_a_param(d,"output"); r += f_b_a_param(d,"output");
if d["strong"] then r+= " -strong"; if d["strong"] then r+= " -strong";
if d["buildgui"] then r+= " -buildgui"; if d["buildgui"] then r+= " -buildgui";
{$ifdef linux}
{$else}
r +=format(' --manifest="%s" ',d["buildfile"]+".manifest");
{$endif}
return r; return r;
end end
function f_b_a_param(d,n); function f_b_a_param(d,n);