mirror of
https://github.com/vapaamies/KolibriOS.git
synced 2024-09-19 01:21:02 +02:00
KolibriOS.TerminateThread → ExitThread
This commit is contained in:
parent
37ee57a6e3
commit
f5b2618b92
@ -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;
|
||||
|
||||
|
@ -28,6 +28,6 @@ begin
|
||||
GetKey;
|
||||
BUTTON_EVENT:
|
||||
if GetButton.ID = 1 then
|
||||
TerminateThread;
|
||||
Break;
|
||||
end;
|
||||
end.
|
Loading…
Reference in New Issue
Block a user