1
0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-11 11:55:02 -05:00
Simba/Tests/PS/settings_test.simba
2010-04-16 17:04:50 +02:00

17 lines
551 B
Plaintext

program new;
begin
GetSettingValueDef('Testme/wat','Yo wat');
GetSettingValueDef('Testme/wat2','Yo wat2');
Writeln(GetSettingValue('Testme/wat'));
if KeyIsDirectory('Testme') then
Writeln('Testme has atleast one child!');
if KeyIsSetting('Testme/wat') then
writeln('wat exists in the parent Testme!');
DeleteSetting('Testme/wat');
Writeln(GetSettingValue('Testme/wat2'));
Writeln(GetSettingValue('Testme/wat'));
writeln(DeleteSubSettings('Testme'));
if KeyIsSetting('Testme') then
writeln('Testme is a key now!');
end.