40 lines
1.5 KiB
PHP
40 lines
1.5 KiB
PHP
procedure RUTIS_ps_SetSettingValue(Params: PRutisParamInfoArray; Result: PRutisParamInfo);
|
|
begin
|
|
Pboolean(Result^.Data)^ := ps_SetSettingValue(Pstring(Params^[0].Data)^, Pstring(Params^[1].Data)^);
|
|
end;
|
|
|
|
procedure RUTIS_ps_KeyIsSetting(Params: PRutisParamInfoArray; Result: PRutisParamInfo);
|
|
begin
|
|
PBoolean(Result^.Data)^ := ps_KeyIsSetting(PString(Params^[0].Data)^);
|
|
end;
|
|
|
|
procedure RUTIS_ps_KeyIsDirectory(Params: PRutisParamInfoArray; Result: PRutisParamInfo);
|
|
begin
|
|
PBoolean(Result^.Data)^ := ps_KeyIsDirectory(PString(Params^[0].Data)^);
|
|
end;
|
|
|
|
procedure RUTIS_ps_GetSettingValue(Params: PRutisParamInfoArray; Result: PRutisParamInfo);
|
|
begin
|
|
PString(Result^.Data)^ := ps_GetSettingValue(PString(Params^[0].Data)^);
|
|
end;
|
|
|
|
procedure RUTIS_ps_GetSettingValueDef(Params: PRutisParamInfoArray; Result: PRutisParamInfo);
|
|
begin
|
|
PString(Result^.Data)^ := ps_GetSettingValueDef(PString(Params^[0].Data)^, PString(Params^[1].Data)^);
|
|
end;
|
|
|
|
procedure RUTIS_ps_ListSettings(Params: PRutisParamInfoArray; Result: PRutisParamInfo);
|
|
begin
|
|
Pboolean(Result^.Data)^ := ps_ListSettings(PString(Params^[0].Data)^, PStringArray(PPointer(Params^[1].Data)^)^);
|
|
end;
|
|
|
|
procedure RUTIS_ps_DeleteSetting(Params: PRutisParamInfoArray; Result: PRutisParamInfo);
|
|
begin
|
|
PBoolean(Result^.Data)^ := ps_DeleteSetting(PString(Params^[0].Data)^);
|
|
end;
|
|
|
|
procedure RUTIS_ps_DeleteSubSettings(Params: PRutisParamInfoArray; Result: PRutisParamInfo);
|
|
begin
|
|
PBoolean(Result^.Data)^ := ps_DeleteSubSettings(PString(Params^[0].Data)^);
|
|
end;
|