From f5b2618b922575949945651ae2fcc14d6bb0a12d Mon Sep 17 00:00:00 2001
From: Freeman <vapaamies@yandex.ru>
Date: Sun, 3 Jan 2021 13:01:45 +0300
Subject: [PATCH] =?UTF-8?q?KolibriOS.TerminateThread=20=E2=86=92=20ExitThr?=
 =?UTF-8?q?ead?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Lib/KolibriOS.pas  | 6 +++---
 My/MyGUI/MyGUI.dpr | 2 +-
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/Lib/KolibriOS.pas b/Lib/KolibriOS.pas
index 620d8f5..8047769 100644
--- a/Lib/KolibriOS.pas
+++ b/Lib/KolibriOS.pas
@@ -347,7 +347,7 @@ const
   SHUTDOWN_REBOOT      = 3;
   SHUTDOWN_RESTART     = 4;
 
-{-1}      procedure TerminateThread; stdcall;
+{-1}      procedure ExitThread; stdcall;
 {0}       procedure DrawWindow(Left, Top, Width, Height: LongInt; Caption: PKolibriChar; BackColor, Style, CapStyle: LongWord); stdcall;
 {1}       procedure SetPixel(X, Y: LongInt; Color: LongWord); stdcall;
 {2}       function GetKey: TKeyboardInput; stdcall;
@@ -656,9 +656,9 @@ const
 
 implementation
 
-procedure TerminateThread; stdcall;
+procedure ExitThread; stdcall;
 asm
-        mov    eax, $FFFFFFFF
+        or     eax, -1
         int    $40
 end;
 
diff --git a/My/MyGUI/MyGUI.dpr b/My/MyGUI/MyGUI.dpr
index 323d807..db46b9d 100644
--- a/My/MyGUI/MyGUI.dpr
+++ b/My/MyGUI/MyGUI.dpr
@@ -28,6 +28,6 @@ begin
         GetKey;
       BUTTON_EVENT:
         if GetButton.ID = 1 then
-          TerminateThread;
+          Break;
     end;
 end.
\ No newline at end of file