界面库

更新
2024-04-28 17:36:54 +08:00
parent e04ba21b4a
commit 0de78a034a
3 changed files with 52 additions and 37 deletions
@@ -905,7 +905,7 @@ type TTslDebuga=class(TCustomControl)
        if recvtype=0 then
        begin
            FRemoteWait := 0;
-            ExecuteCommand("showstr","调试结束");
+            ExecuteCommand("showstr","\r\n调试结束");
            if FConnectchannel then dbgdeletechannel(FConnectchannel);
            FConnectchannel := 0;
            g_tsldbgcallback_handle := nil;
@@ -1019,7 +1019,7 @@ type TTslDebuga=class(TCustomControl)
                end
                FRemoteWait := 0;
                if FCurrentgotoitem and FCurrentgotoitem.FEditer then FCurrentgotoitem.FEditer.ExecuteCommand("ecruningto",nil);
-                ExecuteCommand("showstr","调试结束");
+                ExecuteCommand("showstr","\r\n调试结束");
                toolbtnState("停止");
                return;
            end