mirror of
https://github.com/vapaamies/KolibriOS.git
synced 2024-09-19 17:41:01 +02:00
KolibriOS.TerminateThread → ExitThread
This commit is contained in:
parent
37ee57a6e3
commit
f5b2618b92
@ -347,7 +347,7 @@ const
|
|||||||
SHUTDOWN_REBOOT = 3;
|
SHUTDOWN_REBOOT = 3;
|
||||||
SHUTDOWN_RESTART = 4;
|
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;
|
{0} procedure DrawWindow(Left, Top, Width, Height: LongInt; Caption: PKolibriChar; BackColor, Style, CapStyle: LongWord); stdcall;
|
||||||
{1} procedure SetPixel(X, Y: LongInt; Color: LongWord); stdcall;
|
{1} procedure SetPixel(X, Y: LongInt; Color: LongWord); stdcall;
|
||||||
{2} function GetKey: TKeyboardInput; stdcall;
|
{2} function GetKey: TKeyboardInput; stdcall;
|
||||||
@ -656,9 +656,9 @@ const
|
|||||||
|
|
||||||
implementation
|
implementation
|
||||||
|
|
||||||
procedure TerminateThread; stdcall;
|
procedure ExitThread; stdcall;
|
||||||
asm
|
asm
|
||||||
mov eax, $FFFFFFFF
|
or eax, -1
|
||||||
int $40
|
int $40
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -28,6 +28,6 @@ begin
|
|||||||
GetKey;
|
GetKey;
|
||||||
BUTTON_EVENT:
|
BUTTON_EVENT:
|
||||||
if GetButton.ID = 1 then
|
if GetButton.ID = 1 then
|
||||||
TerminateThread;
|
Break;
|
||||||
end;
|
end;
|
||||||
end.
|
end.
|
Loading…
Reference in New Issue
Block a user