Freeman/SDK
1
0
Fork 0
mirror of https://github.com/vapaamies/KolibriOS.git synced 2024-09-19 17:41:01 +02:00
Code Issues Actions Packages Projects Releases Wiki Activity

KolibriOS.TerminateThread → ExitThread

Browse Source
This commit is contained in:
Владислав Джавадов 2021-01-03 13:01:45 +03:00
parent 37ee57a6e3
commit f5b2618b92
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Lib/KolibriOS.pas
View File

@ -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;

2
My/MyGUI/MyGUI.dpr
View File

@ -28,6 +28,6 @@ begin
GetKey;
BUTTON_EVENT:
if GetButton.ID = 1 then
TerminateThread;
Break;
end;
end.