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

Bugfixes © 0CodErr

Browse Source
This commit is contained in:
Владислав Джавадов 2020-06-06 00:37:44 +03:00
parent 577e04b0fa
commit d9331d8235
1 changed files with 10 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
Lib/KolibriOS.pas
View File

@ -521,7 +521,7 @@ const
{66.5} function ResetHotKey(ScanCode, Control: LongWord): LongInt; stdcall; {66.5} function ResetHotKey(ScanCode, Control: LongWord): LongInt; stdcall;
{66.6} procedure LockKeyboard; stdcall; {66.6} procedure LockKeyboard; stdcall;
{66.7} procedure UnlockKeyboard; stdcall; {66.7} procedure UnlockKeyboard; stdcall;
{67} procedure SetWindowPos(Left, Top, Right, Bottom: LongInt); stdcall; {67} procedure SetWindowPos(Left, Top, Width, Height: LongInt); stdcall;
{68.0} function GetTaskSwitchCount: LongWord; stdcall; {68.0} function GetTaskSwitchCount: LongWord; stdcall;
{68.1} procedure SwitchThread; stdcall; {68.1} procedure SwitchThread; stdcall;
{68.2.0} function EnableRDPMC: LongWord; stdcall; {68.2.0} function EnableRDPMC: LongWord; stdcall;
@ -2427,15 +2427,15 @@ asm
pop ebx pop ebx
end; end;
procedure SetWindowPos(Left, Top, Right, Bottom: LongInt); stdcall; procedure SetWindowPos(Left, Top, Width, Height: LongInt); stdcall;
asm asm
push ebx push ebx
push esi push esi
mov eax, 67 mov eax, 67
mov ebx, Left mov ebx, Left
mov ecx, Top mov ecx, Top
mov edx, Right mov edx, Width
mov esi, Bottom mov esi, Height
int $40 int $40
pop esi pop esi
pop ebx pop ebx
@ -3155,13 +3155,7 @@ asm
mov bl, 8 mov bl, 8
mov bh, Device mov bh, Device
int $40 int $40
cmp eax, -1
jz @error
mov edx, ebx mov edx, ebx
jmp @end
@error:
mov edx, eax
@end:
pop ebx pop ebx
end; end;
@ -3172,13 +3166,7 @@ asm
mov bl, 9 mov bl, 9
mov bh, Device mov bh, Device
int $40 int $40
cmp eax, -1
jz @error
mov edx, ebx mov edx, ebx
jmp @end
@error:
mov edx, eax
@end:
pop ebx pop ebx
end; end;
@ -3350,13 +3338,12 @@ asm
xor ebx, ebx xor ebx, ebx
mov bh, Device mov bh, Device
int $40 int $40
cmp ebx, -1 movzx ecx, bx
je @error cmp eax, -1
movzx edx, bx jne @next
jmp @end mov ecx, eax
@error: @next:
mov edx, eax mov edx, ecx
@end:
pop ebx pop ebx
end; end;