mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-24 10:12:20 -05:00
40 lines
1.3 KiB
PHP
40 lines
1.3 KiB
PHP
|
procedure Lape_SetSettingValue(const Params: PParamArray; const Result: Pointer);
|
||
|
|
begin
|
||
|
|
Pboolean(Result)^ := ps_SetSettingValue(Pstring(Params^[0])^, Pstring(Params^[1])^);
|
||
|
|
end;
|
||
|
|
|
||
|
|
procedure Lape_KeyIsSetting(const Params: PParamArray; const Result: Pointer);
|
||
|
|
begin
|
||
|
|
PBoolean(Result)^ := ps_KeyIsSetting(PString(Params^[0])^);
|
||
|
|
end;
|
||
|
|
|
||
|
|
procedure Lape_KeyIsDirectory(const Params: PParamArray; const Result: Pointer);
|
||
|
|
begin
|
||
|
|
PBoolean(Result)^ := ps_KeyIsDirectory(PString(Params^[0])^);
|
||
|
|
end;
|
||
|
|
|
||
|
|
procedure Lape_GetSettingValue(const Params: PParamArray; const Result: Pointer);
|
||
|
|
begin
|
||
|
|
PString(Result)^ := ps_GetSettingValue(PString(Params^[0])^);
|
||
|
|
end;
|
||
|
|
|
||
|
|
procedure Lape_GetSettingValueDef(const Params: PParamArray; const Result: Pointer);
|
||
|
|
begin
|
||
|
|
PString(Result)^ := ps_GetSettingValueDef(PString(Params^[0])^, PString(Params^[1])^);
|
||
|
|
end;
|
||
|
|
|
||
|
|
procedure Lape_ListSettings(const Params: PParamArray; const Result: Pointer);
|
||
|
|
begin
|
||
|
|
Pboolean(Result)^ := ps_ListSettings(PString(Params^[0])^, PStringArray(Params^[1])^);
|
||
|
|
end;
|
||
|
|
|
||
|
|
procedure Lape_DeleteSetting(const Params: PParamArray; const Result: Pointer);
|
||
|
|
begin
|
||
|
|
PBoolean(Result)^ := ps_DeleteSetting(PString(Params^[0])^);
|
||
|
|
end;
|
||
|
|
|
||
|
|
procedure Lape_DeleteSubSettings(const Params: PParamArray; const Result: Pointer);
|
||
|
|
begin
|
||
|
|
PBoolean(Result)^ := ps_DeleteSubSettings(PString(Params^[0])^);
|
||
|
|
end;
|