tsheyongcong/tslediter
0
0
Fork 0
forked from liujianjun/tslediter
Code Issues Pull Requests Projects Releases Wiki Activity

编辑器

Browse Source 
unit 取消缩进
This commit is contained in:
JianjunLiu
2022-06-06 10:06:07 +08:00
parent b22c97eebb
commit 220a667fbe
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
designer/utslcodeformat.tsf
+1 -1
View File
@@ -683,7 +683,7 @@ type TFormatParser = class
ChangeLine(); ChangeLine();
Formataline(bkindex,FTkIndex); Formataline(bkindex,FTkIndex);
ChangeLine(); ChangeLine();
FHier.Push(); // FHier.Push(); //20220606 unit 去掉缩进
FStates.Push(BT_UNIT); FStates.Push(BT_UNIT);
state := BT_UNIT; state := BT_UNIT;
//return ""; //return "";
funcext/tvclib/uvclthreadworker.tsf
+1 -1
View File
@@ -60,7 +60,7 @@ type TCustomThreadworker = class()
if not ifarray(FThreaders) then FThreaders := array(); if not ifarray(FThreaders) then FThreaders := array();
FThreader := new tworkerHost(); FThreader := new tworkerHost();
FThreaders[inttostr(FThreader.handle)] := FThreader; FThreaders[inttostr(FThreader.handle)] := FThreader;
if not (checkok(s,libs,declaration)) then raise "工作线程构造失败!"; if not (checkok(s,lib,declaration)) then raise "工作线程构造失败!";
uibeginthreadworker(FScript); uibeginthreadworker(FScript);
end end
function Operator [](idx); function Operator [](idx);