mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-27 19:42:22 -05:00
f45d6bbad7
Squashes following commits: - Lape: New wrappers. - Lape: Updated exported methods. - Lape: Renamed wrapper files. - Lape: Renamed methods in exported methods. - Lape: Update MMLPSThread. - Lape: Compilation fixes.
30 lines
681 B
PHP
30 lines
681 B
PHP
procedure Lape_KeyDown(const Params: PParamArray);
|
|
begin
|
|
ps_KeyDown(PWord(Params^[0])^);
|
|
end;
|
|
|
|
procedure Lape_KeyUp(const Params: PParamArray);
|
|
begin
|
|
ps_KeyUp(PWord(Params^[0])^);
|
|
end;
|
|
|
|
procedure Lape_SendKeys(const Params: PParamArray);
|
|
begin
|
|
ps_SendKeys(Pstring(Params^[0])^);
|
|
end;
|
|
|
|
procedure Lape_PressKey(const Params: PParamArray);
|
|
begin
|
|
ps_PressKey(PWord(Params^[0])^);
|
|
end;
|
|
|
|
procedure Lape_isKeyDown(const Params: PParamArray; const Result: Pointer);
|
|
begin
|
|
Pboolean(Result)^ := ps_isKeyDown(PWord(Params^[0])^);
|
|
end;
|
|
|
|
procedure Lape_GetKeyCode(const Params: PParamArray; const Result: Pointer);
|
|
begin
|
|
Pinteger(Result)^ := ps_GetKeyCode(Pchar(Params^[0])^);
|
|
end;
|