uses CastleWindow, CastleConfig, CastleApplicationProperties, CastleControls,
CastleColors;
var
Window: TCastleWindow;
LabelForParameter: TCastleLabel;
MyParameter: string;
begin
ApplicationProperties.ApplicationName := 'my_game_name';
Window := TCastleWindow.Create(Application);
Window.Container.BackgroundColor := White;
Window.Open;
UserConfig.Load;
MyParameter := UserConfig.GetValue('my_parameter', 'default_value');
LabelForParameter := TCastleLabel.Create(Application);
LabelForParameter.Caption := 'My parameter is now equal: ' + MyParameter;
Window.Controls.InsertFront(LabelForParameter);
Application.Run;
UserConfig.SetValue('my_parameter', MyParameter);
UserConfig.SetDeleteValue('my_parameter', MyParameter, 'default_value');
UserConfig.Save;
end.